• Штирлиц поручил радистке Кэт подобрать чемодан для перевозки рации. Чемодан и рация имеют форму параллелепипеда. Рацию можно класть в чемодан только вертикально или горизонтально (рацию нельзя ставить под углом к дну чемодана). Боковые стенки рации должны быть параллельны боковым стенкам чемодана. Рация НЕ может поместиться в чемодане, если при этом какой–либо из ее размеров больше или равен соответствующему размеру чемодана. Ниже на рисунке приведены примеры неправильного и правильного размещения рации в чемодане. Напишите программу, которая подскажет радистке Кэт, поместится ли рация в чемодане.
    Входные данные
    В первой строке входных данных записано три числа – размеры рации в сантиметрах, а во второй – размеры чемодана в сантиметрах. Все числа целые положительные и не превосходят 100.
    Выходные данные
    В выходных данных требуется записать строку ПОМЕЩАЕТСЯ, если рация помещается в чемодане, или строку НЕ ПОМЕЩАЕТСЯ в противном случае.

Ответы 1

  • var x,y,z,x1,y1,z1:integer;beginwrite('введите высоту рации=>');readln(x);write('введите высоту рации=>');readln(y);write('введите высоту рации=>');readln(z);write('введите высоту чемодана=>');readln(x1);write('введите высоту чемодана=>');readln(y1);write('введите высоту чемодана=>');readln(z1);if ((x<x1) and (y<y1) and (z<z1)) then writeln('ПОМЕЩАЕТСЯ')   else writeln('НЕ ПОМЕЩАЕТСЯ');end.
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years