Дано целое число N (> 1). Вывести наибольшее из целых чисел K, для которых сумма 1 + 2 + ... + K будет меньше или равна N, и саму эту сумму
Категория: Delphi/Pascal
2013-03-15 15:38:59
Дано число A (> 1). Вывести наименьшее из целых чисел K, для которых сумма 1 + 1/2 + ... + 1/K будет больше A, и саму эту сумму
Категория: Delphi/Pascal
2013-03-10 22:00:19
Дано число A (> 1). Вывести наибольшее из целых чисел K, для которых сумма 1 + 1/2 + ... + 1/K будет меньше A, и саму эту сумму
Категория: Delphi/Pascal
2013-03-10 21:59:02
Начальный вклад в банке равен 1000 руб. Через каждый месяц размер вклада увеличивается на P процентов от имеющейся суммы
Категория: Delphi/Pascal
2013-03-04 16:37:41
По данному P определить, через сколько месяцев размер вклада превысит 1100 руб.,
и вывести найденное количество месяцев K (целое число) и итоговый размер вклада S (вещественное число). (P — вещественное число, 0 < P < 25).
Cпортсмен-лыжник начал тренировки, пробежав в первый день 10 км. Каждый следующий день он увеличивал длину пробега на P процентов от пробега предыдущего дня
Категория: Delphi/Pascal
2013-03-04 16:34:00
По данному P определить, после какого дня суммарный пробег лыжника за все дни превысит 200 км, и вывести найденное количество дней K (целое) и суммарный пробег S (вещественное число).
P — вещественное, 0 < P < 50.
Дано целое число N (> 0). Используя операции деления нацело и взятия остатка от деления, вывести все его цифры, начиная с самой правой (разряда единиц)
Категория: Delphi/Pascal
2013-03-03 16:34:11
Дано целое число N (> 0). Используя операции деления нацело и взятия остатка от деления, найти количество и сумму его цифр
Категория: Delphi/Pascal
2013-03-03 16:32:55