6. Определите значение переменной x после выполнения следующего алго-ритма,...

Question

6. Определите значение переменной x после выполнения следующего алго-ритма, представленного в виде блок-схемы.

А) 1 Б) 3 В) 4 Г) 5

---

Answer 1

Var x,y:integer;
begin 
 x:=149; 
 y:=18; 
 while x>=y do 
  begin   
   x:=x-y; 
  end; 
 write(x);
end.

Ответ:5