Определите, что будет напечатано в результате работы следующей программы.
Var s, n: integer;
Begin
s := 5;
For n := 2 to 4 do
s := s + \(n\-1\);
Writeln\(s\);
End.