Jawaban 'Accepted' Soal Kontes ITBJPC 2011

Mendaki Gunung Lewati Lembah

SOAL

Mendaki Gunung Lewati Lembah

Time limit	1second
Memory limit	128 MB

Description

Pak Ganesh sedang jalan-jalan ke gunung Tangkuban Perahu bersama Pak Dengklek. Mereka membawa satu tas besar yang mereka bawa bergantian.

Mereka akan melalui sebuah jalur pendakian yang memiliki ketinggian H. Pak Ganesh mendapat giliran untuk membawa diantara diantara 2 titik di jalur tersebut, A dan B, dimana A lebih dulu dari B, dan tinggi A - tinggi B adalah maksimum. Artinya, Pak Ganesh akan mencari 2 titik yang memiliki total jalur penurunan paling besar. 2 titik ini dapat saja merupakan titik yang sama.

Pak Ganesh mengetahui seluruh titik yang berada di jalur yang mereka tempuh, dan ia bisa mengetahui berapa tinggi titik tersebut.

Input Format

baris 1 : N, (1<= N <=1000000) jumlah titik yang akan dilalui perjalanan.

baris 2..N+1 : bilangan yang menyatakan tinggi titik ke-i, Hi (0<=Hi<=1000000). Titik ke-i pasti lebih dulu ditempuh daripada i+1.

Output Format

Satu bilangan yang menyatakan besar penurunan paling banyak.

Sample Input

5 10 11 7 10 6 

Sample Output

5

Penjelasan

Pak Ganesh akan memilih titik ke 2 dan titik ke 5, sehingga besar penurunan yang dapat dicapai adalah 5.

Sample Input

4 15 6 20 10 

Sample Output

10

Script Accepted Saya

PROGRAM mendaki;

VAR

h : array[1..1000000] of integer;

n,i,x,d,terendah : integer;

BEGIN

readln(n);

FOR i:= 1 TO n DO

begin

readln(h[i]);

end;

FOR i := 1 TO n DO

begin

for x:= (i+1) to n do

begin

d := h[i]-h[x];

if terendah < d then terendah := d;

end;

end;

writeln(terendah);

END.