16 = 2⁴, поэтому один символ алфавита весит 4 бита.
64 × 4 = 256 бит = 32 байта
Var m1, V1: integer; {первое тело}
m2, V2: integer; {второе тело}
begin
Write('Введите массу первого тела в граммах'); ReadLn(m1);
Write('Введите объем первого тела в кубических сантиметрах'); ReadLn(V2);
Write('Введите массу второго тела в граммах'); ReadLn(m2);
Write('Введите объем второго тела в кубических сантиметрах'); ReadLn(V2);
if (m1/V1)>(m2/V2) then WriteLn ('ПЛАВАЕТ')
else WriteLn('ТОНЕТ');
ReadLn;
end.
Z????.*
? - это строго один любой символ
* - это любое количество символов, даже может символ отсутствовать
Всего: три.
1. Детективы 21 ...................................250 Есть
2. Кулинария 23 ...................................280 Есть
3. <span>Детская литература 43........................... 230 Есть</span>
1 задача) 44000*16*60*2=10Мб
а для второй задачи я использовала ту же частоту и дискретизацию.
700Мб=5872025600 бит
t=5872025600/(44000*16*2)=4170 сек= 1час 9.5 мин