Question

Помогите пожалуйста
Определите результат работы фрагмента программы:
a:=1;

b:=1;

repeat

a:=a*b;

b:=b+2;

until b
writeln (a)

end.

Answer 1

a:=1;

b:=1;

repeat

a:=a*b; // 1 * 1 = 1

b:=b+2; // 1 + 2 = 3 // 3 + 2 = 5

until b // Просит снова повторить процедуру

writeln (a) // 1

end.

Ответ: a: = 1.