Программирование на Free Pascal и Lazarus - тест 4

Напишите программу, используя процедуры и функции. Вводится последовательность целых чисел, 0 — конец последовательности. Определить, содержит ли последовательность хотя бы одно число, сумма цифр в котором равна их количеству. При решении задачи создать процедуру, которая возвращает сумму и количество цифр в числе.

Напишите программу, используя процедуры и функции. Вводится последовательность целых чисел, 0 — конец последовательности. Определить, содержит ли последовательность хотя бы одно совершенное число. Для определения совершенного числа создать функцию.

Напишите программу, используя процедуры и функции. Вводится последовательность из  целых положительных элементов. Определить, содержит ли последовательность хотя бы одно простое число. Для определения простого числа создать функцию.

Напишите программу, используя процедуры и функции. Вводится последовательность из  целых положительных элементов. Посчитать количество чисел палиндромов. Для определения палиндрома создать функцию.

Напишите программу, используя процедуры и функции. Вводится последовательность из  целых положительных элементов. Подсчитать количество совершенных чисел в последовательности. Для определения совершенного числа создать функцию.

Напишите программу, используя процедуры и функции. Поступает последовательность целых положительных чисел, 0 — конец последовательности. Определить, в каком из чисел больше всего делителей. Для подсчёта делителей числа использовать функцию.

Напишите программу, используя процедуры и функции. Поступает последовательность целых положительных чисел, 0 — конец последовательности. Определить, в каком из чисел больше всего цифр. Для подсчёта количества цифр числа использовать функцию.

Напишите программу, используя процедуры и функции. Вывести на экран значения функции  и её первой производной , в диапазоне от _5 до 5. Для вычисления значений  и  создать функции.

Напишите программу, используя процедуры и функции. Вывести на экран  первых чисел Фибоначчи. Для вычисления -го числа Фибоначчи использовать функцию.

Напишите программу, используя процедуры и функции. Вводится последовательность из  целых положительных элементов. Найти число с минимальным количеством цифр. Для определения количества цифр в числе использовать функцию.

Напишите программу, используя процедуры и функции. Вводится последовательность из  целых элементов. Для всех положительных элементов последовательности вычислить значение факториала и вывести его на печать. Вычисление факториала оформить в виде функции.

Напишите программу, используя процедуры и функции. Поступает последовательность целых положительных чисел, 0 — конец последовательности. Вывести на экран все числа последовательности, не являющиеся простыми, и их делители. Определение простого числа оформить в виде функций.

Напишите программу, используя процедуры и функции. Вводится последовательность из  целых элементов. Вывести на экран все числа последовательности, являющиеся совершенными, и их делители. Определение совершенного числа оформить в виде функций.

Напишите программу, используя процедуры и функции. Поступает последовательность целых положительных чисел, 0 — конец последовательности. Найти среднее арифметическое простых чисел в этой последовательности. Определение простого числа оформить в виде функций.

Напишите программу, используя процедуры и функции. В последовательности из  целых положительных элементов найти число с наибольшим количеством нулей в своём представлении. Создать функцию для подсчёта нулей в числе.

Напишите программу, используя процедуры и функции. В последовательности из  целых положительных элементов найти сумму всех палиндромов. Для определения палиндрома создать функцию.

Напишите программу, используя процедуры и функции. Поступает последовательность целых положительных чисел, 0 — конец последовательности. Посчитать количество элементов последовательности, имеющих в своём представлении цифру 0. Создать процедуру, возвращающую значение "истина", если в числе есть нули, и "ложь" в противном случае.

Напишите программу, используя процедуры и функции. Поступает последовательность целых положительных чисел, 0 — конец последовательности. Для каждого числа найти количество нулей и единиц. Создать процедуру, которая возвращает количество нулей и единиц в заданном числе.

Напишите программу, используя процедуры и функции. Вводится последовательность из  целых элементов. Для каждого элемента последовательности найти среднее значение его цифр. Создать функцию для расчёта среднего значения цифр в числе.

Напишите программу, используя процедуры и функции. Поступает последовательность целых положительных чисел, 0 — конец последовательности. Определить количество цифр и наименьшую цифру для каждого числа последовательности. Написать процедуру, которая для заданного числа возвращает два параметра: количество цифр в нём и наименьшую цифру.

Напишите программу, используя процедуры и функции. Вводится последовательность из  целых элементов. Для каждого элемента последовательности вывести на экран количество цифр и количество делителей. Написать процедуру, которая рассчитывает оба параметра.

Напишите программу, используя процедуры и функции. Поступает последовательность целых положительных чисел, 0 — конец последовательности. Записать каждое число последовательности в обратном порядке. Например, 12 345 → 54 321. Создать функцию для преобразования числа.

Напишите программу, используя процедуры и функции. Поступает последовательность целых положительных чисел, 0 — конец последовательности. Для каждого элемента последовательности вывести на экран количество цифр в числе и наибольшую цифру. Написать процедуру, которая возвращает количество цифр и наибольшую цифру заданного числа.

Напишите программу, используя процедуры и функции. Вводится последовательность из  целых положительных элементов. Для простых элементов последовательности определить сумму цифр. Написать процедуру, которая проверяет, является ли число простым, и вычисляет сумму цифр в нём. Если число простым не является, то процедура выдает соответствующее сообщение.

Напишите программу, используя процедуры и функции. Поступает последовательность целых положительных чисел, 0 — конец последовательности. Для каждого числа определить сумму и количество цифр в числе. Написать процедуру для подсчёта суммы и количества цифр в числе.