Question

Сколько раз выполняется цикл? a:=4 b:=6 while a

Answer 1

Цикл не правильный. при компиляции выдаст ошибку должно быть условие(либо логическая переменная)
правильный синтаксис
 while a>0 do
beign

end;
это пример



ок, ответ после правки: 1 раз