Дано целое число N (> 0). Найти сумму 1 + 1/2 + 1/3 + … + 1/N
Категория: Delphi/Pascal
2011-12-23 16:39:19
Найти сумму квадратов всех чисел, расположенные между A и B
Категория: Delphi/Pascal
2011-12-23 16:38:08
Даны два целых числа A и B.
Найти произведение всех чисел, расположенные между A и B
Категория: Delphi/Pascal
2011-12-23 16:35:56
Даны два целых числа A и B (A < B).
Даны два целых числа A и B (A < B). Посчитать количество чисел от A до B включительно
Категория: Delphi/Pascal
2011-12-23 16:31:48
Выведите все целые числа, расположенные между A и B (не включая числа A и B), а также количество N этих чисел
Категория: Delphi/Pascal
2011-12-23 16:22:52
Даны два целых числа A и B.
Вывести все целые числа, расположенные между A и B (включая сами числа A и B), а также количество N этих чисел
Категория: Delphi/Pascal
2011-12-23 16:19:19
Даны два целых числа A и B.
Даны два целых числа: D (день) и M (месяц), определяющие правильную дату. Вывести знак Зодиака, соответствующий этой дате
Категория: Delphi/Pascal
2011-12-21 19:51:46
Даны два целых числа: D (день) и M (месяц), определяющие правильную дату. Вывести знак Зодиака, соответствующий этой дате: «Водолей» (20.1–18.2), «Рыбы» (19.2–20.3), «Овен» (21.3–19.4), «Телец» (20.4–20.5), «Близнецы» (21.5–21.6), «Рак» (22.6–22.7), «Лев» (23.7–22.8), «Дева» (23.8–22.9), «Весы» (23.9–22.10), «Скорпион» (23.10–22.11), «Стрелец» (23.11–21.12), «Козерог» (22.12–19.1)
Дано целое число в диапазоне 100–999. Вывести строку-описание данного числа, например: 256 — «двести пятьдесят шесть», 814 — «восемьсот четырнадцать»
Категория: Delphi/Pascal
2011-12-21 19:48:52
Дано целое число в диапазоне 10–40, определяющее количество учебных заданий по некоторой теме. Вывести строку-описание указанного количества заданий, обеспечив правильное согласование числа со словами «учебное задание»
Категория: Delphi/Pascal
2011-12-21 19:47:54
например: 18 — «восемнадцать учебных заданий», 23 — «двадцать три учебных задания», 31 — «тридцать одно учебное задание»