Проанализируйте работу программы.
Program m_1;
Var X, Y: integer;
Begin
X := 1;
Y := 1;
While X < 5 do
Begin
Y := Y*2;
X := X+1;
End;
End.
Сколько раз исполнится тело цикла, если заменить условие на X >= 5?

• 0
• Бесконечно
• 4
• 5