Введите, какое значение примет переменная i, по завершению программы: Var N,i,S: integer;...

Question

Введите, какое значение примет переменная 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.

Comments

А чему N равна?

Answer 1

Если n=5 тогда S=  15