(x1+x2)/2
Можешь не благодарить.
Const n=20;
var a:array[1..n] of integer;
b,c,i:integer;
begin
Randomize;
for i:=1 to n do
begin
b:=random(8)+1;
c:=random(9-b)+b+1;
a[i]:=b*10+c;
write(a[i]:4);
end;
writeln;
end.
Пример:
<span> 89 67 19 69 49 67 45 26 79 69 67 79 78 16 38 69 35 57 79 46</span>
1. Вычёркиваем числа 10, 95 (числа записаны в порядке убывания)
2. Вычёркиваем число 25 (числа 2 и 5 не являются квадратами каких-либо чисел)
3. Подбираем исходные числа для оставшихся результатов работы автомата:
11 -> 10 (1^2+0^2=1; (1+0)^2=1)
2036 -> 42 (4^2+2^2=16+4=20; (4+2)^2=36)
3264 -> 44 (4^2+4^2=16+16=32; (4+4)^2=64)
6581 -> 81 (8^2+1^2=64+1=65; (8+1)^2=81.
<span>При нахождении наибольшего общего делителя отрицательные числа можно заменить их абсолютными величинами, то есть, НОД(−585, 81, −189)=НОД(585, 81, 189). Разложения чисел 585, 81 и 189 на простые множители имеют соответственно вид585=3·3·5·13, 81=3·3·3·3 и 189=3·3·3·7. Общими простыми множителями этих трех чисел являются 3 и 3. Тогда НОД(585, 81, 189)=3·3=9, следовательно,НОД(−585, 81, −189)=9.</span>Ответ:<span>НОД(−585, 81, −189)=9.</span>
254 : 2 = 127 (остаток от деления 0)
127 : 2 = 63 ( остаток от деления 1)
63 : 2 = 31 ( остаток от деления 1)
31 : 2 = 15 ( остаток от деления 1)
15 : 2 = 7 ( остаток от деления 1)
7 : 2 = 3 ( остаток от деления 1)
3 : 2 = 1 ( остаток от деления 1)
Остаток от деления записывается в обратном порядке, получаем:
254 = 11111110