Сколько раз выполнится тело цикла
Х: = 5;
for i: = -1 to 5 do
X: = Х+1