Αλγοριθμος ασκηση
μαχβ<-0
μαχυ<-0
αθροισμα<-0
πληθος<-0
Για ι απο 1 μεχρι 2000
Αρχη_επαναληψης
Διαβασε φυλο, υψος, βαρος
Μεχρις_οτου (φυλο="γυναικα" ή φυλο="αντρας") και υψος>0 και βαρος>0
Αν φυλο="γυναικα" τοτε
Διαβασε ονομα1
πληθος<-πληθος+1
αθροισμα<-αθροισμα+υψος
Αν υψος>μαχυ τοτε
μαχυ<-υψος
μαχ_ονομα<-ονομα1
Τελος_αν
Αλλιως
Διαβασε ονομα2
Αν βαρος>μαχβ τοτε
μαχβ<-βαρος
μαχ_ονομα_β<-ονομα2
Τελος_αν
Τελος_αν
Τελος_Επαναληψης
Εμφανισε "πιο ψηλη γυναικα η", μαχ_ονομα
Εμφανισε "πιο βαρυς αντρας ο", μαχ_ονομα_β
Εμφανισε "μεσο υψος γυναικων:", αθροισμα(δια)πληθος !(δεν μου βγαζει την καθετο !)
Τελος ασκηση