Пару простых программ

[Fencer]

Очень прошу, пожалуйста помогите написать текст программ в фортране
1) Для определения минимального из чисел x,y,z,u . Ввод из файла. Вывод на экран
2) Для расчета Р=(1-2+3-4+...+19)/(2*4*6...*14). Вывод на экран и в файл
3) Для расчета угла a между векторами x=(x1,x2,...xn) и y=(y1,y2,...yN) . Ввод из файла, вывод на экран