1. Для кодирования одного пикселя, который может принимать один из 16 цветов необходимо
i1 = ln(16) = 4 бит;
Для кодирования одного пикселя, который может принимать один из <span>4294967296</span> цветов необходимо <span>i2 = ln(1</span><span>4294967296</span><span>) = 32 бита;</span>
<span>Ответ: P = i2/i1 = 8 - во столько раз увеличится объем занимаемой памяти изображения.</span>
<span>2. Определим количество памяи которое занимает изображение:</span>
<span>S = 640*480*3= 921600 ,байт</span>
Определим скорость модема:
Ответ: V = 921600/256 = 3600 байт/с
Вставляешь флешку - она появляется в "мой компьютер" как новый диск , тыкаешь правой кнопкой , и там будет "форматировать"
<span>512 000*(4*60) = 122 880 000 бит
<span>122880000 / 8 / 1024 = 15 000 килобайт</span></span>
Для случайных чисел:
var
a: array[1..5] of integer;
i: integer;
begin
randomize;
for i:=1 to 5 do
a[i] := random(100);
for i:=1 to 5 do
write(a[i], ' ');
writeln;
for i:=1 to 5 do
a[i] := a[i] * i;
for i:=1 to 5 do
write(a[i], ' ');
end.
Для ручного заполнения:
var
a: array[1..5] of integer;
i: integer;
begin
for i:=1 to 5 do
readln(a[i]);
for i:=1 to 5 do
write(a[i], ' ');
writeln;
for i:=1 to 5 do
a[i] := a[i] * i;
for i:=1 to 5 do
write(a[i], ' ');
end.
Var n,a,h,m,s:integer;
begin
writeln('Введите кол-во дней');
read(n);
if n>1 then begin
writeln('В ', n ,' сутках:');
writeln(n*24,' часа');
writeln(n*24*60,' минут');
writeln(n*24*60*60,' секунд')
end;
if n=1 then begin
writeln('В ',n,' дне');
writeln(n*24,' часа');
writeln(n*24*60,' минут');
writeln(n*24*60*60,' секунд');
end;<span>
end.
</span>
