Введите, какое значение примет переменная i, по завершению программы:
Var N,i,S: integer;
Begin
Write('N='); readln(N);
S:=0; i:=1;
Repeat
S:=S+i;
i:=i+1;
Until i знак больше N;
Writeln('S=', S);
End.
Ответы
Ответ дал:
0
если n=5 тогда S= 15
Вас заинтересует
1 год назад
1 год назад
2 года назад
2 года назад
8 лет назад