, 10. Введите электронную таблицу
необходимые данные
оформите их по образцу:

иван-занимается легкой атлетикой,петр-баскетболом, алексей-хоккеем, андрей-футболом

используется язык pascal

program pr;

var

  mas: array[1..7] of integer;

  i: integer;

begin

writeln('вводим значения в массив');

  for i: =1 to 7 do readln (mas[i]);

writeln('выводим значения из массива');

  for i: =7 downto 1 do writeln(mas[i]);

readln;

end;

2^i=n, n = 16

2^i=16

i=4 бит

50 * 4 = 200 бит

200: 8 = 25 байт

var a,b: string; begin                            cls;   read(a);     b: =a;           write('b')end.