|
|
Другие темы раздела | |
Turbo Pascal На основе исходного файла целых чисел создать массив удвоенных нечетных чисел
https://www.cyberforum.ru/ turbo-pascal/ thread509667.html Нужно составить две программы. Первая должна сформировать типизированный файл исходных данных. Вторая – считать данные из этого файла, выполнить соответствующие вычисления и записать их результаты в текстовый файл. Задание: На основе исходного файла целых чисел создать массив удвоенных нечетных чисел. Упорядочить его по возрастанию элементов. |
Turbo Pascal Минимальный элемент массива написать программу которая выводит Min элемент массива из 9 чисел находит ср.арифметическое чисел больше 2 но меньше 10 и подсчитывает все эти числа |
Turbo Pascal Создание/чтение файла, перестановка и списки Добрый день. Очень нужна помощь с решением задачки по Pascal. Задачка в принципе не трудная, просто у меня сильно жмет время, а в языке я еще не слишком силен (если быть до конца честным, то почти ничего не понимаю). В файл заносится последовательность слов и записывается в памяти при чтении из файла в виде линейного списка. Обеспечить перестановку слов в списке в обратном порядке. Вывести... https://www.cyberforum.ru/ turbo-pascal/ thread509560.html |
Turbo Pascal Определить, сколько раз данная подстрока входит в строку?
https://www.cyberforum.ru/ turbo-pascal/ thread506043.html Пожалуйста помогите, люди!!! Вот несколько задачек, они очень простые, но я совсем не разбираюсь в пасскале, мне ОЧЕНЬ нужен их код на Pascal'e. Пожалуйста кто действительно умеет это делать напишите, это просто вопрос жизни и смерти!!! 1. Вводится массив. Найти в нём максимум по каждой строке, а затем максимум из получившихся чисел. 2. Вводится строка и подстрока. Определить, сколько раз... |
Работа с большими числами Turbo Pascal Писал-с! Чертовски интересная задача. Делать надо всё с нуля. Но ведь и овчинка выделки стоит. Не так ли? ;) |
Turbo Pascal условная компиляция
https://www.cyberforum.ru/ turbo-pascal/ thread502693.html Procedure SetPort(p:word;b:byte);stdcall; {$ifdef RWPort} var len: cardinal; written: cardinal; {$endif} begin {$ifdef RWPort} len:= 1; WriteFile(hport,b,len,written,nil); |
Turbo Pascal поля с дес. знаками что-то вроде (N10,2) Delphi - это же паскаль? У меня вопросы по структуре файлов паскаля. Мне нужно в Clipper прочитать двоичный файл, записанный в паскале. С символьными полями и целыми числами - ОК. Но там есть поля с дес. знаками что-то вроде (N10,2) - не знаю, как они описываются в паскале. Может кто помочь? == Irina vedavip@yandex.ru https://www.cyberforum.ru/ turbo-pascal/ thread496600.html |
Рассчитать среднее арифметическое диапазона чисел Turbo Pascal Нужно расчитать среднее арифметическое диапозона чисел. Начальное и конечное вводится с клавиатуры. Пример. первое число: 1 второе число: 3 вычисления должны быть след-ми: (1+2+3)/3 var a,b,i: integer; /a и b вводимые цифры(начальная и конечная)/ s: real; / Среднее ар-ое/ /Подскажите каков должен быть цикл/ |
Turbo Pascal Программа "Отдел кадров" Отдел кадров. Таблица - 'Список отделов' (номер отдела, наименование отдела). Список - 'Штатное расписание' (номер отдела, наименование должности, количество мест по данной должности по штатному расписанию). Список - 'Занимаемые должности' (код сотрудника, номер отдела, должность, дата зачисления на данную должность, дата ухода с данной должности). Сотрудник в течении ... https://www.cyberforum.ru/ turbo-pascal/ thread493336.html | Turbo Pascal Сравнение массивов в лексикографическом порядке Pomogite kto 4em mozhet. Sam pytalsja, polu4ilsja - bred! Вводятся 2 массива одинакового размера. Какой из них больше, если сравнивать их в лексикографическом порядке (как строки). Zaranee spasibo. https://www.cyberforum.ru/ turbo-pascal/ thread493148.html |
Turbo Pascal Последовательность чисел, содержащаю средние арифметические соседних элементов исходной последовательности. Разработать программу на Object Pascal, решающую задание. Если речь идет о вводе набора значений, использовать для ввода ListBox. Предусмотреть 2 кнопки, по нажатию одной из которых вывод идет в ListBox2, а при нажатии другой - в StringGrid.. Дана последовательность чисел. Построить новую последовательность, содержащую средние арифметические соседних элементов исходной последовательности. Я... |
Turbo Pascal Дана последовательность чисел ai. Построить новую последовательнось Прога для Delphi/Object pascal. Не понимаю задание,4то за индекс такой. Дана последовательность чисел ai. Построить новую последовательнось, где каждый элемент bi=ai*ai-1. (i - индекс ) Помагите или подскажите пжл. https://www.cyberforum.ru/ turbo-pascal/ thread492712.html |
LadyInLove
|
|
0 | |
Найти среди чисел X1,X2 ...Xn два числа, модуль разности которых имеет наименьшее значение - Turbo Pascal - Ответ 275133614.01.2011, 12:05. Показов 3110. Ответов 2
Метки (Все метки)
Даны: целое число n, действительные числа X1, X2,X3....Xn.
Найти среди чисел X1,X2 ...Xn два числа, модуль разности которых имеет наименьшее значение. помогите если не сложно всю голову уже сломала =( Вернуться к обсуждению: Найти среди чисел X1,X2 ...Xn два числа, модуль разности которых имеет наименьшее значение Turbo Pascal |
14.01.2011, 12:05 | |
Готовые ответы и решения:
2
Найти среди заданных чисел два таких, модуль разности которых имеет наименьшее значение Даны три различных действительных числа. Найти два числа, модуль разности которых имеет наибольшее/наименьшее значение Найти два числа, модуль разности которых имеет наибольшее значение Найти два числа, модуль разности которых имеет наибольшее значение |
14.01.2011, 12:05 | |
14.01.2011, 12:05 | |
Помогаю со студенческими работами здесь
0
Даны пять различных целых чисел. Найти среди них два числа, модуль разности которых имеет: а) наибольшее значение б) наименьшее значение Найти среди элементов массива два числа, модуль разности которых имеет наименьшее значение. Даны три различных действительных числа. Найти среди них два числа, модуль разности которых имеет: наибольшее значение, наименьшее значение Найти среди трех действительных чисел два числа, модуль разности которых имеет наибольшее значение |