Проанализируйте работу фрагмента программы и ответьте на вопрос.
x := 1;
y := 1;
while x < 5 do
begin
y := y * 2;
x := x + 1
end
Сколько раз выполнится тело цикла, если заменить условие на x > 0?