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

ealembi5 ealembi5    2   22.08.2019 05:10    1

Ответы
смерть75 смерть75  05.10.2020 11:53
Program n1;
var z,i,sum: integer;
begin
readln(z);
sum:=0;
for i:=1 to 10 do
begin
sum:=sum+z;
z:=z+1;
end;
writeln(sum);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика