Задание

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

Var t, i: integer;

Begin

t := 2;

For i := 1 to 3 do

t := t * i;

Writeln(t);

End.