77=7*11
В классе 7 мальчиков и 11 девочек
ИЛИ 7 девочек и 11 мальчиков
Всего 7+11 =18 человек
785*3 - ответ будет в битах
785*3/8 - ответ в байтах
785*3/8/1024 - ответ в КБайтах
Ответ примерно равен 0.29КБайтам.
Если в 8-ми символьном алфавите для одного символа используется 3 бит информации.
Ответ: 2355бит или 294,375байт или 0.29КБайт
1)Переведём Кбайты в бит: 1437*1024*8=11771904 бит
2)Переведём минуты в секунды: 7 минут 59 секунд= 479 секунд.
3)Вычисляем скорость: 11771904бит/479секунд=24576бит/с=3072байт/с=3Кбайт/с
Const nx = 20;mx = 20;var x: array[1..nx, 1..mx] of integer; i, j, n,m,q,r: integer;k:boolean; b: array[0..nx] of integer;beginWriteln('Введите число строк n ');Read(n);Writeln('Введите число столбцов m ');Read(m);b[0]:=1;if n >= m thenfor i := 1 to n do beginb[i]:=b[i-1]*2;q:=n;endelsefor i := 1 to m do beginb[i]:=b[i-1]*2;q:=m;end;write(b:3); Randomize; Writeln; Writeln('Исходный массив'); for i := 1 to n do begin for j := 1 to m do begin x[i, j]:=Random(10); Write(x[i, j]:4); end; Writeln; end; Writeln; Writeln; for i := 1 to n do begin for j := 1 to m do begin for r:=0 to q do if (i = b[r])or (j = b[r]) then k:= true; if k = true then Write(x[i, j]:4) else Write(' '); k:=false; end; Writeln; end; end.
Для выбора действий пользователя.Если бы не было меню,то все возможные действия программы вываливались на экран