Напишите программу которая вводит с клавиатуры 10 чисел и вычисляет их сумму и произведение. (c++)

Program;

var a, sum, p, i:integer;

Begin

sum:=0;

p:=1;

for i:=1 to 10 do

begin;

read (a) ;

sum:=sum+a;

p:=p*a;

end;

writeln (sum, p) ;

End.