|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
29.04.2008, 20:12 | #1 |
Регистрация: 29.04.2008
Сообщений: 5
|
Перемножение одной матрицы на другую в Delphi
Пожалйста,подскажите!!!
|
29.04.2008, 20:16 | #2 |
Участник клуба
Регистрация: 26.10.2007
Сообщений: 1,244
|
Сначало надо это сделать на бумажке. Выяснить когда можно перемножать, а когда нельзя. "Увидеть" принцип действия.
В голове "собрать" алгоритм, сделать наброски будущей программы. Правильно обьяснить это ДелфКе : ) Где Ваши наработки?
Умом Россию не понять, пока не выпито ноль пять,
А если выпито ноль пять всё делом кажется не хитрым, Попытка глубже понимать уже попахивает литром... |
29.04.2008, 20:31 | #3 |
Непрофессионал
Участник клуба
Регистрация: 01.01.2008
Сообщений: 1,405
|
Из учебника по 3D графике:
function MatrixMul(const a, b: TD3DMatrix) : TD3DMatrix; var i,j,k : Integer; begin Result := ZeroMatrix; for i := 0 to 3 do for j := 0 to 3 do for k := 0 to 3 do Result.m[i,j] := Result.m[i,j] + (a.m[k,j] * b.m[i,k]); end; Матрица TD3DMatrix размерности 4*4 вида- TD3DMatrix = packed record case integer of 0 : (_11, _12, _13, _14: TD3DValue; _21, _22, _23, _24: TD3DValue; _31, _32, _33, _34: TD3DValue; _41, _42, _43, _44: TD3DValue); 1 : (m : array [0..3, 0..3] of TD3DValue); end; ZeroMatrix - TD3DMatrix матрица со всеми элементами=0 Под другую размерность матриц, или матрицу на вектор - тут уж сами.
И чем больше я узнавал людей, тем больше мне нравились компьютеры.
------------------------------------ Страничка с моими программками http://ulex-masm.ru |
30.04.2008, 16:39 | #4 |
Регистрация: 29.04.2008
Сообщений: 5
|
мне надо через TPageControl,TTabSheet,TStringGrid, TSpinEdit
|
30.04.2008, 16:59 | #5 |
Участник клуба
Регистрация: 26.10.2007
Сообщений: 1,244
|
Что значит "через" ?
Умом Россию не понять, пока не выпито ноль пять,
А если выпито ноль пять всё делом кажется не хитрым, Попытка глубже понимать уже попахивает литром... |
30.04.2008, 17:01 | #6 |
Регистрация: 29.04.2008
Сообщений: 5
|
сама программа расчета была написана с помощью этих компонентов
|
30.04.2008, 17:17 | #7 |
Участник клуба
Регистрация: 26.10.2007
Сообщений: 1,244
|
У Вас есть конкретные вопросы?
Если нету, то тему - флуд, а просьба - фриланс.
Умом Россию не понять, пока не выпито ноль пять,
А если выпито ноль пять всё делом кажется не хитрым, Попытка глубже понимать уже попахивает литром... |
30.04.2008, 17:24 | #8 |
Регистрация: 29.04.2008
Сообщений: 5
|
парамрщзщзрхщз
Последний раз редактировалось ННН; 30.04.2008 в 17:55. |
30.04.2008, 17:30 | #9 | |
Участник клуба
Регистрация: 26.10.2007
Сообщений: 1,244
|
Цитата:
Этот код рисует график в Чарте или чтото похожее. Ктомуже чтоб понять какой у этой программы "недочет", нужно время и много думать. А также знать что должно получаться. .
Умом Россию не понять, пока не выпито ноль пять,
А если выпито ноль пять всё делом кажется не хитрым, Попытка глубже понимать уже попахивает литром... |
|
30.04.2008, 17:36 | #10 |
Регистрация: 29.04.2008
Сообщений: 5
|
это другой вопрос! нужно вычислить функцию y:=sqrt((a*sin(x1)+ln(a))/1+sin(x1-1/4))/sin(x1); при заданых пользователем:параметре а, предах изменения аргумента X и шаге его изменения! там вроде длясамой функции задать условия надо!
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Перевод из одной системы исчисления в другую. | Svop | Помощь студентам | 7 | 20.12.2010 19:00 |
Импорт записей из одной Бд в другую | hemo | Microsoft Office Access | 6 | 08.09.2008 08:57 |
Конвертация одной БД в другую | Старовъръ | БД в Delphi | 2 | 19.08.2008 12:26 |
Отправлять данные из одной таблицы в другую | Таня84 | БД в Delphi | 14 | 28.04.2007 23:23 |