Question

Сколько единиц появится на экране монитора при выполнении данного кода:
a:=4;
repeat
write('1');
a:=a-1;
until a=1;​

Answer 1

В результате выполнения этого кода на экране монитора появятся три ячейки.

Сначала присвойте переменной a значение 4, а затем запустите цикл repeat...until, пока переменная a не станет равной 1.

В теле цикла на экран выводится символ '1', а затем переменная a уменьшается на 1. Итак, на первой итерации цикла на экран выводится одна единица, на второй — еще одна, на третью — последняя единица, после чего переменная а становится равной 1 и цикл завершается.

Всего на экране монитора появятся три единицы.