Перевод из бит в мегабайт в с :80*10^20 бит в секунду = 0.00001 мегабайт в секундуперевод 1 м 20с в секунды : 80с находим файл : 80с * 0.00001 мегабайт в секунду = 0,0008 мегабайт
1)
Var x: real;
Begin
writeln ('Введите число');
readln (x);
if x>0 then
writeln ('Число ', x, ' положительное')
else
if x<0 then
writeln ('Число ', x, ' отрицательное')
else
if x=0 then
writeln ('Число ', x, ' не является ни положительным, ни отрицательным');
End.
2.
Var x, y: real;
Begin
writeln ('Введите два числа');
readln (x,y);
if x>y then writeln (x)
else
if x<y then writeln (y)
else
if x=y then writeln ('Числа равны');
End.
3.
Var x, sum, pr: real;
i: integer;
Begin
sum:=0;
pr:=1;
For i:=1 to 5 do
begin
write ('Введите число: ');
readln (x);
sum:=sum+x;
pr:=pr*x;
end;
writeln ('Сумма чисел = ', sum);
writeln ('Произведение чисел = ', pr);
if sum>pr then writeln (sum)
else
if sum<pr then writeln (pr)
else
if sum=pr then writeln ('Сумма и произведение равны');
End.
I = (x*y)*i
N=2^i
I-вес картинки в битах.. 128кбайт=128 *1024*8=1048576 (бит)
(x*y)-разрешение (1024*512)
i- глубина(битность) кодирования одного пикселя
N- количество цветов в палитре
из первого уравнения выражаем i=I / (x*y) = 1048576 / (1024*512) =2 (бита)
тогда N = 2^2=4
от-т: в палитре 4 цвета
змер изображения в пикселях — может выражаться в виде количества пикселей по ширине и по высоте (800×600px, 1024×768px, 1600×1200px и т. д.) или же в виде общего количества пикселей (так изображение размером 1600×1200px состоит из 1 920 000 точек, то есть примерно 2 мегапикселя);Растровая графика позволяет создать практически любой рисунок, вне зависимости от сложности, в отличие, например, от векторной, где невозможно точно передать эффект перехода от одного цвета к другому без потерь в размере файла;