avast!
Dr.Web 360 Total Security Kaspersky
Panda Free Antivirus
Norton Internet Security
ESET NOD32 Smart Security
F—Secure Internet Security
Bitdefender Internet Security
AVG Internet Security
Ну, раз заменять предложение, то...)
var a: string;
begin
readln(a);
if (a = 'Не то предложение') then a := '...';
writeln(a);
<span>end.</span>
// PascalABC.NET 3.3, сборка 1576 от 16.11.2017
// Внимание! Если программа не работает, обновите версию!
Begin
var n:= readlnInteger('n =');
var a:= ReadlnString.ToIntegers;
SetLength(a, n);
var k:= a.where(t -> (t>100)and(t mod 7 = 0)).Count;
Writeln(k);
end.
290 * 39 * 67 = 757770 символов
Для кодирования одного символа требуется 1 байт, значит для кодирования 757770 символов потребуется 757770 байт.
757770 байт = 740 кбайт = 0,72 мбайт
Значит, книгу можно разместить на дискете