Выяснить, пройдёт ли кирпич с рёбрами a, b, c в квадратное отверстие со стороной x.

2

Ответы и объяснения

2013-01-10T18:50:48+00:00

Program help;
Uses Crt;
Var a, b, c, x : Byte;

Begin
Write('Введи a, b, c, x: ');
Readln(a, b, c, x);

If ((a <= x) and (b <= x)) or ((a <= x) and (c <= x)) or ((b <= x) and (c <= x)) then
Write('Пролезет')
Else
Write('Не пролезет');
End.

2013-01-10T18:54:14+00:00

Там надо составить несколько условий для прохода этого кирпича в отверстие. Т.е. если сторона  A проходит в это отверстие и если стороны B и С тоже проходят значит пройдет и так несколько условий. для каждой стороны получаеться