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

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

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

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