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

Question

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

Comments

программа

Answer 1

Program chisla;
uses crt;
var a,b,s : integer;
begin
for a:=10 to 99 do
begin
S:=S+a;
end;
writeln('Сумма все двузначных чисел равна',s);
end.