А=J*D*t= 16*16000*30= 7680000 бит = 7680000/8=960000 байт= 960000/1024= 937,5 Кбайт
Var r,v:integer;
begin
read(r,v);
if (v < r-105) then write(' < ') else
if (v > r - 95) then write(' > ') else
write(' HOPM ');
end.
НА пример:
var
a,b:=integer
begin
writeln('Введите число а');
read(a);
writeln('Введите число b');
read(b);
end.
Получается, что writeln Выводит на экран, что ты ввёл/ввела в скобках.
Program t2; var a: integer; Begin write ('Введите колличество суток'); read (a);writeln ('Колличество часов ', a*24);writeln ('Колличество минут ',a*24*60);writeln ('Колличество секунд ',a*24*60*60); end.
А) V = D * t * i * k
V - информационный объем файла
D - частота дискретизации
t - время звучания
i - глубина кодирования 1 сигнала
k - количество каналов
D1 = 8 кГц = 8000 Гц
t = 1 мин = 60 секунд
k = 1 канал (моно-)
i1 = 16 бит = 2 байта
V1 = 8000 Гц * 60 c * 2 байта * 1 = 960000 байт = 937,5 килобайт = 0,91 мегабайт - информационный объем 1 звукового файла
D2 = 24 кГц = 24000 Гц
t = 1 мин = 60 секунд
k = 1 канал (моно-)
i2 = 16 бит = 2 байта
V2 = 24000 Гц * 60 c * 2 байта * 1 = 2880000 байт = 2812,5 килобайт = 2,75 мегабайт
- информационный объем 2 звукового файла
Детская песня - Колыбельная медведицы - 2,09 мегабайт меньше 2 объема на 0,66 Мб и больше 1 объема на 1,18 Мб
Песня Валентины Толкуновой Тебя любила - 1,05 Мб больше 1 объема на 0,14 Мб, меньше второго объема на 1,7 Мб