Задать с помощью генератора случайных чисел N ряда в кинотеатре - целое число от 1 до 25. Определить, сколько стоит билет, если его цена зависит от

У меня фантазии не хватает:|

е , его размер 32 х 32 пикселей

Помогите решить 3 и 4 задачу.
Программа Паскаль.
Заранее вам благодарен

1) найти и вывести сумму его цифр
2) сформировать число, в котором поменяются разряды (допустим будет число 13, нужно сделать, что бы было 31 и т.п.)
II В паскале с помощью генератора случайных чисел получить трехзначное число и определить, является ли оно полимером (например 121 - является, 123 - нет)

2. Массив из 6 отрицательных и положительных целых чисел вводится в области описания констант. Найти сумму положительных элементов массива.
3. Массив из 5 целых чисел вводится с клавиатуры в строку. Найти сумму элементов массива, стоящих на чётных позициях. Вывести исходный массив и полученную сумму.
4. Массив из 40 целых чисел из промежутка [10,90] задается с помощью генератора случайных чисел. Найти сумму элементов массива, кратных n . Вывести исходный массив и полученную сумму.
Помогите кто в чем может.

Задать с помощью генератора случайных чисел час суток целое число от 0 до 23. Напечатайте соответствующее этому времени сообщение: "Доброе утро", "Добрый день",
"Добрый вечер", "Доброй ночи".

найти сумму четных элементов 2 подсчитать количество элементов массива равных2 3 обнулить все положительные элементы массива