uses
Crt;
type
TComplex = record
Re, Im: Double;
end;
var
x, y, z: TComplex;
begin
ClrScr;
x.Re := 5;
x.Im := 9;
y.Re := 2;
y.Im := -4;
z.Re := x.Re + y.Re;
z.Im := x.Im + y.Im;
ReadKey;
end;
[Turbo Pascal]сложениe двух комплексных чисел
Помогите 17.Написать программу для сложения двух комплексных чисел, записанных в алгебраической форме. Переменные заданы в переменных типа запись.
Автор, [color=red]предупреждали[/color] тебя несколько раз, называй правильно тему, еще 5 штраф за неправильное зазвание темы, всего у тебя 15 штрафных очков, будет 30 - и попадаешь в бан.
А что помочь по программе или для начало про само сложение комплексных чисел?
Всё уже решили. Закройте тему
Вот, набрасываю без компиляции.
Код: