Kod:
#x := 0;
#y := 0;
FOR #i := 0 TO 10000 DO
#Kaydedilen_Deger[#i] := #kaydedilecek_deger;
IF #i = 10000 THEN
#Son_Veri := TRUE;
ELSE
#Son_Veri := false;
END_IF;
#x := #kaydedilecek_deger;
IF #x > #y THEN
#y := #x;
END_IF;
END_FOR;
IF #i > 10000 THEN
#i := 0;
;
END_IF;
#En_Buyuk := MAX(IN1 := #x, IN2 := #y);