|
|
Другие темы раздела | |
Turbo Pascal Определить количество одинаковых подряд стоящих символов строки, и удалить повторяющиеся
https://www.cyberforum.ru/ turbo-pascal/ thread1285247.html Добрый вечер, не могу разобраться как написать программу, возможно кто разбирается подскажет... Вводится строка произвольной длины. Определить количество одинаковых подряд стоящих символов.+удалить повторяющиеся. Вывести исходную строку и результат обработки строки. |
Turbo Pascal Написать программу с рекурсивной функцией, вычисляющей сумму элементов одномерного массива Написать программу с рекурсивной функцией, вычисляющей сумму элементов одномерного массива. ТРЕБУЕТСЯ через Косвенную рекурсию. Помогите, пожалуйста. |
Turbo Pascal Ошибка в функции поиска наибольшего элемента массива
https://www.cyberforum.ru/ turbo-pascal/ thread1285165.html Суть задачи: мне нужно найти максимальный элемент массива из первых N его элементов. Я не понимаю в чем ошибка, но эта программа вместо максимального элемента массива постоянно выдает одно и то же число. Program p31; type artype=array of real; Function maximum(x:artype;n:longint;):real; var i:longint; max:real; begin x:=max; for i:=2 to n do |
Turbo Pascal Сортировать массив по убыванию у меня есть программа, которая должна: 1)спрашивать длину массива 2)спрашивать каждое число массива 3)сортировать массив по убыванию, но после выполнения 2 шага она останавливается type q = array of byte; var https://www.cyberforum.ru/ turbo-pascal/ thread1285128.html |
В одномерном массиве все положительные элементы увеличить в три раза Turbo Pascal Ввести одномерный массив поэлементно с помощью клавиатуры или получить его , используя генератор случайных чисел. Одномерный массив может быть целочисленного типа или типа с плавающей точкой . Количество элементов в одномерном массиве должна быть не менее десяти. 2. Вывести на экран монитора исходный одномерный массив в виде строки чисел. 3. Выполнить необходимые преобразования над исходным... |
Turbo Pascal Вычислить и вывести на экран в виде таблицы значения функции, заданной графически, на интервале
https://www.cyberforum.ru/ turbo-pascal/ thread1285099.html Вычислить и вывести на экран в виде таблицы значения функции, заданной графически, на интервале от Хнач до Xкон с шагом dx. Интервал и шаг задать таким образом, чтобы проверить все ветви программы. Таблицу снабдить заголовком и шапкой. https://www.cyberforum.ru/attachments/447305d1414340505 (фото к заданию) |
Turbo Pascal Написать программу, которая по введенному значению аргумента вычисляет значение функции
https://www.cyberforum.ru/ turbo-pascal/ thread1285083.html Написать программу, которая по введенному значению аргумента вычисляет значение функции, заданной в виде графика. Параметр R вводится с клавиатуры. Буду очень благодарен, если сделаете! |
Turbo Pascal Вычислить бесконечную сумму с заданной точностью Дорогие друзья, помогите пожалуйста решить задачу в паскале. Вычислить бесконечную сумму с заданной точностью \varepsilon > 0 \sum_{i=1 }^{\infty}* \frac{1}{i*i} Спасибо заранее. |
Turbo Pascal Составить программу приближенного вычисления значения
https://www.cyberforum.ru/ turbo-pascal/ thread1284991.html Дорогие друзья, помогите пожалуйста решить задачу в паскале. Составить программу приближенного вычисления значения \pi/2 , используя формулу \pi / 2\ =\ \frac{2}{1}*\frac{2}{3}*\frac{4}{3}*\frac{4}{5}*\frac{6}{5}*\frac{6}{7} \cdot \cdot \cdot =\prod_{i=1}^{\infty} \frac{(2i)(2i) }{(2i-1)(2i+1)} . Вычисления заканчивать если \left|\frac{(2i)*(2i)}{(2i-1)(2i+1)}-1 \right|< \varepsilon... |
Turbo Pascal Найти s - сумму всех числе Фибоначчи, которые не превосходят 10 Дорогие друзья, помогите пожалуйста решить задачу в паскале. Числа Фибоначчи определяются формулами f0=f1=1; fn=fn-2+fn-1 при n=2,3... а) найти первое число Фибоначчи, больше m (m>1) б) Найти s - сумму всех числе Фибоначчи, которые не превосходят 10. Спасибо заранее. https://www.cyberforum.ru/ turbo-pascal/ thread1284990.html |
Дано натуральное число n. Получить наименьшее число заданного вида Turbo Pascal Дорогие друзья, помогите пожалуйста решить задачу в паскале. Дано натуральное число n. Получить наименьшее число вида 2r, превосходящее n. Спасибо заранее. |
Turbo Pascal Сформировать на экране горизонтальное меню при помощи процедур и функций модулей CRT и DOS
https://www.cyberforum.ru/ turbo-pascal/ thread1284963.html Разработать алгоритм и программу решения задачи, в которой необходимо сформировать на экране горизонтальное меню при помощи процедур и функций модулей CRT и DOS. Меню должно содержать следующие пункты: «Файл», «Правка», «Вид», «Вставка», «Формат», «Окно», «Выход». Для пункта меню «Выход» должен быть реализован обработчик выхода из программы. |
0 / 0 / 0
Регистрация: 13.10.2014
Сообщений: 19
|
|
0 | |
Найти среднее геометрическое элементов с четными номерами массива - Turbo Pascal - Ответ 677246926.10.2014, 23:49. Показов 911. Ответов 2
Метки (Все метки)
С=(-1,2,5,4,3,1,0,-2,1,-1,5,4,-4)
Вернуться к обсуждению: Найти среднее геометрическое элементов с четными номерами массива Turbo Pascal
0
|
26.10.2014, 23:49 | |
Готовые ответы и решения:
2
Определить среднее геометрическое положительных элементов массива с четными номерами Найти среднее геометрическое элементов с нечетными номерами массива Найти среднее геометрическое элементов с четными номерами массива: С=(-1,2,5,4,3,1,0,-2,1,-1,5,4,-4) Найти среднее геометрическое элементов с чётными номерами массива |
26.10.2014, 23:49 | |
26.10.2014, 23:49 | |
Помогаю со студенческими работами здесь
0
Функции. Найти среднее арифметическое всех элементов с четными номерами и количество нулевых элементов в трех массивах. Найти сумму четных элементов массива и среднее арифметическое элементов с четными номерами Найти сумму четных элементов массива и среднее арифметическое элементов с четными номерами Одномерные массивы: Найти среднее значение элементов с четными номерами, и произведение элементов с номерами, делящимися нацело на 3 |