Решите циклом ДЛЯ или циклом ПОКА.1) Вычислить значение выражения z = 1 + 2+ 3+...+M. Распечатать квадрат и куб значений выражения.
Решите циклом ДЛЯ или циклом ПОКА.
1) Вычислить значение выражения z = 1 + 2+ 3+...+M. Распечатать квадрат и куб значений выражения.
Гость
Ответ(ы) на вопрос:
Гостьvar
sum,i,m:integer;
begin
sum:=0;
read(m);
for i:=1 to m do
sum:=sum+i;
writeln(sum);
end.
Не нашли ответ?
Похожие вопросы