Синтез 9. Разгадайте анаграммы, относящиеся к информатике. Опреде лите кодирования. После расшифровки определите, како слово здесь лишнее. 1) НОФЕЛТЕ, МЕДО, ТФЕЕЛКСА, ТЬАЯПМ. 2) УХЛС, УСКВ, ИЕНЯНООБ, ГОМЗ. 3) КАБОТРАОБ, ИЕНЕXРНА, ТОРЛЯКУКАЛЬ, EEAАПРДЧ. 4) КАЧто, АОНТ, КВАУБ, РАЦФИ. 5) МЕТРАРИФОМ, ТЫЕСЧ, ТОРКАЛЯЛЬКУ, ДОВОСКИД. Примечание. Анаграмма – слово или словосочетание, образо- ванное путем перестановки букв, составляющих другое слово, Например, нос - сон, липа – пила

ответ 3)
Объяснение.
НЕ ( x < 6 )  это x >= 6.Получаем x>= 6 или (x < 5 и x >= 4).
true это правда.
false это ложь.
И(Конъюнкция) это логическая операция,которая возвращает true если обе части уравнения равны true.
Или(Дизъюнкция) это логическая операция,которая возвращает false когда обе части уравнения равны false. 
Итак, нам нужно чтобы обе части уравнения были false.
Вариант 1 сразу не подходит,т.к. 7 больше 6.
Вариант 2 тоже не подходит,потому что 6 = 6.
Вариант 3 подходит.
Вариант 4 не подходит,ведь 4 не меньше 5.

Program massa;var m, a: real;     begin       writeln('Введите массу.');       readln(m);       writeln('Введите единицу измерения массы. 1 - килограмм, 2 - миллиграмм, 3 - грамм, 4 - тонна, 5 - центнер.');       readln(a);       writeln('Введённое вами значение равно ');        if a=1 then write(m, ' килограмм.');        if a=2 then write(m/1000000, ' килограмм.');        if a=3 then write(m/1000, ' килограмм.');        if a=4 then write(m*1000, ' килограмм.');        if a=5 then write(m*100, ' килограмм.');      end.

меее, немного с окончаниями напортачила, но если надо, то можно просто до кг сократить и всё будет ок