Налить воду в 5 л ведро
Вылить в 9 л ведро
Снова налить в 5 л ведро И вылить в 9 л
И в 5л ведре останется 1 литр
<h2>Задание 1.</h2>
3 кбайта= 3*1024*8=24576 бит
1 мбайт = 1*1024*8=8196 байт
4096 бит =4096\8\1024= 0.5 кбайта
2.5 мбайт=2.5*1024=2560 кбайт
<h2>Задача 2.</h2>
k-120 символов
N(мощность алфавита) = 512=> i=9 бит
I=k*i
<u><em>I=120*9=1080 бит</em></u>
<h2>Задача 3.</h2>
I=2 кб
k=4096 символов
N=2^i I=k*i <em>i= 2*1024*8/4096=4</em>
<em><u>2^4=16 - ответ</u></em>
<h2>Задача 4.</h2>
Племя мульти:
N=64 => i=6 бит
Значит 150*6=900 бит
Племя пульти:
N=512 =>i=9 бит
Значит 50*9=450 бит
<h2>Задача 5.</h2>
I=8 кб
N=16 => i=4
k-? k=I/i <em>k=8*1024*8/4=16 384 - всего символов</em>
<u><em>16 384/512=32 страницы</em></u>
Видимо имеется ввиду выводящий максимальны элемент этого массива
В данном примере матрица формируется при помощи случайных чисел
program MatrixMax;
Uses Crt;
type matrix=array[1..4,1..4] of real;
var m:matrix;
max:real;
{Порождение матрицы случайным образом}
procedure Auto;
var i,j:integer;
begin
randomize;
for i:=1 to 4 do
begin
for j:=1 to 4 do
begin
m[i,j]:=25+random(21);
end;
end;
end;
{Вывод матрицы на экран}
procedure PrintMatrix(mas:matrix );
var j,k:integer;
begin
for k:=1 to 4 do
begin
for j:=1 to 4 do
begin
write(mas[k,j]:7:2);
end;
writeln;
end;
end;
{Нахождение максимального элемента}
procedure Мax;
var i,j:integer;
begin
max:=m[1,1]
for i:=1 to 4 do
begin
for j:=1 to 4 do
begin
if (max<m[i,j]) then max:=m[i,j];
end;
end;
end;
begin
Clrscr;
Auto;
PrintMatrix;
Max;
writeln;
writeln('Максимальный элемент матрицы: ',max);
end.
Таблица:
вадим олег высокий миша
скрипка ----- ----- +
флейта ----- + ----
альт + ---- ----
кларнет + ---- ----
гобой ---- + ----
труба ---- ---- + ( миша : скрипка и труба)