Разработать программу в паскале для вычисления таблицы значений модуля комплексной функции

@большесолнца · Регистрация: 29.06.2013

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

Задана комплексная функция

W(jv)=k*(1+T₂*jv)/jv*(1+T₁*jv)*(1+T₃jv)²*(1+T₃jv)²
где k=100, T₁=1;T₂=0,4;T₃=0,02;T₅=0,005; j=sqrt(-1) - мнимая единица

Разработать программу в паскале для вычисления таблицы значений |W(jv)| - модуля комплексной функции, v=5, 10, 15, 20, 25, 30.

@newyork7776 · 17.07.2013, 13:43

Кликните здесь для просмотра всего текста

Pascal

program project_one;
var v,k,T1,T2,T3,T5,j,rez:double;
begin
k:=100;T1:=1;T2:=0.4;T3:=0.02;T5:=0.005;j:=sqrt(1);v:=5;
while (v<=30) do
begin
    rez:=(k*((1+T2*j*v)/j*v)*(1+T1*j*v)*(sqr(1+T3*j*v))*(sqr(1+T5*j*v)));
    writeln('Answer [',v,'] = ',abs(rez));
    v:=v+5;
end;
end.

вот так или нет?
точнее формулу

@PaniCa. · 17.07.2013, 22:07

Сообщение от newyork7776

Кликните здесь для просмотра всего текста

Pascal

program project_one;
var v,k,T1,T2,T3,T5,j,rez:double;
begin
k:=100;T1:=1;T2:=0.4;T3:=0.02;T5:=0.005;j:=sqrt(1);v:=5;
while (v<=30) do
begin
    rez:=(k*((1+T2*j*v)/j*v)*(1+T1*j*v)*(sqr(1+T3*j*v))*(sqr(1+T5*j*v)));
    writeln('Answer [',v,'] = ',abs(rez));
    v:=v+5;
end;
end.

вот так или нет?
точнее формулу

Ты знаешь что такое комплексная функция?

Новые блоги и статьи
Как преобразовать список списков в простой список в Python bytestream 22.01.2025 При работе с Python разработчики часто сталкиваются с необходимостью обработки сложных структур данных, среди которых особое место занимают вложенные списки. Эти структуры представляют собой списки,. . .	Что такое GUID / UUID и как их создать bytestream 22.01.2025 В мире разработки программного обеспечения существует постоянная потребность в уникальной идентификации объектов, записей и ресурсов. Эта задача становится особенно актуальной в распределенных. . .	Как добавить пустую директорию в репозиторий Git bytestream 22.01.2025 При работе с системой контроля версий Git разработчики часто сталкиваются с ситуацией, когда необходимо сохранить пустую директорию в репозитории. Данная задача может показаться простой на первый. . .	Как валидировать адрес email в JavaScript bytestream 22.01.2025 JavaScript, как основной язык веб-разработки, предоставляет разработчикам множество инструментов для реализации эффективной валидации email-адресов. От простых встроенных решений до сложных. . .	Как заменить все вхождения подстроки в JavaScript bytestream 22.01.2025 Строки в JavaScript представляют собой неизменяемые последовательности символов, что делает их обработку особенно интересной с точки зрения оптимизации и выбора правильного подхода к решению задач. . . .	Управление версиями пакетов в Node.js. В чем разница между тильдой (~) и кареткой (^) в package.json bytestream 22.01.2025 В современной разработке программного обеспечения управление версиями пакетов играет ключевую роль в обеспечении стабильности и надежности проектов. Node. js, как одна из самых популярных платформ для. . .
Аутентификация на сайте с помощью формы bytestream 21.01.2025 В современном цифровом мире безопасная аутентификация становится краеугольным камнем защиты веб-приложений и пользовательских данных. Каждый день миллионы людей используют различные онлайн-сервисы,. . .	Как получить индекс в цикле for в Python bytestream 21.01.2025 При работе с коллекциями данных в Python часто возникает необходимость не только получить доступ к элементам последовательности, но и знать их позицию в процессе итерации. Индексация в циклах. . .	Как определить адрес, из которого локальный репозиторий Git был клонирован bytestream 21.01.2025 В современной разработке программного обеспечения система контроля версий Git стала неотъемлемой частью рабочего процесса. При работе с Git разработчики часто сталкиваются с необходимостью. . .	Какая разница между операторами == и === в сравнениях в JavaScript bytestream 21.01.2025 В мире веб-разработки JavaScript занимает особое место как динамический язык программирования, предоставляющий разработчикам широкий набор инструментов для создания интерактивных веб-приложений. . . .	Из чего и как собрать свой домашний кинотеатр bt_guru 21.01.2025 Создание домашнего кинотеатра: от идеи до реализации В современном мире домашний кинотеатр стал неотъемлемой частью комфортного жилого пространства, предоставляя возможность наслаждаться. . .	Ошибки стиральных машин bt_guru 21.01.2025 Современные стиральные машины представляют собой сложные электронные устройства, оснащенные множеством датчиков и систем контроля. Они способны самостоятельно определять вес загруженного белья,. . .

@большесолнца 0 / 0 / 0 Регистрация: 29.06.2013 Сообщений: 4
		1
	Разработать программу в паскале для вычисления таблицы значений модуля комплексной функции 29.06.2013, 18:52. Показов 1456. Ответов 2 Метки нет (Все метки) Задана комплексная функция W(jv)=k(1+T₂jv)/jv(1+T₁jv)(1+T₃jv)²(1+T₃jv)² где k=100, T₁=1;T₂=0,4;T₃=0,02;T₅=0,005; j=sqrt(-1) - мнимая единица Разработать программу в паскале для вычисления таблицы значений \|W(jv)\| - модуля комплексной функции, v=5, 10, 15, 20, 25, 30. 0

	17.07.2013, 22:07

Опции темы

Разработать программу в паскале для вычисления таблицы значений модуля комплексной функции

Решение