|
|
Другие темы раздела | |
Turbo Pascal Начертить схему алгоритма начертить схему алгоритма для данной процедуры procedure conclusion(a: amas; n: integer); var i: integer; begin writeln('Данная программа из последовательности находит порядковый номер чис-ла,'); writeln('которое ближе всего к заданному числу'); writeln('Исходный массив'); for i := 1 to n do write(a:6:2); https://www.cyberforum.ru/ turbo-pascal/ thread2202396.html |
Turbo Pascal Получить все совершенные числа, меньшие n Нашел программу к моей задаче , но не могу понять что там написано. Условия:Натуральное число называется совершенным, если она равно сумме всех своих делителей,за исключением себя самого. Число 6-совершенное , так как 6=1+2+3. Число 8- не совершенное , так как 8 не =1+2+4. Дано натуральное число n. Получить все совершенные числа , меньше n. Bот сама программа: ... |
Turbo Pascal Программа для решения уравнения
https://www.cyberforum.ru/ turbo-pascal/ thread2202085.html Нужно написать программу, чтобы решала уравнение y=\begin{cases} 3x^5+a & \text{, if } x\,<\,-8 \\\\ a^2 & \text{, if } -8\leq x\,<\,a \\\\ \sqrt{\frac{x^2+ax}{5.8+x}} & \text{, if } x\geq a \end{cases} a=1.2 |
Turbo Pascal Заменить все пробелы символом "#"
https://www.cyberforum.ru/ turbo-pascal/ thread2201915.html Введите текст (не менее 10 слов). Подсчитать количество слов и количество пробелов в тексте. Заменить все пробелы символом "#". Распечатать полученный текст. |
Сделать калькулятор матриц (сложение, вычитание, умножение) Turbo Pascal Всем привет! Есть задание, сделать калькулятор матриц (сложение, вычитание, умножение) в ГРАФИЧЕСКОМ режиме в Turbo Pascal. Как реализовать код? |
Turbo Pascal Определить наибольшую цифру в пятизначном числе.
https://www.cyberforum.ru/ turbo-pascal/ thread2201819.html Помогите решить задачу: Ввести с клавиатуры пятизначное число. Определить наибольшую цифру в этом числе. Заранее спасибо. |
Turbo Pascal Вывести на экран три эллипса которые пересекаются и подписать кто сделал рисунок Вывести на экран три эллипса которые пересекаются и подписать кто сделал рисунок https://www.cyberforum.ru/ turbo-pascal/ thread2201752.html |
Вывести на экран изображение лодки с парусами Turbo Pascal Вывести на экран изображение лодки с парусами . |
Turbo Pascal Построить вектор из наименьших по абсолютной величине элементов каждой строки матрицы Пусть дана матрица A(nxn). Постройте вектор, каждый элемент которого содержит наименьший по абсолютной величине элемент строки. https://www.cyberforum.ru/ turbo-pascal/ thread2201654.html | Turbo Pascal Дана вещественная матрица. Упорядочить ее строки по неубыванию их наибольших элементов Здравствуйте, помогите пожалуйста решить эту задачу в 4 разных условиях. Дана вещественная матрица. Упорядочить ее строки по неубыванию их наибольших элементов. Матрицы следует разместить в "куче" при выполнении следующих условий: а) число строк и число столбцов - константы; б) число строк - константа, а число столбцов - исходное данное; в) число строк - исходное данное, число столбцов... https://www.cyberforum.ru/ turbo-pascal/ thread2201378.html |
Добавить процедуру вывода Turbo Pascal Помогите, пожалуйста, я никак не могу сделать процедуру вывода то выдает ошибку тип rray к типу array, то еще что-то. USES CRT; type amas=array of real; procedure massiv (var a:amas); var i, z, m: integer; begin repeat m := 30; |
Turbo Pascal Вычислить длину окружности и площадь круга Радиус окружности равен 800. Вычислить длину окружности и площадь круга. Результаты печатать до 5-го знака. uses Crt; Var r: integer; L, Pl: real; begin ClrScr; r:= 800; L:= 2 * Pi * r; Pl:= Pi * Sqr(r); WriteLn(' Длина окружности: ' , L:6:5); https://www.cyberforum.ru/ turbo-pascal/ thread2199164.html |
0 / 0 / 0
Регистрация: 25.02.2018
Сообщений: 20
|
|
0 | |
Для челночной сортировки определить количество сравнений и обменов - Turbo Pascal - Ответ 1216660927.02.2018, 16:19. Показов 2349. Ответов 8
Метки (Все метки)
Челночная сортировка.
Размерность сортируемого массива: n = 10, n = 50, n = 250. Для указанного в задании алгоритма сортировки необходимо составить программу сорти- ровки целочисленного массива. При этом приведенные программы можно упростить, заменив массив из записей типа item массивом целых чисел. Тогда роль поля item.key (или a[i].key) будет выполнять сам элемент массива a[i]. Исходный массив заполняется случайным образом при помощи обра- щения к стандартной функции random(т), возвращающей псевдослучайные числа в диапазоне от 0 до m – 1. Например: for i := 1 to n do a[i] := random(m); При этом всегда будем считать, что m = 100. Помните о том, что до первого использования функции random в программе необходимо один раз 94 вызвать процедуру без параметров randomize (например, сразу после первого begin). В результате выполнения данного задания необходимо получить для каждой из приведенных в задании размерностей массива число обменов, со- вершаемых в процессе сортировки. Для этого необходимо ввести в програм- му целочисленный счетчик (устанавливаемый в 0 в начале работы алгоритма сортировки), который будет увеличиваться на единицу после каждой опера- ции обмена (т.е. операции присваивания, в правой или левой части которой встречается элемент массива a). Поскольку искомая величина будет меняться с каждым пуском программы (т.к. сортируемый массив задается случайным образом), повторите сортировку (для размерности сортируемого массива) 10 раз и выдайте среднее число обменов за 10 сортировок Вернуться к обсуждению: Для челночной сортировки определить количество сравнений и обменов Turbo Pascal
0
|
27.02.2018, 16:19 | |
Готовые ответы и решения:
8
Количество сравнений и обменов при сортировке матрицы разными способами Определите, сколько обменов сделает алгоритм пузырьковой сортировки по возрастанию для данного массива Методы сортировки: цифровой сортировки и деревьев сравнений Подсчет количества обменов и сравнений в алгоритмах сортировки |
27.02.2018, 16:19 | |
27.02.2018, 16:19 | |
Помогаю со студенческими работами здесь
0
Программа подсчёта количества обменов и сравнений алгоритма сортировки вставками Количество обменов и сравнений в HeapSort Сортировка вставками: количество сравнений и обменов Быстрая сортировка: посчитать количество сравнений и обменов |