Question

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

Answer 1

Цикл повторится 3 раза (0,1,2)
На первой итерации(первом цикле) значение к=3*2+0=6
На второй: к=3*6+1=19
На третьей: к=3*19+1=58
Вывод:
58