Θέμα Γ
Αλγόριθμος Διοφαντική
Δεδομένα //Α,Β,Γ,Δ//
δ <- Ψευδής
max <- 0
Π <- 0
Π1 <- 0
Π2 <- 0
Για x από -99 μέχρι 99
Για y από -99 μέχρι 99
Για z από -99 μέχρι 99
Αν Α*x+B*y+Γ*z = Δ τότε
εμφάνισε x,y,z
δ <- Αληθής
Αν x+y+z > max τότε
max <- x+y+z
λ[1] <- x
λ[2] <- y
λ[3] <- z
τέλος_αν
Π <- Π + 1
Αν (x>0 και x mod 2 = 0 ) και (y>0 και y mod 2 = 0 ) και (z>0 και z mod 2 = 0 ) τότε
Π2 <- Π2 + 1
Τελος_αν
Αν (x= 0 και y<>0 και z<>0) ή (x<>0 και y=0 και z<>0) ή ( x<>0 και y<>0 και z=0) τότε
Π1 <- Π1 + 1
τέλος_αν
τέλος_αν
Τέλος_επανάληψης
Τέλος_επανάληψης
Αν δ = Ψευδής τότε
Εμφάνισε " Δεν υπάρχουν τέτοιες λύσεις"
αλλιώς
Εμφάνισε "Πρώτη λύση με το μεγαλύτερο άθροισμα", λ[1] , λ[2] , λ[3]
Εμφάνισε Π2
ποσ <- (Π1/Π)*100
Εμφάνισε ποσ
Τέλος_αν
Τελος Διοφαντική