IPB
ЛогинПароль:

> Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

> Задача2
Beseech
сообщение 15.03.2007 7:32
Сообщение #1


Новичок
*

Группа: Пользователи
Сообщений: 42
Пол: Мужской
Реальное имя: Ваня

Репутация: -  0  +


Определить,пройдет ли кирпич с рёбрами a,b,c в прямоугольное отверстие со сторонами x и y. Вкладывать кирпич в отверстие разрешается только так,чтобы каждое его ребро было паралельно или перпендикулярно каждой из сторон отверстия.
Заранее очень благодарен

 ! 
Переименую тему, либо она будет закрыта



Сообщение отредактировано: klem4 - 15.03.2007 8:38


--------------------
Skateboarding is not a crime
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
 
 Ответить  Открыть новую тему 
Ответов
Tan
сообщение 15.03.2007 13:45
Сообщение #2


Профи
****

Группа: Пользователи
Сообщений: 559
Пол: Мужской
Реальное имя: Бруно

Репутация: -  10  +


Ну суть такая если я правильно понял: 3 возможных площади поверхности которыми ты будешь проталкивать кирпич это a * b, a * с, b * с, каждое из них тебе надо сравнить c площадью дырки x * y и в результате если площадь дырки > =, то протолкнуть можно. С реализацией проблем не должно быть.

uses crt;
var a, b, c, x, y : real;
begin
readln (a);
readln (b);
readln ©;
readln (x);
readln (y);
If (((a * b <= x * y) or (a * c <= x * y) or (b * c <= x * y))) then writeln (' Yes ')
else writeln (' No ');
readkey;
end.


Сообщение отредактировано: Tan - 15.03.2007 16:43


--------------------
Цитата
Imagination is more important than knowledge.
Albert Einstein
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

Сообщений в этой теме


 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 



- Текстовая версия 20.07.2025 22:45
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"