Ввести 3 целых числа и вывести на экран их сумму и произведение. ...

Motes

var x,y,z:integer;

S:integer;

P:integer;

 

 begin

readln(x,y,z);

S:=x+y+z;

P:=x*y*z;

writeln(S,P)

end.