|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
25.01.2012, 21:00 | #1 |
Пользователь
Регистрация: 28.12.2011
Сообщений: 11
|
Правильна ли подпрограмма относительно данной спецификации? Если да,то обосновать,если нет-исправить подпрограмму.
СПЕЦИФИКАЦИЯ:Функция определяет взаимное расположение двух прямых,заданных нормальными уравнениями на плоскости.Входные параметры а1,b1,c1-коэффициенты уравнения первой прямой, a2,b2,c2-коэффициенты уравнения второй прямой.Функция возвращает true,если оба уравнения заданы корректно и тогда выходной параметр res принимает одно из следующих значений:0,если прямые совпадают,1,если они параллельны, и 2,если пересекаются;функция возвращает false, если хотя бы у одной из прямых нормальный вектор нулевой.
Код:
Последний раз редактировалось Stilet; 25.01.2012 в 21:59. |
25.01.2012, 21:41 | #2 |
Форумчанин
Регистрация: 10.06.2010
Сообщений: 239
|
Правильно. Только я не понял зачем нужно вот это условие, и без него работать будет.
Код:
Чтобы слова не расходились с делом, нужно молчать и ничего не делать.
|
25.01.2012, 21:55 | #3 |
Пользователь
Регистрация: 28.12.2011
Сообщений: 11
|
я не знаю зачем эти условия, мало,что в этом понимаю..
Так я могу оставить все как есть, или нужно убрать из подпрограммы данные условия? |
26.01.2012, 08:36 | #4 | |
Форумчанин
Регистрация: 10.06.2010
Сообщений: 239
|
Цитата:
Убирать можно только (a1*c2<>a2*c1), я его в предыдущем посте выделил жирным, просто плохо вдно.
Чтобы слова не расходились с делом, нужно молчать и ничего не делать.
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Сравнение 2х листов, и если нет совпадений удаление. | MASRUB | Microsoft Office Excel | 3 | 03.05.2011 11:11 |
idftp если нет коннекта, то работаем дальше | _KUL | Работа с сетью в Delphi | 5 | 15.04.2011 02:58 |
Вставка записи в БД, если ее там нет. | Mixasik | SQL, базы данных | 4 | 01.08.2010 13:46 |
Если в проекте нет файла .dcu | furstenberg | Общие вопросы Delphi | 10 | 28.09.2009 11:02 |
WebBrowser! Если нет коннекта... | Port 111 | Работа с сетью в Delphi | 1 | 15.01.2009 15:15 |