tigruden Üye Katılım 3 Ağu 2010 Mesajlar 106 Puanları 6 Yaş 36 Konum Kocaeli 26 Nis 2018 #11 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);
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);