//PascalABC.NET 3.1 сборка 1200
begin
repeat
var n := Random(1000);
if n mod (5 * 7) = 0 then begin
write(n);
Readln;
end
until false;
end.
Чебурашку:С новым годом малыш расти очень большой. Крокодила Гену:воспитывай малыша порядочно С новым годом.
Исполнитель (для количества слов исполнитель,исполнитель,исполнитель,исполнитель)
Для кодирования использовалась восьмибитная кодировка, значит на один символ приходится 1 байт памяти.
Количество символов равно 256*40*60
Каждый символ равен 1 байту, значит объем текста в байтах равен количеству символов.
Переведём объем в килобайты:
(256*40*60) / 1024 = (2^8*40*60) / 2^10 = 2^(-2)*40*60 = 600 Кбайт
<span>P.S.: Сильно хотел написать ответ во¬т т¬ак, чт¬о б¬ы н¬ел¬ьз¬я б¬ыл¬о п¬ро¬чи¬тат¬ь, но Alviko не оценит:(</span>