Используем закон де-Моргана (дважды), закон двойного отрицания и закон поглощения. Получим:
¬А∧В∨¬В∧<span>С
Подробности в приложенном файле.
</span>
Var x, l: integer;
begin
readln(x);
l := Trunc(Log10(Abs(x)));
if l = 2 then
writeln (x)
else
writeln('число не трехзначное');
<span>end.</span>
А-Архиерейсткое(Татарстан)
В-Великое(Владимирская область),Виктория
М-медвежье(Аляска)
Д-Дубовое озеро
Звери
антилопа,амасяга
верблюд,волк,выдра
дикобраз,динго
птицы
аист,ара,арама
люрик,ласточка
марабу,маёвка
Города
Липецк
Луганск
Люберцы
Лабинск
Файл во вложении. Если я правильно поняла, то каждый день просрочки начисляется пени. Если книга была больше 30 дней