program aray;
var nilai : array [ 0 .. 9 ] of integer ;
max, min, a : integer ;
begin
nilai[ 0 ] : = 10 ;
nilai[ 1 ] : = 20 ;
nilai[ 2 ] : = 30 ;
nilai[ 3 ] : = 40 ;
nilai[ 4 ] : = 50 ;
nilai[ 5 ] : = 60 ;
nilai[ 6 ] : = 70 ;
nilai[ 7 ] : = 80 ;
nilai[ 8 ] : = 90 ;
nilai[ 9 ] : = 100 ;
writeln ( 'nilai 0 : ' , nilai[ 0 ] ) ;
writeln ( 'nilai 1 : ' , nilai[ 1 ] ) ;
writeln ( 'nilai 2 : ' , nilai[ 2 ] ) ;
writeln ( 'nilai 3 : ' , nilai[ 3 ] ) ;
writeln ( 'nilai 4 : ' , nilai[ 4 ] ) ;
writeln ( 'nilai 5 : ' , nilai[ 5 ] ) ;
writeln ( 'nilai 6 : ' , nilai[ 6 ] ) ;
writeln ( 'nilai 7 : ' , nilai[ 7 ] ) ;
writeln ( 'nilai 8 : ' , nilai[ 8 ] ) ;
writeln ( 'nilai 9 : ' , nilai[ 9 ] ) ;
max: = nilai [ a] ;
min: = nilai [ a] ;
for a: = 0 to 9 do
begin
if max < nilai[ a] then
max : = nilai[ a] ;
if min > nilai[ a] then
min : = nilai[ a] ;
end ;
writeln ( 'nilai max : ' , max) ;
writeln ( 'nilai min : ' , min) ;
readln ;
end .
cHJvZ3JhbSBhcmF5Owp2YXIgbmlsYWkgOiBhcnJheVswLi45XSBvZiBpbnRlZ2VyOwogICAgbWF4LG1pbixhIDogaW50ZWdlcjsKYmVnaW4KICBuaWxhaVswXTo9MTA7CiAgbmlsYWlbMV06PTIwOwogIG5pbGFpWzJdOj0zMDsKICBuaWxhaVszXTo9NDA7CiAgbmlsYWlbNF06PTUwOwogIG5pbGFpWzVdOj02MDsKICBuaWxhaVs2XTo9NzA7CiAgbmlsYWlbN106PTgwOwogIG5pbGFpWzhdOj05MDsKICBuaWxhaVs5XTo9MTAwOwogIAogIHdyaXRlbG4oJ25pbGFpIDAgOiAnLG5pbGFpWzBdKTsKICB3cml0ZWxuKCduaWxhaSAxIDogJyxuaWxhaVsxXSk7CiAgd3JpdGVsbignbmlsYWkgMiA6ICcsbmlsYWlbMl0pOwogIHdyaXRlbG4oJ25pbGFpIDMgOiAnLG5pbGFpWzNdKTsKICB3cml0ZWxuKCduaWxhaSA0IDogJyxuaWxhaVs0XSk7CiAgd3JpdGVsbignbmlsYWkgNSA6ICcsbmlsYWlbNV0pOwogIHdyaXRlbG4oJ25pbGFpIDYgOiAnLG5pbGFpWzZdKTsKICB3cml0ZWxuKCduaWxhaSA3IDogJyxuaWxhaVs3XSk7CiAgd3JpdGVsbignbmlsYWkgOCA6ICcsbmlsYWlbOF0pOwogIHdyaXRlbG4oJ25pbGFpIDkgOiAnLG5pbGFpWzldKTsKICAKICAKICBtYXg6PSBuaWxhaSBbYV07CiAgbWluOj0gbmlsYWkgW2FdOwogIGZvciBhOj0gMCB0byA5IGRvCiAgYmVnaW4KICBpZiBtYXggPCBuaWxhaVthXSB0aGVuCiAgbWF4IDo9IG5pbGFpW2FdOwogIAogIGlmIG1pbiA+IG5pbGFpW2FdIHRoZW4KICBtaW4gOj0gbmlsYWlbYV07CiAgZW5kOwogIAogIHdyaXRlbG4oJ25pbGFpIG1heCA6ICcsbWF4KTsKICB3cml0ZWxuKCduaWxhaSBtaW4gOiAnLG1pbik7CiAgcmVhZGxuOwplbmQuCg==