Гнездо для ножки деревянной кровати имеет форму прямоугольной вырезки. Определить, подойдет ли данный четырехугольный брусок для этого гнезда.

 Гнездо для ножки деревянной кровати имеет форму прямоугольной вырезки. Определить, подойдет ли данный четырехугольный брусок для этого гнезда.
Гость
Ответ(ы) на вопрос:
Гость
Если для этого нужно написать программу, то смотри(Паскаль):   uses crt; var a,b,c,d,p,p1:real; begin clrscr; write('длина вырезки ');read(a); write('ширина вырезки ');read(b); p:=2*(a+b); write('длина сечения бруска ');read(c); write('ширина сечения бруска ');read(d); p1:=2*(c+d); writeln; if (p=p1) then begin if (c=a) or (c=b) then write('подойдет') else write('не подойдет'); end else write('не подойдет'); end.
Гость
Program DenisDen4ik; uses crt; var   a1,a2,b1,b2:real; begin   writeln('Введите размеры вырезки ');   write('ширина ');read(a1);   write('длина ');read(a2);   writeln('Введите размеры сечения бруска ');   write('ширина ');read(b1);   write('длина ');read(b2);   writeln();   if ((a1=b1) and (a2=b2)) or ((a1=b2) and (a2=b1)) then     writeln('Этот брусок подойдет')       else writeln('Этот брусок не подойдет'); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы