Сколько раз будет выполняться цикл:
S:=320;
a:=9;
repeat
S:=S div 2;
a:=a+3;
until a>18;

Ответа на этот вопрос пока нет. Попробуйте найти его через форму поиска.

Вас заинтересует