Можно ли на прямоугольном участке застройки размером a b разместить два дома размерами p q и r s метров? - Pascal ABC

  1. Можно ли на прямоугольном участке застройки размером a b разместить два дома размерами p q и r s метров? Дома можно располагать только параллельно сторонам участка.


textual

Код к задаче: «Можно ли на прямоугольном участке застройки размером a b разместить два дома размерами p q и r s метров? - Pascal ABC»

program mojno;
uses crt;
var a,b,p,q,r,s:integer;
begin
 writeln('Введите стороны участка A и B через Enter');
 readln(a,b);
 writeln('Введите стороны дома P и Q через Enter');
 readln(P,q);
 writeln('Введите стороны дома R и S через Enter');
 readln(r,s);
 if a*b > ((r*s)+(p*q)) then writeln('На прямоугольный участок с размерами ' , a , ' и ' , b ,' могут уместиться два дома.') else 
 writeln('На прямоугольный участок с размерами ',a,' и ',b,' не могут уместиться два дома.')
 end.

СДЕЛАЙТЕ РЕПОСТ

15   голосов, оценка 3.467 из 5



Похожие ответы
  1. В прямоугольном параллелепипеде построить сечение, проходящее через одно из его ребер и точку пересечения диагоналей противолежащей этому ребру грани Pascal ABC

  1. Помогите пожалуйста, новичок в паскале, необходимо создать программу которая будет интегрировать функцию y=x^2+2 на участке от 1 до 10