Prougram; var a,b,c: integer; Begin writeln ('Vvedite a'); read (a); writeln ('Vvedite b'); read (b); writeln ('Vvedite c'); read (c); d:=a+b+c writeln ('d'=',d'); End.