Question

Помогите пж

1 Определите, что будет напечатано в результате работы следующей

программы.

Var s,і:integer;

Begin

s := 3;

For і := 2 to 5 do

s := s + 2* і;

Writeln (s) ;

End.

Ответ: ___________

2 Определите, что будет напечатано в результате работы следующей

программы.

Var s,k: integer;

Begin

s := 0;

for k := 4 to 8 do

s := s+7;

writeln(s);

End.

Ответ: ____________

3 Определите, что будет напечатано в результате работы следующей

программы.

Var k,i: integer;

Begin

k := 4;

For i := 1 to 3 do

k := 2*k + i;

Writeln(k);

End.

Ответ: ___________

4 Определите, что будет напечатано в результате работы следующей

программы.

Var s,k: integer;

Begin

s:=0;

for k:=1 to 11 do

s:=s+12;

write(s);

End.

Ответ: ____________

5 Определите, что будет напечатано в результате работы следующей

программы.

var s, k:integer;

begin

s := 0;

for k := 2 to 12 do

s := s + 11;

writeln (s);

end.

Ответ: ___________