Решить хотябы 1. сообщение занимает 3 страницы и содержит 7875 байтов информации. сколько строк в тексе, если символов в строке 50 и при составлении этого сообщения использовали 128 - символьный алфавит? сообщение, записанное буквами из 256-символьного алфавита содержит 250 символов. какой объем информации оно несет?

                        формула: n=2^i 1)7875*8/7=9000(перевод в бит и после в символы) 128=2^7 2)9000/3=3000 3)3000/50=60(строк)                       формула: n=2^i 1)256=2^8 2)8*250=2000(бит)

1) var  a, b: array[1..25] of integer;       i, x: integer;       begin      writeln('введите элементы массива a: ');       for i : = 1 to 25 do  begin        read(a[i]);           if a[i] mod 3 = 0 then        begin          x : = x + 1;           b[x] : = a[i];         end;       end;       write('элементы массива a, кратные трём: ');       for i : = 1 to x do  begin        write(b[i], ' ');       end;     end. 2) var  a, b, c: array[1..10000] of integer;       i, n, x: integer;         begin      writeln('введите размеры обоих массивов: ');       read(n);       write('введите элементы массива a: ');       for i : = 1 to n do  begin        x : = x + 1;         read(a[i]);       end;       write('введите элементы массива b: ');       for i : = 1 to n do  begin        read(b[i]);       end;       write('элементы массива c: ');       for i : = 1 to x do  begin        c[i] : = a[i];         write(c[i], ' ');         c[i] : = b[i];         write(c[i], ' ');       end;     end.