![]() Дано вещественное число A (> 1). Вывести наименьшее из целых чисел N, для которых сумма 1 + 1/2 + . + 1/N будет больше A, и саму эту сумму - Pascal - Обсуждение 910448 |
|
Обсуждение
Всего сообщений: 2
|
||||
Имя | Дата | Сообщение | ||
Читать обсуждение полностью: Дано вещественное число A (> 1). Вывести наименьшее из целых чисел N, для которых сумма 1 + 1/2 + . + 1/N будет больше A, и саму эту сумму |
||||
zuza | 23.06.2013 23:42 |
https://www.cyberforum.ru/post4762591.html
Дано вещественное число A (> 1). Вывести наименьшее из...
|
||
rjxxx | 23.06.2013 23:53 |
Решение https://www.cyberforum.ru/post4762633.html
на просторах интернета:
var
a,s:real;
n:longint;...
|
||
|
||||
Similar |
Дано вещественное число A (>1). Вывести наименьшее из целых чисел N, для которых сумма 1+…+1/N будет больше A, и сумму
Вывести наибольшее из целых чисел N, для которых сумма будет больше A
|
|||
Ads |
|
|||
MoreAnswers |
Вывести наибольшее из целых чисел, для которого заданная сумма будет меньше заданного числа, и саму эту сумму
|
|||