Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal написать программу с процедурой http://www.cyberforum.ru/pascal/thread956599.html
Найти длину окружности и площади пяти кругов, если их радиусы 2, 4, 6, 8, 10. программу сделать с процедурой
Алгоритм по формуле Pascal
Cоставить циклический алгоритм и программу для вычисление результата по формуле: ln\left( nx-1\right)\sum_{k=1}^{n}\frac{\sqrt{{e}^{-kx}+{x}^{k-1}}}{\cos\left( kx\right)+\sin \left(kx \right)}
Pascal Найти среднее арифметическое элементов массива
Помогите решить.(паскаль) Найти среднее арифметическое элементов массива только для элементов, которые входят в интервал от 10 до 50.
Pascal Вывести номера максимальных площадей Надо вывести номера треугольников с максимальной площадью. (например, если 2 треугольника имеют максимальную площадь, то должно выводиться 2 числа) Не знаю как сделать=( program treugolnik; var... http://www.cyberforum.ru/pascal/thread956336.html
Pascal Вычислить значение выражения http://www.cyberforum.ru/pascal/thread956334.html
Написать программу по формуле: \left( \sin \left( 0.5\times \pi \times x\right)+\sqrt{x}\right)/\sqrt{\left|\cos \left( \pi\times x \right)+1\right|}\times {e}^{\sqrt{x}}
Pascal Определить функцию,находящую максимум из двух различных чисел
Даны 6ть различных чисел. Определить максимальное из них.(Определить функцию,находящую максимум из двух различных чисел.)
Определить функцию для расчёта периметра равнобедренной трапеции по ее основаниям и высоте Pascal
Даны основания и высоты двух равнобедренных трапеций. Найти сумму их периметров. (Определить функцию для расчёта периметра равнобедренной трапеции по ее основаниям и высоте.)
Pascal Описать процедуру Smooth1(A, N), выполняющую сглаживание вещественного массива 4. Описать процедуру Smooth1(A, N), выполняющую сглаживание вещественного массива A размера N следующим образом: элемент AK заменяется на среднее арифметическое первых K исходных элементов массива A.... http://www.cyberforum.ru/pascal/thread956275.html
Pascal Описать функцию Leng вещественного типа, находящую длину отрезка AB на плоскости по координатам его концов http://www.cyberforum.ru/pascal/thread956273.html
3. Описать функцию Leng(xA, yA, xB, yB) вещественного типа, находящую длину отрезка AB на плоскости по координатам его концов (xA, yA, xB, yB — вещественные параметры). С помощью этой функции найти...
Pascal Составьте блок-схему к алгоритму решения следующей задачи: Три автопредприятия эксплуатируют автомобили "Форд" марок "Эскорт", "Мондео", "Торос". Количество имеющихся автомобилей указанных марок на этих предприятиях относятся как N1:N2:N3, M1:M2:M3,... http://www.cyberforum.ru/pascal/thread956246.html
fortonk
0 / 0 / 0
Регистрация: 14.09.2013
Сообщений: 1
0

Найти ближайшее меньшее, чем заданное число

17.09.2013, 21:32. Просмотров 1163. Ответов 1
Метки (Все метки)

Доброго времени суток. Как задать этот бесконечный ряд чисел и сравнить потом с заданым числом?

Задание:
Среди чисел 1, 1+1\2, 1+1\2+1\3... найти ближайшее меньшее, чем заданное число A.

Вернуться к обсуждению:
Найти ближайшее меньшее, чем заданное число
0
Лучшие ответы (1)
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
17.09.2013, 21:32
Готовые ответы и решения:

Файл: найти среднее арифметическое, найти число, ближайшее к среднему арифметическому
с помощью датчика случайных чисел создать файл из 40 целых чисел.вывести все четные числа из него....

Найти ближайшее к X натуральное число, кратное N
Привет всем! Такая проблемка...задали контрошу по информатике, нужно написать задачку, а у меня с...

Массив. Найти элементы, больше, чем заданное значение, заменить их на нули
Помогите написать программу: В массиве А(100) найти элементы ,больше, чем заданное значение...

Дано натуральное число N. Получить наименьшее число вида 4k, меньшее N.
Дано натуральное число N. Получить наименьшее число вида 4k, меньшее N.

Ближайшее число
Пользователь вводит натуральное число n (0<n<32750) и через пробел цифру с. Программа выводит...

1
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2019, vBulletin Solutions, Inc.