Введите, что появится на экране (позавершению программы), если значение N=15 Var N, i, S: integer; Begin Write('N='); readln(N); S:=0; For i:=1 to N do S:=S+i; Writeln('S=', S); End.
120 ======================