minmax - цикл

[joker01]

Minmax9. Дано целое число N и набор из N целых чисел. Найти номера пер-вого и последнего максимального элемента из данного набора и вывести
их в указанном порядке.

PHP код:

var a,n,i,k,max:integer;
begin
writeln('vvedite n chisel');
readln(a);
max:=a;
for i:=2 to n do begin readln(a);
                                if a>max then begin max:=a;
                                                              k:=i;
                                                     end;
                                end;
writeln(k); 


вроде написал как найти первый наибольший номер, а вот со вторым даже не знаю как
*pascal abc

[Mad_Cat]

отправь minmax_9 боту из моей подписи

[joker01]

Mad_Cat
а насчёт двумерных массивов нету пока ничего?
а то у нас в универе проанье идёт по убыстрённой программе, и дофига программ назадавали

[Mad_Cat]

joker01 все что есть написано в !help ) там же и как сделать чтобы твоя задачка появилась

[joker01]

Mad_Cat
да это просто клад для обычного студента
огромное спасибо