4.52. вася пытается высунуть голову в форточку размерами a и b см. приняв ус- ловно, что его голова — круглая диаметром d см, определить, сможет ли вася сделать это. для прохождения головы в форточку необходим зазор в 1 см с каждой стороны. 4.53. даны вещественные положительные числа a, b, c, x, y. выяснить, пройдет ли кирпич с ребрами a, b, c в прямоугольное отверстие со сторонами x и y. про- совывать кирпич в отверстие разрешается только так, чтобы каждое из его ре- бер было параллельно или перпендикулярно каждой из сторон отверстия. 4.54. пассажир должен был сдать в камеру хранения пустой чемодан в форме па- раллелепипеда размерами 1a , 2 a и 3a см и коробку размерами 1b , 2b и 3b см. оплачивать нужно каждый размещаемый предмет. определить, сможет ли пассажир на оплате, поместив коробку в чемодан так, что стороны чемодана и коробки будут параллельны либо перпендикулярны друг другу.
217
482
Ответы на вопрос:
Program p452; var a,b,m,d: integer; begin write('введите размеры форточки (а,b) в см: '); read(a,b); write('введите диаметр головы васи в см: '); read(d); if a< b then m: =a+2 else m: =b+2; { +2 - это зазор по 1 см с обоих сторон } if d< =m then writeln('голова проходит') else writeln('голова не проходит') end. тестовое решение: введите размеры форточки (а,b) в см: 25 40 введите диаметр головы васи в см: 23 голова проходит program p453; var a,b,c,x,y,m1,m2,n1,n2: integer; begin write('введите размеры кирпича в см (a,b,c): '); read(a,b,c); write('введите размеры отверстия в см (x,y): '); read(x,y); if a< b then if a< c then begin m1: =a; if b< c then m2: =b else m2: =c end else begin m1: =c; m2: =a end else if b< c then begin m1: =b; if a< c then m2: =a else m2: =c end else begin m1: =c; m2: =b end; if x< y then begin n1: =x; n2: =y end else begin n1: =y; n2: =x end; if (m1< =n1) and (m2< =n2) then writeln('кирпич пройдет в отверстие') else writeln('кирпич не пройдет в отверстие') end. тестовое решение: введите размеры кирпича в см (a,b,c): 10 4 12 введите размеры отверстия в см (x,y): 5 9 кирпич не пройдет в отверстие program p454; var a,b: integer; begin write('введите значения а и b: '); read(a,b); writeln('размеры чемодана ',3*a,'x',2*a,'x',a); writeln('размеры коробки ',3*b,'x',2*b,'x',b); if b< a then writeln('коробка поместится в чемодан') else writeln('коробка не поместится в чемодан') end. тестовое решение: введите значения а и b: 18 16 размеры чемодана 54x36x18 размеры коробки 48x32x16 коробка поместится в чемодан
сам думай ха ха ха хаха ха ха ха ха хаха ха ха ха ха хаха ха ха ха ха хаха ха ха ха ха хаха ха ха ха ха хаха ха ха ха ха хаха ха ха ха ха хаха ха ха ха ха хаха ха ха ха ха хаха ха ха ха ха хаха ха ха ха ха хаха ха ха ха ха хаха ха ха ха ха хаха ха ха ха ха хаха ха ха ха ха хаха ха ха ха ха хаха ха ха ха ха хаха ха
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
gentleman205.03.2020 03:18
-
Igarexaaa114.07.2022 01:59
-
пусто221.04.2023 18:54
-
valeria210608.04.2021 18:04
-
Ole4ka213506.10.2020 06:26
-
onkyyyyyyy08.10.2022 22:59
-
milerowskaya29.10.2021 13:43
-
grrra105.02.2022 03:25
-
tanyagrygorieva05.03.2022 11:28
-
DixonVeit30.12.2020 10:53
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.