Постройте трассировочную таблицу (Паскаль) var i, n, m: integer; begin write('введите любое натуральное число: '); readln(n); for i:=1 to n do begin m:=m+i; end; writeln('сумма всех натуральных чисел не превышающих ',n...
Постройте трассировочную таблицу (Паскаль)
var
i, n, m: integer;
begin
write('введите любое натуральное число: ');
readln(n);
for i:=1 to n do
begin
m:=m+i;
end;
writeln('сумма всех натуральных чисел не превышающих ',n,' - ',m);
end
Гость
Ответ(ы) на вопрос:
Гостьтаблица в приложении ========
Не нашли ответ?
Похожие вопросы