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.