Question

Паша написал программу для вычисления чисел геометрической прогрессии со знаменателем прогрессии 3. Определи, какое последнее число выведет на экран программа.
program p1;
var n,res: integer
begin
n:=1
repeat
res:=n*3
n:=res
writeln ('res=', res);
until res > 222;
end.

Answer 1

Ответ:

243

Объяснение:

Программа увеличивает число в 3 раза, пока оно не будет более 222. Изначально число = 1, число будет умножаться и дойдет до 243. 243 больше, чем 222 и программа остановится