Сpascal ! : массив а задается с клавиатуры. создайте массив б состоящий из четных чисел массива а. (отвечу взаимной по другим предметам ! заранее ! p.s. , , не отвечайте ради дело серьёзное )

Const n=10; var a,b: array[1..n]of integer; i,k: integer; begin     for i: =1 to n do         read(a[i]);                 for i: =1 to n do                       if a[i] mod 2=0 then                             begin                                   k: =k+1;                                   b[k]: =a[i];                             end; writeln;               for i: =1 to k do                     write(b[i]: 4); end.

Десятичная система счисления - система, в основании которой лежит число 10. любое число может быть представлено в виде суммы различных, последовательно убывающих, степеней числа 10 с множителями от 0 до 9. например:       428₁₀ = 4*10² + 2*10¹ + 8*10⁰ = 400 + 20 + 8   2376₁₀ = 2*10³ + 3*10² + 7*10¹ + 6*10⁰= 2000 + 300 + 70 + 6 в самой записи числа степени основания системы опускаются, и записываются только множители. практически любое число может быть записано в любой системе счисления. однако, для систем счисления, в основании которых лежат числа, большие 10, необходимо ввести обозначения для коэффициентов 10; 11; 12; 13 и т.д. например, в шестнадцатеричной системе счисления в качестве коэффициентов при степени основания системы используются числа от 0 до 15. для 10 вводится обозначение а, для 11 - в, для 12 - с и т.д. число 332 в шестнадцатеричной системе счисления будет выглядеть так :           332₁₀ = 1*16² + 4*16¹ + 12*16⁰ = 14с₁₆ двоичная система счисления имеет в своем основании число 2, и все числа представляются в виде суммы последовательно убывающих степеней числа 2 с множителями 0 и 1. например,         332₁₀ = 1*2⁸ + 0*2⁷ + 1*2⁶ + 0*2⁵ + 0*2⁴ + 1*2³ + 1*2² + 0*2¹ + 0*2⁰ =                   =  101001100₂           таким образом, для перевода числа из десятичной системы счисления в двоичную необходимо взять ближайшую к данному числу степень двойки: 2⁰ = 1 2¹ = 2 2² = 4 2³ = 8 2⁴ = 16 2⁵ = 32 2⁶ = 64 2⁷ = 128 2⁸ = 256      и т.д. допустим, нам нужно перевести число 82 в двоичную запись. ближайшая степень двойки - 2⁶ = 64 поэтому пишем:                                             82₁₀ = 1*2⁶ + так как 82 - 64 = 18, то пятой степени двойки в записи нет (2⁵ = 32, а у нас только 18). поэтому дальше пишем 0*2⁵                                             82₁₀ = 1*2⁶ + 0*2⁵ + следующая степень двойки - 2⁴ = 16. пишем далее 1*2⁴                                             82₁₀ = 1*2⁶ + 0*2⁵ + 1*2⁴ + у нас осталось 2. это 2¹ = 2, поэтому ни 2³ = 8, ни 2² = 4 в записи нет.                                             82₁₀ = 1*2⁶ + 0*2⁵ + 1*2⁴ + 0*2³ + 0*2² + 1*2¹ + число составлено:                                             82 = 64 + 0 + 16 + 0 + 0 + 2 = 82 однако, осталась последняя степень двойки, - нулевая, которую в записи числа необходимо отобразить:   0*2⁰                                             82₁₀ = 1*2⁶ + 0*2⁵ + 1*2⁴ + 0*2³ + 0*2² + 1*2¹ + 0*2⁰ теперь записываем в ряд множители, стоящие перед степенями двойки:                                             82₁₀ = 1010010₂ это и есть число 82, записанное в двоичной системе счисления. есть другой способ перевода числа из десятичной записи в двоичную для этого его необходимо последовательно делить на 2 до тех пор, пока не останется остаток, меньший или равный 1. число в двоичной системе записывается как последовательность последнего результата деления и остатков от деления в обратном порядке:                                         82 : 2 = 41 : 2 = 20 : 2 = 10 : 2 = 5 : 2 = 2 : 2 = 1                                        82                40                20              10               4                2                                                                                                                     0                   1                    0                  0              1                0 теперь записываем результат и остатки в обратном порядке:                                         82₁₀ = 1010010₂ ps. все перечисленные системы счисления являются позиционными, в отличие от непозиционной (например, римской системы счисления). то есть от положения цифры в записи числа зависит величина, которую эта цифра обозначает: в числе 10 единица обозначает количество десятков, а в числе 1000 та же единица обозначает количество тысяч.

Var k: integer; begin k: =0; while k*4< =64 do begin   writeln('кроликов: ',k,', гусей: ',(64-k*4) div 2);   k: =k+1;   end; end. результат: кроликов: 0, гусей: 32кроликов: 1, гусей: 30кроликов: 2, гусей: 28кроликов: 3, гусей: 26кроликов: 4, гусей: 24кроликов: 5, гусей: 22кроликов: 6, гусей: 20кроликов: 7, гусей: 18кроликов: 8, гусей: 16кроликов: 9, гусей: 14кроликов: 10, гусей: 12кроликов: 11, гусей: 10кроликов: 12, гусей: 8кроликов: 13, гусей: 6кроликов: 14, гусей: 4кроликов: 15, гусей: 2кроликов: 16, гусей: 0