Ответы
Ответ дал:
0
Var S,n:integer;
Begin
S:=0;
For n:= 1 to 10 do
S:=S+5*n-1;
WriteLn('S = ',S);
End.
Результат работы программы:
S = 265
Begin
S:=0;
For n:= 1 to 10 do
S:=S+5*n-1;
WriteLn('S = ',S);
End.
Результат работы программы:
S = 265
Похожие вопросы
2 года назад
2 года назад
6 лет назад
9 лет назад
9 лет назад