составить программу на паскале

[andre ermax]

Существуют числа,обладающие следующими свойствами:
-число делится на все свои цифры
-число,полученное из данного записью цифр в обратном порядке,тоже делится на все свои цифры
Составить программу нахождения всех трехзначных чисел,обладающими этими свойствами,при этом числа с одинаковой первой и последней цифрами не рассматривать

Помогите пожалуйста

[andre ermax]

Составить программу,определяющую сумму ряда s=1+1/2+1/3+1/4..+1/N;
Вывести номера членов ряда со значением из диапазона 0.03..0.05.

Помогите пожалуйста

[andre ermax]

В массиве 100 случайных реальных чисел 0 до 1 найти максимум суммы двух элементов.

Помогите пожалуйста

[piastr]

Сообщение от andre ermax

В массиве 100 случайных реальных чисел 0 до 1 найти максимум суммы двух элементов.

Помогите пожалуйста

Предлагаю следующий алгоритм:
1. найти максимальный элемент в массиве [1..100]
2. поменять найденный элемент с первым элементом в массиве
3. найти максимальный элемент в массиве [2..100] (т.е. начиная со второго)
4. сумма найденного элемента с первым элементом в массиве будет искомой (максимум суммы двух элементов = сумма двух максимальных элементов)