Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 25.03.2012, 18:22   #1
Serjant0007
 
Регистрация: 04.09.2011
Сообщений: 4
По умолчанию Даны четыре вектора А(1; 2; 3), В(2; 8; 6; 33), С(3,7; 1,3; 6,5; –5,3) и D(–2; 5; 3; 4).

Даны четыре вектора А(1; 2; 3), В(2; 8; 6; 33), С(3,7; 1,3; 6,5; –5,3) и D(–2; 5; 3; 4). Переменной Х присвоить значение –1, если скалярное произведение векторов А и В меньше скалярного произведения векторов C и D. А противном случае переменной Х присвоить 1.
Serjant0007 вне форума Ответить с цитированием
Старый 25.03.2012, 18:47   #2
Serjant0007
 
Регистрация: 04.09.2011
Сообщений: 4
По умолчанию

Цитата:
Сообщение от Serjant0007 Посмотреть сообщение
Даны четыре вектора А(1; 2; 3), В(2; 8; 6; 33), С(3,7; 1,3; 6,5; –5,3) и D(–2; 5; 3; 4). Переменной Х присвоить значение –1, если скалярное произведение векторов А и В меньше скалярного произведения векторов C и D. А противном случае переменной Х присвоить 1.
вряд ли кто то сможет помочь решить очень сложная
Serjant0007 вне форума Ответить с цитированием
Старый 25.03.2012, 19:56   #3
Langley
Новичок
Джуниор
 
Аватар для Langley
 
Регистрация: 25.03.2012
Сообщений: 7
По умолчанию

На самом деле все очень просто, стоит лишь вспомнить определение скалярного произведения двух векторов.
Код:
(A,B) = ax*bx + ay*by + az*bz
Аналогично для векторов C и D.
Код писать не вижу смысла.
Langley вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Даны четыре вещественных числа, проверить: образуют ли данные числа геометрическую прогрессию (язык C) Даша(S) Помощь студентам 6 04.04.2015 23:43
получить a в 7 за четыре операции netiv Паскаль, Turbo Pascal, PascalABC.NET 4 14.11.2011 13:48
Даны Координаты Вектора wallter009 Microsoft Office Excel 2 27.05.2011 01:03
Даны векторы A[10], B[18]. У каждого вектора, компоненты которого не neomax38 Помощь студентам 2 23.12.2010 12:54
Даны четыре слова. Екатерина92 Помощь студентам 1 16.12.2010 18:04