• Заданы размеры А, В прямоугольного отверстия и размеры Х, Y, Z кирпича. Определите, пройдет ли кирпич через отверстие.

Ответы 1

  • program abxyz;var a,b,x,y,z:real;beginwrite(\'a:\');read(a);write(\'b:\');read(b);write(\'x:\');read(x);write(\'y:\');read(y);write(\'z:\');read(z);if (x<a) and (y<b) or (x<b) and (y<a) thenwriteln(\'True\')elseif (x<a) and (z<b) or (x<b) and (z<a) thenwriteln(\'True\')elseif (y<a) and (z<b) or (y<b) and (z<a) thenwriteln(\'True\')elsewriteln(\'False\');end.Второй вариант:var a,b,x,y:integer;begin writeln(\'Vvedite A\'); readln(a); writeln(\'Vvedite B\'); readln(b); writeln(\'Vvedite X\'); readln(x); writeln(\'Vvedite Y\'); readln(y); if (x>a) and (y>b) then writeln(\'Kirpich ne proydet\'); if (x<a) and (y<b) then writeln(\'Kirpich proydet\'); writeln(\'Press ENTER to exit\'); readln; end.
  • Добавить свой ответ

Войти через Google

или

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

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

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