Какое число получится в конце?
t:=1; i:=0

repeat

i:=i+1;

t:=t*4;

until t>1000;

write (i);

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

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