Сформировать квадратную матрицу порядка n по заданному образцу (pascal) | 1 2 3 n-2 n-1 n | | 2 1 2 n-2 n-2 n-1 | | 3 2 1 n-4 n-4 n-2| | | |n-1 n-2 n-3 2 1 2 | | n n-1 n-2 3 2 1 |

begin

 var m := 5;

 var n := 5;

 var a := new integer[m, n];

 for var i := 0 to m - 1 do

   for var j := 0 to n - 1 do

   begin

     if j > i then a[i, j] := j - i + 1;

     if i = j then a[i, j] := 1;

     if i > j then a[i, j] := i - j + 1;

   end;

 a.Println;

end.

ответ:

отдел +;

использует приём из "", вывод из "";

пер

  n, сумма, сч, скор, макс: цел;

указ

  сумма : = 0;

  макс : = 0;

  вывод.цепь("введите число автомобилей: ");

  n : = приём.число();

  если n < 1 и n > 30 то вывод.цепь("^ошибка.") иначе

    вывод.цепь("^введите скорости: ^");

    от сч : = 1 до n вып

      скор : = приём.число();

      если n < 1 и n > 300 то вывод.цепь("^ошибка."); стоп(0) кон;

      увеличить(сумма, скор);

      если скор > макс то макс : = скор кон;

      вывод.цепь(" ")

    кон

  кон;

  вывод.чвещ("^средняя скорость: %.1f.^", сумма / n, 0, 0, 0);

  если макс > = 60 то вывод.цепь("yes") иначе вывод.цепь("no") кон

кон .

объяснение:

ответ:

один бит позволяет закодировать 2 значения (0 или 1).

используя два бита, можно закодировать 4 значения: 00, 01, 10, 11.

тремя битами кодируются 8 разных значений: 000, 001, 010, 011, 100, 101, 110,

111.

короче говоря:

1 бит кодирует –> 2 разных значения (21 = 2),

2 бита кодируют –> 4 разных значения (22 = 4),

3 бита кодируют –> 8 разных значений (23 = 8),

4 бита кодируют –> 16 разных значений (24 = 16),

5 бит кодируют –> 32 разных значения (25 = 32),

6 бит кодируют –> 64 разных значения (26 = 64),

7 бит кодируют –> 128 разных значения (27 = 128),

8 бит кодируют –> 256 разных значений (28 = 256),

9 бит кодируют –> 512 разных значений (29 = 512),

10 бит кодируют –> 1024 разных значений (210 = 1024).