Помогите !
(№ 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.

спааасибо

31, 35, 24, 59 . З кожною ітерацією "і"  збільшується на 1...В 774 прикладі цикл від 1 до 3. Значить ( (0+4*1)+(0+4*2)+(0+4*3))  = 24