ВИЗНАЧИТИ МІСЦЕ РОЗМІЩЕННЯ КОЖНОГО З ГЕОМЕТРИЧНИХ ТІЛ ВІДНОСНО ІНШИХ ДЛЯ НАВЕДЕНИХ ТРЬОХ ВАРІАНТІВ. РЕЗУЛЬТАТИ ЗАНЕСТИ У ТАБЛИЦЮ, ПОЗНАЧИВШИ МІСЦЕ НА ПЕРЕДНЬОМУ ПЛАНІ - 1.

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.

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

ответ 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.