Diberikan procedure seperti di bawah ini. Apakah output dari program tersebut jika dipanggil lacak(9,6,7,4)? {tuliskan jawaban sesuai dengan output yang dihasilkan}
procedure lacak(a,b,c,d:integer);
begin
if (a>b) and (c>d) then
begin
if (a>d) or (c<d) then
begin
if (b<d) then
writeln(a)
else
writeln(b);
end else
begin
writeln(c);
end;
end else
begin
if (a=d) or (c=d) then
begin
if (b<c) then
writeln(b)
else
writeln(c);
end else
writeln(d);
end;
end;