Последний столбец заполнен неправильно. Должно быть:
х
х+25
х+150
х+114
114
570
285
Ответы одинаковые потому что в пятой строке вычитается переменная и, таким образом, выражение имеет только константы, соответственно, результат не зависит от переменных.
(При чем тут информатика?)
1. Для хранения одного из 64 цветов требуется log(2)64 = 6 бит (2^6=64); для хранения одного из 32 цветов требуется log(2)32 = 5 бит (2^5=32).
Объем видеопамяти = 3*6*980*820 бит = 3*6*980*820/8 байт = 1808100 байт. Требуемый объем - 2*5*1024*880 бит = 2*5*1024*880/8 байт = 1126400.
1126400 < 1808100 ⇒ ответ на вопрос: можно
2. Для хранения одного из 4 цветов требуется log(2)4 = 2 бита (2^2=4); для хранения одного из 64 цветов требуется log(2)64 = 6 бит (2^6=64).
Объем файла после изменения палитры уменьшится в 6/2 = 3 раза.
3. 375 Кбайт = 375*1024 байт = 375*1024*8 бит
Память для одного пикселя = 375*1024*8 / (640*480) = 10 бит.
Максимально возможное число цветов = 2^10 = 1024
4. Размер цифрового моноаудиофайла измеряется по формуле:
A = D*T*i,
где D – частота дискретизации (Гц), T – время звучания или записи звука, i - разрядность регистра (разрешение или глубина кодирования звука).
20 Мбайт = 20*1024 Кбайт = 20*1024*1024 байт = 20*1024*1024*8 бит.
20 мин = 20*60 с
D = 20*1024*1024*8 / (20*60*8) ≈ 17476,3 Гц
PROGRAM LGJ;
var
m,n:real;
begin
writeln('введите длинну ткани');
readln(m);
writeln('введите отрезаюмую длинну');
readln(n);
if m<n then
writeln('материала не хватает!');
<span>end.</span>
0,041696 1 мб 1000кб . 1000мб 1гб
Var P:array [0..12] of integer;i:integer;b:real;beginb:=0;for i:= 0 to 12 do beginP[i]:=random(0,12);b:=b+P[i];end;b:=b/13;write(b:5:2);end.