Определим последовательности an и bn следующим образом: a1 = 2, a2 = 3, a3 = 4, a4 = 7, a5 = 13, an = bn−1 + bn−3, n > 5, bn — последовательность чисел, не входящих в an, записанных в возрастающем порядке.таким образом, последовательность an будет выглядеть следующим образом: 2, 3, 4, 7, 13, а последовательность bn – 1, 5, 6, 8, 9, ваша состоит в том, чтобы найти an и bn.входные данныевходной файл содержит целое число n (1 ≤ n ≤ 10000выходные данныев первой строке выходного файла выведите an, во второй – bn.напримерinput4output78

11001000

Объяснение:

1. Для получения прямого кода надо перевести число в двоичную систему счисления, дополнить слева незначащими нулями до необходимого разряда, первый (левый) разряд отводится под знак числа (если число положительное, то в левый разряд записывается 0, а если число отрицательное, то в левый разряд записывается 1)

56/2 = 28 и остаток 0

28/2 = 14 и остаток 0

14/2 = 7и остаток 0

7/2 = 3 и остаток 1

3/2 = 1 и остаток 1

1/2 = 0 и остаток 1

56₁₀ = 111000₂

Прямой код: 10111000

2. Обратный код для положительного числа совпадает с прямым кодом. Для отрицательного числа все цифры числа заменяются на противоположные (1 на 0, 0 на 1), а в знаковом разряде остаётся единица

Обратный код: 11000111

3. Дополнительный код положительного числа совпадает с прямым кодом. Для отрицательного числа дополнительный код образуется путем добавлением к младшему разряду обратного кода единицы (сложение в двоичной системе счисления)

1 + 1 = 10 (0 пишем, 1 в уме)

1 + 1 (из ума) = 10 (0 пишем, 1 в уме)

1 + 1 (из ума) = 10 (0 пишем, 1 в уме)

0+ 1 (из ума) = 1 (1 пишем)

сносим остальные цифры

Дополнительный код: 11001000

{предлагаю немного другой алгоритм решения} program math; var x1,x2,d,e,f, a, b, c: real; begin writeln('решение квадратного уравнения(ax^2+bx+c=0).'); write('введите a: '); readln(a); write('введите b: '); readln(b); write('введите c: '); readln(c); d: =sqr(b)-4*a*c; writeln('вы ввели: '); writeln('a=',a: 6: 2); writeln('b=' ,b: 6: 2); writeln('c=',c: 6: 2); writeln(' дискриминант: d=b*b-4*a*c=',d: 6: 2); if (d> 0) then begin e: = (-b/(2*a)); f: = (sqrt(d)/(2*a)); writeln('d> = 0, значит корни действительные: '); writeln('x1= ',(e-f): 6: 2); writeln('x2= ',(e+f): 6: 2); end; if (d=0) then writeln('d=0, значит уравнение имеет 1 корень: x1= ',-b/2*a: 6: 2); if (d< 0) then writeln(' d< 0, корней нет '); end.