Написать программу которая вводит с клавиатуры 10 чисел и вычисляет их сумму и произведение на алгоритмическом языке

Question

Информатика

Виталина

27 сентября, 15:22

Написать программу которая вводит с клавиатуры 10 чисел и вычисляет их сумму и произведение на алгоритмическом языке

+3

Ответы (1)

Знаете ответ?

Ираида · Answer 1

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.

Написал на Паскале