№3. Какое число выведет на экран ПК после выполнения фрагмента программы?

For i: = 5 downto 1 do s: = 20 - i;
write (s);

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

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