a:=12; b:=8;   
if a div b больше 1 then
a:=a/2 else b:=b+5

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

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