Просыпаюсь >потягиваюсь >встаю с кровати>иду чистить зубы>одеваюсь>обуваюсь >иду до школы и тд.
Const n = 100;
const m = 50;
var a:array[1..n] of integer;
b:array[1..n] of integer;
i,it,bo:integer;
begin
for i:= 1 to n do
a[i] := trunc(Random(100));
for i:= 1 to m do
b[i] := trunc(Random(100));
bo:=1;
for i:=1 to m do
if bo = 1 then
for it:=1 to n do
if b[i] <> a[it] then begin bo:= 0; break; end;
if bo = 1 then write('Входят') else write('Не входят');
end.
если я правильно понял задание то так
Скорость сканирования - 4 страницы в минуту.
Отсканировали 5 минут.
5*4=20 - именно столько страниц отсканировали за 5 минут.
20*40*50=40000 именно столько символов было отсканировано на 20 страницах.
Далее находим "вес" одного символа.
Нам дан алфавит мощностью 256 символов.
256 это 2 в 8 степени, это значит, что один символ кодируется 8 битами=1байт.
Если 40000 символов кодируется 1 байт на символ, то текстовой документ будет нести 40000 байт информации.
Ответ: 40000 байт.