Форум программистов, компьютерный форум, киберфорум
PascalABC.NET
Войти
Регистрация
Восстановить пароль
Другие темы раздела
PascalABC.NET Вычислить сумму всех значений функции у, для которой выполняются неравенства вычислить сумму всех значений функции у, для которой выполняются неравенства y <4 или y> 12. нужно использовать функцию https://www.cyberforum.ru/ pascalabc-net/ thread967072.html PascalABC.NET типизированные файлы
1.Имеется типизированный файл, элементами которого являются отдельные символы. Записать в другой файл все символы, кроме 'a' и 'z', из имеющегося файла (буквы 'a' и 'z' в исходном файле обязательно...
PascalABC.NET Добавление предела символов https://www.cyberforum.ru/ pascalabc-net/ thread966749.html
Нужно добавить в код, предел в 150 символов, если строка длиннее то вывести что слишком длинная. var s,sn,sg: string; i: integer; begin write('s='); readln(s); sn:=''; for i:=1 to...
PascalABC.NET Вычислить значение выражения воп моя программа что с ней не так? при вводе х = 16 получается у = -2780.00, ответ оч ненравится Program _2; var x,y:real; begin write('x='); readln(x); if x<3.2 then y:=(x*x*x*x)+9 else... https://www.cyberforum.ru/ pascalabc-net/ thread966596.html
уравнение методом ньютона PascalABC.NET
Уравнение x^2-5*sin(x)=0 с точностью ε=0,0001 и интервале изоляции корня методом Ньютона! У меня есть блок-схема но у меня по ней не получается, может в ней ошибка? Если можно напишите именно по...
PascalABC.NET Вычислить сумму и у меня никаких идей, что мне с этим делать. https://www.cyberforum.ru/ pascalabc-net/ thread966270.html
PascalABC.NET Исправить синтаксическую ошибку в коде Ребят я не могу разобраться,он просит точку с запятой после object,в чем беда не знаю ;( uses GraphABC,Crt; type Tmesto=Object x,y=integer; https://www.cyberforum.ru/ pascalabc-net/ thread966090.html PascalABC.NET Как добавить иконку приложения?
Подскажите, как добавить иконку приложения в Pascal ABC.NET
PascalABC.NET Сначала задано число N - количество элементов в массиве, N10000. и Сначала задано число N - количество элементов в массиве https://www.cyberforum.ru/ pascalabc-net/ thread966047.html
1) Сначала задано число N - количество элементов в массиве, N10000. Далее через пробел записаны N чисел - элементы массива. Все числа по модулю не превосходят 109. Выведите одно число –...
PascalABC.NET Построить следующие компьютерные модели: https://www.cyberforum.ru/ pascalabc-net/ thread965835.html
Модель Архимеда нахождения приближенного значения числа .
PascalABC.NET Построить следующие компьютерные модели:
1. Модель предельного перехода a. Первый замечательный предел; b. Второй замечательный предел;
PascalABC.NET Объясните исходный код программы Пользователь вводит 2 числа, от 1000 до 9999 (или любой другой интервал), и программа показывает только те числа, которые содержат только три одинаковых цифры: 6555, 8788, 9939 (и так далее). ... https://www.cyberforum.ru/ pascalabc-net/ thread965356.html
0 / 0 / 0
Регистрация: 12.09.2013
Сообщений: 20
0

Даю вещественно число A(>1). Вывести наименьшее из целых чиселN, для которых сумма 1+1/2+...+1/N будут больше A, и саму эту сумму - PascalABC.NET - Ответ 5127200

02.10.2013, 14:03. Показов 1517. Ответов 1
Метки (Все метки)

Студворк — интернет-сервис помощи студентам
Даю вещественно число A(>1). Вывести наименьшее из целых чиселN, для которых сумма 1+1/2+...+1/N будут больше A, и саму эту сумму.
Помогите сделать программу, которая будет это решать

Вернуться к обсуждению:
Даю вещественно число A(>1). Вывести наименьшее из целых чиселN, для которых сумма 1+1/2+...+1/N будут больше A, и саму эту сумму PascalABC.NET
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
02.10.2013, 14:03
Готовые ответы и решения:

Дано вещественное число A (> 1). Вывести наименьшее из целых чисел N, для которых сумма 1 + 1/2 + . + 1/N будет больше A, и саму эту сумму
Дано вещественное число A (&gt; 1). Вывести наименьшее из целых чисел N, для которых сумма 1 + 1/2 +...

Дано вещественное число A (> 1). Вывести наименьшее из целых чисел N, для которых сумма 1 + 1/2 + . + 1/N будет больше A, и саму эту сумму
Дано вещественное число A (&gt; 1). Вывести наименьшее из целых чисел N, для которых сумма 1 + 1/2 +...

Вывести наименьшее из целых чисел N, для которых сумма 1 + 1/2 + ... + 1/N будет больше A, и саму эту сумму.
VI.Операторы цикла 19. Показать, что для всех п = 1, 2, 3, N (15 + 25 + ... + n5) + (17 + 27 +...

Вывести наименьшее из целых чисел K, для которых сумма 1 + 1/2 + … + 1/K будет больше A, и саму эту сумму.
Надо решить две задачки выручите пожалуйста! 1.Дано вещественное число X и целое число N (&gt; 0)....

1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
02.10.2013, 14:03
Помогаю со студенческими работами здесь

Вывести наименьшее из целых чисел N, для которых сумма 1+1/2+...+1/N будет больше А, и саму эту сумму.
1) Дано вещественное число А (&gt;1). Вывести наименьшее из целых чисел N, для которых сумма...

Дано число A (>1). Вывести найбольшее из целых чисел К, для которых сумма 1+1/2+.+1/k будет меньше А и саму эту сумму
Дано число A (&gt;1). Вывести найбольшее из целых чисел К, для которых сумма 1+1/2+...+1/k будет...

Вывести наибольшее из целых N, для которых сумма 1+1\2+...+1\N будет меньше А, и саму эту сумму.
Здравствуйте. Помогите пожайлуста решить задачку. Заранее спасибо! Задача: Дано вещественное...

Вывести наибольшее из целых чисел К, для которых сумма 1+1/2+.+1/K будет меньше А, и саму эту сумму
Здравствуйте, помогите пожалуйста написать программы на языке паскаль.Заранее благодарю. 2)...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru