Ответы
Ответ дал:
0
Var S,A:integer;
Begin
S:=0;
For A:=53 to 99 do
S:=S+A;
WriteLn('S = ',S);
End.
Begin
S:=0;
For A:=53 to 99 do
S:=S+A;
WriteLn('S = ',S);
End.
Вас заинтересует
1 год назад
8 лет назад
8 лет назад
9 лет назад