У меня 7 числа день рождения - информация понятная, актуальная если 7 число не наступило, и неактуально если полезная если я это говорю своему другу, и бесполезна если говорю мимо идущему прохожему которого вижу впервые, достоверная если я сказал правду, и недостоверная если солгал, полная если этого достаточно чтобы понять когда я родился(говорили про текущий месяц), и неполная если я просто так заикнулся не уточнив месяц, понятная если сказал на русском рускоязычному человек, непонятная если я сказал по русски тому кто русский не понимает(иностранцу к примеру). если смысл понятен то можно придумать много таких вариантов даже из одного примера, в принципе можно и на каждый случай отдельные приводить
Если вы утром собираетесь выходить из дома, то актуальная информация - сколько градусов на улице, неактуальная - сколько процентов голосов набрал Уго Чавес на первых выборах (оно вам надо знать с утра пораньше?) . Достоверная информация - например, дата рождения в вашем паспорте, недостоверная - тетя Маня сказала, что ее двоюродная прабабка родилась 13 мая, но у тети Мани склероз и маразм и никаких документов от прабабки не осталось. Объективная - это платье черного цвета, необъективная - вам кажется, что оно вам не идет. Полная - Москва - столица России, неполная - коты бывают рыжие и белые (можно дополнить серыми, черными и т. п. - поэтому неполная) Полезная - формулы сокращенного умножения на экзамене по математике, бесполезная - сообщение в СМИ о весе и росте наследника британского престола. Понятная - Петербург в советское время назывался Ленинградом, непонятная - Васиной собаке дали СС (в принципе, для меня - владелицы чистопородного племенного кобеля - очень даже понятная, а вот для человека, далекого от собачьих выставок - нет).
PascalABC.NET:
### var (x, y) := RR2; if x>y then x-=5 else if y>x then y-=5; Print(x, y)[any] Pascal
var x, y: real; begin read(x, y); if x>y then x := x - 5 else if y>x then y := y - 5; write(x, ' ', y) end.