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