Вычислить сумму всех двузначных чисел - Turbo Pascal

Узнай цену своей работы

Формулировка задачи:

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

Решение задачи: «Вычислить сумму всех двузначных чисел»

textual
Листинг программы
var
i:byte;
summ:longint;
begin
summ:=1;
for i:=10 to 99 do
summ:=summ+i;
writeln('Cymma=',summ);
end.

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

14   голосов , оценка 3.857 из 5
Похожие ответы