Задание

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

Var u,i: integer;

Begin

u := 26;

For i := 1 to 5 do

u := u – i;

Writeln(u);

End.