Помогите написать программы в паскале. Хоть что нибудь. 1)Даны радиус круга и сторона квадрата. Проверьте, пройдет ли круг в квадрат? 2)Дан числовой массив А, состоящий из n-натуральных чисел. Определить количество элементов массива, удовлетворяющих условию Аi < (Ai-1 + Ai+1)/2. 3)Найти n-ый член ряда Фибоначчи, элементы которого вычисляются по формулам: a1=a2=1; ai=ai-1+ ai-2, (i>2). Примечание. Для нахождения членов ряда использовать только две переменные а и b. 4)Дано целое число м > 10. Получите наибольшее целое k, при котором 4k< м. 5)"Перевернуть" последовательность А1,А2,А3, ...,АN, т.е. поменять местами A1 с AN, A2 c AN-1 и т.д.

var a,r:real;