Паскаль задача

Нужен листинг в паскале

1) Создать два файла, в каждом из которых находится по одному случайному целому числу. Создать третий файл, в который записать результат возведения числа из первого файла в степень с показателем из второго файла.

2) Создать два файла, в каждом из которых находится 10 случайных целых чисел. Создать третий файл, в который записать средние геометрические модулей соответствующих чисел, находящихся в первых двух файлах.

3) Создать файл, в который записать таблицу значений функции y=ln(x) при х, изменяющемся от 1 до 3 с шагом 0,1.