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