Program nums;
<span>var num:array[1..1000] of integer;
</span><span>var i,maxnum: integer;
</span><span>
begin
</span><span>Randomize;
</span><span>for i:=1 to 1000 do num[i] := random(1000000);
</span><span>for i:=1 to 1000 do
</span><span>begin
</span><span>if num[i] > maxnum then maxnum:=num[i];
</span><span>end;
</span><span>Writeln('самое большое число ',maxnum);
</span><span>end.</span>
Носитель информации - это тот объект, который информацию может хранить и передавать. В системе "человек - телевизор", носителем будет телевизор, ибо он передаёт человеку информацию, а не наоборот
program name;
const
n:=15
var
i,a:array[1..n] of integer;
begin
for i:=1 to n do begin
random(a[i]);
writelm(a[i]);
end;
end.
Пол задания
1) 32х32=1024 пикселей
16 градаций уместится в 4 битах (2^4=16)
1024х4=4096 бит = 512 байт = 0,5 кбайт
2)512х256=131072 пикселей
64КБ=65536 Байт = 524288 бит
524288/131072=4 бита на пиксель
2^4=16 цветов в изображении
1) Высчитаем суммарное количество символов: 32*64*8=16384 (символа)
2) Высчитаем суммарное количество бит: 16*16384=262144 (бит)
3) Переводим биты в байты (1 байт = 8 бит): 262144/8=32768 (байт)
4) Переводим байты в килобайты (1 КБ = 1024 Б): 32768/1024=32 (килобайта)
Ответ: <u><em>32 КБ</em></u>