Запишите значение переменной S, полученное в результате работы следующие программы:
Var s, m, i: integer;
Begin
s:= 0;
m:= 5;
for i:= 2 to m do
s:= s+i;
writeln(s);
End