Помогите еще с этим заданием Значениями переменных a и b являются натуральные числа....

Question

Помогите еще с этим заданием

Значениями переменных a и b являются натуральные числа. Пусть a=50 и b=20 тогда в результате работы следующего алгоритма:

1. Если a=b, то работа алгоритма закончена; иначе выполняется пункт 2;
2. Если a больше b, то переменной a присваивается значение a – b; иначе переменной b присваивается значение b – a;
3. Выполняется пункт 1 данного алгоритма.

Какое значение примет переменная a?

Answer 1

Program program1;
var
a,b:integer;
x:boolean;
begin
repeat
begin
a:=50;
b:=20;
if a=b then
x:=true
else
begin
if a>b then
a:=a-b
else
b:=b-a;
end
end;
until x=false;
write(a);
readln;
end.
Значение а=30.

Comments

Какое стало значение у переменной a?

---

Значение 30;

---

50-20=30 Тут больше никаких вычислений нет?

---

Есть там вычисления, не я считал же. А программа

---

Понятно. Спасибо большое!

---

Если нужны подробные вычисления могу вывести

---

Да, нужны

---

......????