101010 + 1110 = 111000
1010 + 1111 = 11001
1000 + 1011 = 10011
Только такой вижу! Умножать на 2 нельзя - сразу получится четное число, из которого никак прибавляя и ли умножая на 2 нечетное число (17) не получить!
11111111
Ну ты хоть картинку скинь с этой страницой
<u>// PascalABC.NET 3.2, сборка 1417 от 28.03.2017</u>
<u>// Внимание! Если программа не работает, обновите версию!</u>
function gcd(a,b:integer):integer; // НОД
begin
while b<>0 do begin a:=a mod b; Swap(a,b) end;
Result:=a
end;
begin
var a:=ReadArrInteger('Введите 10 натуральных двухзначных чисел:',10);
var g:=gcd(a[0],a[1]);
for var i:=2 to 9 do g:=gcd(g,a[i]);
Writeln('НОД=',g)
end.
<em>Пример</em>
Введите 10 натуральных двухзначных чисел: 38 42 56 82 96 32 18 40 58 90
НОД=2