Вывести номера сотрудников с максимальной и минимальной зарплатой

[sllh_111]

Люди нужна Ваша помощь, ну или хотя бы посоветуйти с чего начать.
собственно вот:

В массиве ZARP(15) содержится информация о зарплате 15 сотрудников. Вывести номера сотрудников с максимальной и минимальной зарплатой. Увеличить на 15% зарплату тем сотрудникам, которые получают менее заданной суммы. Вывести на экран монитора изменённый массив

язык программирования Паскаль, заранее благодарен.

[Grag]

Начни с правильного описания типа данных...

[sllh_111]

Program ex_1;
uses crt; 
var ZARP: array[1..17] of real;
t,r,e,max,min,i:real;
begin clrscr;
writeln(' Zapolnite massiv ');
readln(zarp[i])
for i:= 1 to t do
max:=1;
if max>i then max:=i ;
....

дальше незнаю(.