
Naanes
6 год назад
напишите программу которая вычисляет сумму всех двухзначных чисел
ОТВЕТЫ

Georgij
Oct 24, 2020
Var S,A:integer;
Begin
S:=0;
For A:= 10 to 99 do
S:=S+A;
WriteLn('S = ',S)
End.
Begin
S:=0;
For A:= 10 to 99 do
S:=S+A;
WriteLn('S = ',S)
End.
63
Смежные вопросы: