Сколько раз выполниться цикл:
а:=20;
While a<0 do
a:=a+10;

• 2 раза
• 10 раз
• 3 раза
• ни разу