<em>И снова - приятно, когда кратко))
// PascalABC.NET 3.2, сборка 1483 от 14.06.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var w:=ReadAllText('in.txt'); w.Println;
var s:=w.MatchValues('\b[A-Za-z]+\b').JoinIntoString(' ');
s.Println; WriteAllText('Eng.txt',s);
s:=w.MatchValues('\b[А-Яа-яЁё]+\b').JoinIntoString(' ');
s.Println; WriteAllText('Rus.txt',s);
end.
<u>Пример (читаем in.txt, пишем в Eng.txt и Rus.txt)</u>
The Флегматичная ЭтА QuICk веРБлЮдица broWN ЖУЕТ fox JuMpS у подъезда over The ЗаСыХающИЙ LAZY ГорькиЙ dog шиПоВНиК
The QuICk broWN fox JuMpS over The LAZY dog
Флегматичная ЭтА веРБлЮдица ЖУЕТ у подъезда ЗаСыХающИЙ ГорькиЙ шиПоВНиК
1) дерево
2)дерево
3)60 см
4) 1000см²
5) коричневый
6) ну уже сам(а) напиши!
1) Узнаем сколько фото:
600 Мбайт = 600 000 Кбайт.
600 000 / 500 = 1 200 (фото)
2) Узнаем сколько нужно времени:
1 фото = 6 (сек).
1 200 * 6 = 7 200 (сек) = 120 (мин) = 2 (ч)
Ответ: 2 часа.
Частота дискретизации 44000 предполагает хранение 44000 отсчетов в секунду. При разрядности 16 бит = 16/8 = 2 байта, потребуется 44000·2 = 88000 байт для хранения информации за 1 секунду. А за минуту - в 60 раз больше, т.е. 60·88000 байт = 5280000 байт = 5280000/1024 Кбайт = 5156.25 Кбайт = 5156.25/1024 ≈ 5.035 Мбайт.
Тогда на диске объемом 700 Мбайт поместится примерно 700/5.035 = 139 минут записи.