Составить программу, которая выводит сумму первых пяти натуральных чисел.

lyuda29m lyuda29m    1   07.10.2019 00:40    7

Ответы
elenabuda85 elenabuda85  10.10.2020 00:40
Var
ch,sum,i:longint;
begin
sum:=0;
WriteLn('Вводите числа.');
for i := 1 to 5 do
begin
readln(ch);
inc(sum,ch);
end;
WriteLn('ответ: ',sum);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика