массивы(фортран)

[Aivar]

короче фортран. Мы вводим массив .....там разные команды и надо сделать новый массив каждый эл-т которого вычесляется по формуле
B(i)=(A(i-1)+A(i)+A(i+1))/3, ну в итоге мы получим на 2 эл-та меньше.
Я примерно представляю как выглядит этот цикл, но на практике ни4е не пашет.

[Сергей007]

Помогите пожалуйста...
Хоть что сможете...

Задача первая.
Дан массив A(m),m меньше или равен 20. Вывести на печать исходный массив, а так же величину и номер его максимального отрицательного значения.

Задача вторая.
Написать программу вычисления скалярного произведения векторов.
Исходные данные:
1 2 3 4 1 2 0.1 -1.6 -0.7
A= 1 2 1 B=0 4 3 p=1.7 q=0.8 r=1.3
3 2 0 1 1 1 -1.5 1.1 0.2


Ну и сам пример - s=(r+BBr,p)


Заранее Огромное спасибо...

[Demon23]

Помогите решить:

Дан массив A размера N и целые числа K и L (1 ≤ K < L ≤ N). Переставить в обратном порядке элементы массива, расположенные между элементами AK и AL, включая эти элементы