Ответы
Ответ дал:
0
Program P17;
Var i, sum: integer;
Begin
Sum:=0;
For i:=1 to 10 do
Sum:=sum+i;
Writeln('sum = ',sum);
End.
Вас заинтересует
1 год назад
1 год назад
6 лет назад
8 лет назад
9 лет назад
9 лет назад