Конференция VBStreets

**ФАНТОМНЫЙ ЮЗЕР** » 19.11.2004 (Пт) 1:38

Подскажите пожалуйста, как осуществить подпрограмму на Visual Basic вычисления выражения типа

Код: Выделить всё: 12.1-0.05i

**GSerg** » 19.11.2004 (Пт) 3:53

А усё, это конечный ответ

**FaKk2** » 19.11.2004 (Пт) 4:03

Вообще то все выражение A+iB называется комплексным числом, AFAIR.
А считать... Формула есть? Значит есть и алгоритм. Или тебе распарсить ещё надо?

**GSerg** » 19.11.2004 (Пт) 4:07

Нельзя никак его сосчитать. Мнимую часть нельзя прибавить к действительной. Приведённое выражение есть конечное комплексное число, больше с ним ничего сделать нельзя

**FaKk2** » 19.11.2004 (Пт) 4:18

Естественно корень из -2 в натуральных числах не получим. Но может автор имел ввиду реализацию 4 базовых операций...

**Ronin** » 19.11.2004 (Пт) 4:32

Доброго времени суток!

Может имелось ввиду:
A, B - действительные числа
i - Комплексное число

тогда так:
Result = New ComplexNumber(A - i.Real * B, i.Imaginary * B)
ComplexNumber - класс комплексного числа

Наверное так.

**Ennor** » 19.11.2004 (Пт) 11:38

В том же С++ есть отдельные классы для работы с комплексными числами. Видимо, уважаемому афтару имеет смысл либо написать такой самому, либо поискать готовый...

**ФАНТОМНЫЙ ЮЗЕР** » 19.11.2004 (Пт) 15:07

Ronin писал(а):Доброго времени суток!

Может имелось ввиду:
A, B - действительные числа
i - Комплексное число

тогда так:
Result = New ComplexNumber(A - i.Real * B, i.Imaginary * B)
ComplexNumber - класс комплексного числа

Наверное так.

Да, действительно так
Но в VB переменная i не определена, она равна корню из -1.
Откуда брать i.Real и i.Imaginary ???

Подпрограмма, как мне кажется, должна быть следующего вида:

Код: Выделить всё: Private Function ABi(ByVal inA As Double, ByVal inB as Double, ByRef outA as Double, ByRef outB as Double) ' Вычисление A-Bi, i - комплексное число. ' ???? End Function

**tyomitch** » 19.11.2004 (Пт) 15:15

oal, что вычислить-то надо? Что у тебя функция ABi должна вернуть?

**alibek** » 19.11.2004 (Пт) 17:46

Фраза "вычислить A-iB" звучит так же бессмысленно, как и фраза "вычислить 5", что тебе пытались объяснить уже три человека. Максимум, что ты можешь взять с этого выражения - определить скаляр (модуль).

**tyomitch** » 19.11.2004 (Пт) 17:50

alibek, может надо что-то навроде этого?

Код: Выделить всё: Private Function A (ByVal inA As Double, ByRef outA As Double) 'Вычисление A, где A - действительное число outA = inA End Function

**Ronin** » 19.11.2004 (Пт) 18:06

Доброго времени суток!

Тебе должно быть дано i-комплексное чисто комплексное число состоит из вещественной и мнимой части - записывается так:
(R + iM) где R - Вещественное число, а M - мнимое.
Например (5 + i8) или (9 - i2). Тоесть если у нас есть класс комплексного числа, то первый пример выглядел бы так:

Dim Cmplx As New RCmplx.ComplexNum(5, 8)
MsgBox (Cmplx.Real)
MsgBox (Cmplx.Imaginary)

Сообщения бы показали:
5
8

До сих пор понятно?
Да и не знаю, равна ли i корню из -1, знаю лишь только то, что i^2 = -1
А если тебе не дана переменная i (тоесть не переменная а обьект) то по умолчанию она равна, насколько я помню (0 + i0)
В итоге у тебя должен получиться ответ: (нужно привести вещественные числа в комплексный вид)
(12.1 + i0) - (0.05 + i0) * (0 + i0) = (12.1 + i0)

А вообще открой книжку по математическому анализу и разберись...
Удачи

**tyomitch** » 19.11.2004 (Пт) 18:12

1. При чём здесь мат. анализ? Это как раз алгебра.
2. Сколько я видел, комплексные числа пишут в виде (R + Mi), а не как в сабже и у тебя. Хотя вряд ли это принципиально.
3. i - это (0 + 1i), и это главное значение √-1 (другое значение - -i = (0 - 1i)).

**Ronin** » 19.11.2004 (Пт) 18:42

Доброго времени суток!

Да по 3 пункту признаю ошибку. Не (0 + 0i) a (0 + i)

**ФАНТОМНЫЙ ЮЗЕР** » 19.11.2004 (Пт) 19:29

Имеется два массива inA() As Double и inB() as Double, соответствующие действительной и мнимой чати комплексного числа.
Нужно вычислить его сопряженный комплекс по выражению

Код: Выделить всё: CONJ(X) = REAL(X) - i*IMAG(X)

**alibek** » 20.11.2004 (Сб) 11:32

Теорема Пифагора?

**tyomitch** » 20.11.2004 (Сб) 12:27

alibek писал(а):Теорема Пифагора?

Нет, просто сопряжённые числа...
К 5+2i сопряжённое - 5-2i, и т.д.

**Ronin** » 22.11.2004 (Пн) 4:18

Доброго времени суток!

oal писал(а):Имеется два массива inA() As Double и inB() as Double, соответствующие действительной и мнимой чати комплексного числа.
Нужно вычислить его сопряженный комплекс по выражению
Код: Выделить всё
CONJ(X) = REAL(X) - i*IMAG(X)

Из этого я понял следущее:
REAL - это действительная часть комплексного числа
IMAG - мнимая часть
CONJ - спряженное комплексного числа, тоесть и является комплексным числом (я имею ввиду тип данных)
Но тогда это не верно.
Если тебе извесно, что у тебя комплексное число, и оно представлено двумя переменными (Real и Imag), тоесть коплексное число ты получаешь такого вида (преобразование в строку):
"(" & str(Real) & ", " & str(Imag) & "i)"
Тогда, что-бы получить сопряженное число, то тебе просто надо изменить знак у мнимой части комплексного числа (тоесть у Imag), это значит:
"(" & str(Real) & ", " & str(-Imag) & "i)"
Я это понимаю так. Может я ошибаюсь... Но правда, мне до сих пор практически ничего не понятно...

**ФАНТОМНЫЙ ЮЗЕР** » 23.11.2004 (Вт) 1:54

Я нашел решение при помощи следующего найденного в интернете файла:

Конференция VBStreets

Вычисление A-iB, где i - комплексное число

Вычисление A-iB, где i - комплексное число

Кто сейчас на конференции