комплексные числа

@stydentka · Регистрация: 21.03.2010

Студворк — интернет-сервис помощи студентам

напишите пожалуйста, что делать, если при делении комплексных чисел в знаменателе оказался ноль. Меня попросили ввести булевскую переменную и выполнить действия. А как это сделать?

@yanyk1n · 07.04.2010, 19:54

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
uses crt;
type cplx=record
        r,i:real;
        end;
 
 
function iszero_cplx(a:cplx):boolean;
begin
    if (a.i=0) and (a.r=0) then iszero_cplx := true else iszero_cplx:=false;
end;
 
function div_cplx(a,b:cplx):cplx;
begin
    div_cplx.r:=(a.r*b.r+a.i*b.i)/(sqr(b.i)+sqr(b.r));
    div_cplx.i:=(a.i*b.r-a.r*b.i)/(sqr(b.i)+sqr(b.r));
end;
 
var u,v,t:cplx;
 
begin
    clrscr;
    write('U -> ');
    readln(u.r,u.i);
    write('V -> ');
    readln(v.r,v.i);
    if not iszero_cplx(v) then
    begin
        t:=div_cplx(u,v);
        writeln('Ответ= ',t.r:0:3,' + ',t.i:0:3,'i');
    end else writeln('Знаменатель равен нулю!');
    readln;
end.

@stydentka · 07.04.2010, 20:07 **[ТС]**

спасибо)) а как можно вычислить аргумент, если не подходит через арктангенс, т. к. его диапозон от -pi/2 до pi/2? или это например Z:=r(cos(a/r)+sin(b/r)) где r:=sqrt(sqr(a)+sqr(b)) и а,b действительные и мнимые части?

Новые блоги и статьи Все статьи Все блоги /
Символьное дифференцирование igorrr37 13.02.2026 / * Логарифм записывается как: (x-2)log(x^2+2) - означает логарифм (x^2+2) по основанию (x-2). Унарный минус обозначается как ! в-строка - входное арифметическое выражение в инфиксной(обычной). . .	Камера Toupcam IUA500KMA Eddy_Em 12.02.2026 Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .	И ясному Солнцу zbw 12.02.2026 И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.	«Знание-Сила» zbw 12.02.2026 «Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 12.02.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .	SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 11.02.2026 Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .	SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image 8Observer8 10.02.2026 Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .	Установка Qt-версии Lazarus IDE в Debian Trixie Xfce volvo 10.02.2026 В общем, достали меня глюки IDE Лазаруса, собранной с использованием набора виджетов Gtk2 (конкретно: если набирать текст в редакторе и вызвать подсказку через Ctrl+Space, то после закрытия окошка. . .

@stydentka 4 / 4 / 0 Регистрация: 21.03.2010 Сообщений: 64

	комплексные числа 07.04.2010, 19:48. Показов 1662. Ответов 2 Метки нет (Все метки) напишите пожалуйста, что делать, если при делении комплексных чисел в знаменателе оказался ноль. Меня попросили ввести булевскую переменную и выполнить действия. А как это сделать? 1

@stydentka 4 / 4 / 0 Регистрация: 21.03.2010 Сообщений: 64
	07.04.2010, 20:07 [ТС]
	спасибо)) а как можно вычислить аргумент, если не подходит через арктангенс, т. к. его диапозон от -pi/2 до pi/2? или это например Z:=r(cos(a/r)+sin(b/r)) где r:=sqrt(sqr(a)+sqr(b)) и а,b действительные и мнимые части? 1

комплексные числа

Решение