Если считать, что скорость передачи данных в канале связи постоянна, то соотношение между временем передачи неупакованного и упакованного файла будет равно соотношению размеров передаваемых файлов.
Передача упакованного файла происходит за 20-10=10 секунд (мы вычли время на упаковку и распаковку). А передача неупакованного происходит за 1 минуту 20 с, т.е. за 1 х 60 + 20 = 80 секунд.
80 / 10 = 8. Неупакованный файл передается медленнее в 8 раз, следовательно, он в 8 раз больше, чем упакованный.
Тогда упакованный файл имеет размер 24 МБ / 8 = 3 МБ
<u><em>Ответ:</em></u> 3 МБ
Нужно добавить всего-то 1 строку:
...
if pos(copy(stroka,i,1),' ,.?!-:;') <> 0 then
{если i-ый символ из строки stroka содержится в строке ' ,.?!-:;', то}
begin
slovo := copy(stroka,1,i-1); // копируем слово
If (slovo[1]='л') or (slovo[Length(slovo)]='ь') then Writeln(Slovo);
delete(stroka,1,i-1); // Удаляем его из текста
while (length(stroka)>0)and (not(stroka[1] in b)) do
delete(stroka,1,1); // удаляем все разделители до следующего слова
i := 1; // снова рассматриваем слово с первого символа
end
....
Если надо в константы переделать - пиши, переделаю ;)
Одно из правил это : 1. Основное освещение не должно превышать по яркости саму яркость монитора. 2. Яркость и контрастность монитора, это нужно самому настраивать индивидуально только под себя. 3. Уровевь размещения монитора чтобы глаза смотрели на монитор а не под монитор. 4. работа закомпьютором не должна превышать 7-9 часов и перерыв для отдыха продолжительностью 15 минут, через каждый час работы
1)20+50+63=133(всего денег потрачено на продукты).
2) 500-133=367(остаток денег, после покупки продуктов)
а как в паскале делать, не догадываюсь, что если, то есть) не судите строго, хоть чем-то помогла))
