b = (2468/100)*10=(68(остаток))*10
a = 2468/1000 + 680 = 2 + 680
a = 682 b = 680
ответ: в
Var a, b: integer;
begin
Writeln('Введите два числа');
Readln(a, b);
repeat
if a > b then a := a Mod b else
b := b Mod a;
until (a = 0) Or (b = 0);
writeln('НОД = ', a + b);
<span>end.</span>