| Дружественные числа <- Подпрограммы <- Turbo pascal | 2010-05-26 | | Нахождение в заданном диапазоне пар дружественных чисел. Дружественными называются, если каждое из этих чисел равно сумме делителей другого, исключая это число. | 
4.74 КБ
Cкачать (494)
|
|
| Число элементов больше заданного <- Подпрограммы <- Turbo pascal | 2010-04-05 | | Подсчет количества чисел в массиве, которые больше заданного числа. |
4.37 КБ
Cкачать (453)
|
|
| Совпадающие числа в векторе <- Подпрограммы <- Turbo pascal | 2010-04-05 | | Поиск совпадающих чисел в векторе. Напротив каждого значения необходимо написать Yes (совпадает) или No (не совпадает). |
3.35 КБ
Cкачать (429)
|
|
| Произведение нечетных элементов <- Подпрограммы <- Turbo pascal | 2010-03-29 | | Произведение элементов двух массивов, стоящих на нечетных позициях. |
3.37 КБ
Cкачать (468)
|
|
|
|
| Рамка <- Подпрограммы <- Turbo pascal | 2010-02-26 | | Процедура отображения рамки в текстовом режиме. |
3.92 КБ
Cкачать (477)
|
|
| Числа встречаются два раза <- Подпрограммы <- Turbo pascal | 2010-02-23 | | Найти в последовательности целых чисел те, которые встечаются в ней ровно два раза. |
3.72 КБ
Cкачать (447)
|
|
| Разные цифры в числе <- Подпрограммы <- Turbo pascal | 2010-02-23 | | Вывести все четырехзначные числа, в которых цифры не повторяются. |
2.90 КБ
Cкачать (461)
|
|
| Функция 1 + sh(1+sqr(a)) <- Подпрограммы <- Turbo pascal | 2010-02-23 | | Вычслить значение функции 1 + sh(1+sqr(a)), где sh - внутренняя функция программы. |
4.63 КБ
Cкачать (447)
|
|