При чтении данных из файла определить комплексные числа с наименьшими (наибольшими) модулем и аргументом - Turbo Pascal

  1. Создать на диске файл file6.dat, состоящий из компонент-записей с полями; действительная часть комплексного числа; мнимая часть. При чтении данных из файла определить комплексные числа с наименьшими (наибольшими) модулем и аргументом.


textual

Код:

if modul(z)<mnm then begin mnm:=modul(z); zmnm:=z; end
else begin mxm:=modul(z); zmxm:=z; end;
if rgument(z)<mna then begin mna:=argument(z); zmna:=z; end
else begin mxa:=argument(z); zmxa:=z; end;


Похожие ответы
  1. Дано натуральное число n, входной поток данных: действительные числа a1,a2,a3, ... , aN. Получите удвоенную сумму всех положительных членов входного потока данных a1,a2,a3, ... , aN. Составьте код программы и блок-схему.

  1. Доброго времени суток господа программисты. У меня возникла проблема написания программы в Паскале. Буду краток. Паскаль для меня это небо и земля, он мне никогда не давался и приходилось как то выкручиваться. Если есть знатоки в этом, буду признателен. Так вот собственно задача: Дан файл положительных целых чисел состоящий из нескольких последовательностей чисел, каждая из которых оканчивается на 0. Вывести в выходной файл эти последовательности чисел, во внутри каждой последовательности числа должны идти в обратном порядке. p.s Набросков нету, т.к я язык знаю, но не умею его применять :c

  1. Дано трехзначное число. Вывести число, полученное при прочтении исходного числа справа налево. 556 655 заранее спасибо...

  1. всем здруствуйте помогите с некоторыми аспектами я уже разобрался.Создать систему обработки данных однотабличной базы, состоящей из записей следующего типа:

  1. Точное условие: При некоторых заданных x, N и E, определяемых вводом, вы-числите сумму N слагаемых заданного вида, а также сумму тех слагаемых, которые по абсолютной величине больше E. Для второго случая выполните суммирование для двух значений E, отличающихся на порядок, и при этом определите количество слагаемых, включенных в сумму. Сравните результаты с точным значением функции, для которой данная сумма определяет приближенное значение при x, лежащем в интервале (–R, R).Что нужно сделать: обработать последовательность слагаемых данных на фото под буквой h.Что уже есть: есть вот такой вот код, который работает, но , как мне кажется, некорректно. Буду безмерно благодарен, если что-то сможет сделать его проверку и если найдутся ошибки( а что-то мне подсказывает, что найдутся), то ткнуть в них носом.

  1. Заколдованный принц нашел 4 волшебных палочки, длины которых a,b,c и d. Чтобы расколдоваться, ему нужно из них построить «волшебный треугольник» с наибольшим периметром, а затем встать внутрь этого треугольника. Напишите программу, которая определяет, из каких конкретно волшебных палочек принц должен построить данный треугольник. Формат входных данных: С клавиатуры вводится четыре положительных числа через пробел- a,b,c и d, которые обозначают длины палочек. Формат выходных данных: На экран вывести длины палочек, из которых можно построить треугольник с максимальным периметром в алфавитном порядке перечисления их длин через пробел. Если ни одного треугольника построить нельзя, программа должна вывести слово «NO».

  1. создать функцию,которая для двух данных чисел определяет в каком числе произвольных чисел больше

  1. можно ли сделать одну целую таблицу,чтоб она выводила все i и соответствующие ей y y:=\sum_{i=1}^{n=10} e^i

  1. Реализуйте структуру данных "стек". Напишите программу, содержащую описание стека и моделирующую работу стека, реализовав все указанные здесь методы. Программа считывает последовательность команд и в зависимости от команды выполняет ту или иную операцию. После выполнения каждой команды программа должна вывести одну строчку. Возможные команды для программы: push n Добавить в стек число n (значение n задается после команды). Программа должна вывести ok. pop Удалить из стека последний элемент. Программа должна вывести его значение. back Программа должна вывести значение последнего элемента, не удаляя его из стека. size Программа должна вывести количество элементов в стеке. clear Программа должна очистить стек и вывести ok. exit Программа должна вывести bye и завершить работу. Входные данные Команды управления стеком вводятся в описанном ранее формате по 1 на строке. Гарантируется, что набор входных команд удовлетворяет следующим требованиям: максимальное количество элементов в стеке в любой момент не превосходит 100, все команды pop и back корректны, то есть при их исполнении в стеке содержится хотя бы один элемент. Выходные данные Требуется вывести протокол работы со стеком, по 1 сообщению в строке Примеры входные данные push 3 push 14 size clear push 1 back push 2 back pop size pop size exit выходные данные ok ok 2 ok ok 1 ok 2 2 1 1 0 bye