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

Question

Гость

Информатика

14 ноября, 17:13

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

+5

Ответы (1)

Знаешь ответ на этот вопрос?

Дамблдор · Answer 1

Pascal:

program z;

var i, a, s, N:integer;

begin

writeln ('kol-vo skladivaemih chisel');

readln (N);

for i:=1 to N do begin

write ('chislo=');

readln (a);

s:=s+a;

end;

writeln ('summa=', s);

readln;

end.