Помогите плз решить 5 задач через массивы!

[sp.caster]

№1.
У вас есть доллары. Вы их хотите обменять на рубли. Есть информация о стоимости купли-продажи в банках города. В городе N банков. Составьте программу, определяющую, какой банк выбрать, чтобы выгодно обменять рубли.
№2.
Найдите объем каждого из 10 цилиндров, для которых заданы радиусыоснований в массиве R (случайные целые числа от 5 до 25 см) и высоты в массиве Н (случайные целые числа от 10 до 30 см).
№3.
Задан массив В(42). Вывести его шесть строк.
№4.
В автопарке при обработке путевых листов получены два массива: массив s(n) пробега автомашины при n выездах и массив b(n) соответствующего расхода бензина. Записать прогармму, которая:
а) вычисляет суммарный пробег и суммарный расход бензина при всех выездах;
б) вычисляет средний пробег и средний расход бензина при одном выезде;
в) определяет максимальный и минимальный пробег при одном выезде и их номера в массиве;
г) вычисляет важный показатель экономичности автомобиля - средний расход бензина в литрах на 100 километров;
д) упорядочевает массив пробега по убыванию;
е) выдает исходные массивы, упорядоченный массив и результаты решения.
При формировании исходных массивов использовать функцию RND.
№5.
В качестве первого члена последовательности берем четырех разрядное целое число, цифры которого не все одинаковые. Каждый последующий элемент образуем следующим образом. Цифры предыдущего элемента располагаем в убывающем порядке (первое число) и в возрастающем порядке (второе число). Из первого числа вычитаем второе и получаем следующий элемент последовательности. Показать, что такая последовательность, начиная с некоторого элемента, становится постоянной и равной некоторому числу. Чему равно это число?
Помогите плз с их решением

[Stilet]

У вас есть доллары

Если бы...
Сделай массив записей, с курсом валют, а потом пройди в цикле и найди минимум по курсу.

Задан массив В(42). Вывести его шесть строк.

В 6 строк или че?

[alex_fcsm]

1. По первой задаче нужно все-таки найти максимум

У вас есть доллары. Вы их хотите обменять на рубли.

из предложенных курсов

max:=1;
for i:=2 to n do
 if a[i]>a[max] then max:=i;

2. Применить формулу pi * sqr(R) * H ко всем элементам массива

for i:=1 to 10 do
 begin
   v:=pi * sqr(R[i]) * H[i]
 end;

3. Непонятное условие
4. Решал уже на форуме