Πώς να το διαχωρισμό των ψηφίων ενός αριθμού σε Prolog

Prolog είναι μια γλώσσα προγραμματισμού λογική όπου θα δηλώνουν τα γεγονότα και τους κανόνες . Ένα γεγονός είναι μια ρήτρα μία γραμμή που δεν έχουν σώμα , ενώ ο κανόνας είναι η ρήτρα έχει κατηγορήματα στο σώμα της, που ικανοποιούν τους στόχους . Μπορείτε να δημιουργήσετε αυτά τα γεγονότα και τους κανόνες και στη συνέχεια το ερώτημα να πάρετε τα αποτελέσματα σας . Μπορείτε να γράψετε έναν κανόνα που θα χωρίσει έναν αριθμό σε ξεχωριστές ψηφία της διαιρώντας τον αριθμό χρησιμοποιώντας το mod λειτουργία και αναδρομικά καλώντας τον κανόνα σας μέχρι να διαχωριστεί κάθε ψηφίο . Οδηγίες
Η

1 Ανοίξτε ένα κενό αρχείο κειμένου . Αποθήκευση ως " prologSplit.pl " στον υπολογιστή σας 2

Πληκτρολογήστε τον ακόλουθο κώδικα στην πρώτη γραμμή για να δημιουργήσετε ένα γεγονός : . .

Διάσπαση ( 0 , _ )

το γεγονός αυτό τους ελέγχους για το πότε θα μπορεί πλέον να διαχωρίσετε τον αριθμό σας εισάγεται . Όταν ο αριθμός ισούται με μηδέν , η κλήση σας λειτουργία θα σταματήσει . Η δεύτερη μεταβλητή δεν έχει σημασία, ως εκ τούτου, τη χρήση του χαρακτήρα υπογράμμισης
εικόνων 3

Πληκτρολογήστε τις ακόλουθες γραμμές για να ξεκινήσετε ένα νέο κανόνα : .

Διάσπαση ( Μ , Ζ ) : -

M > 0 , πώληση

Αυτό θα ελέγξει για να δει αν το " Μ " μεταβλητή είναι μεγαλύτερη από το μηδέν . Αν ναι, συνεχίστε . Αυτό θα αποτρέψει το πρόγραμμα σας από την επανάληψη σε έναν ατέρμονα βρόχο
Η

4 Πληκτρολογήστε την επόμενη γραμμή : .

MM είναι δαπέδου ( M /10 ) , πώληση

Αυτό δημιουργεί μια προσωρινή μεταβλητή που θα αφαιρέσει το τελικό ψηφίο από μεταβλητή εισόδου σας και να αγνοήσει κάθε κλάσμα . Για παράδειγμα , εφόσον η μεταβλητή εισόδου σας είναι 532 , η γραμμή αυτή θα εκτελέσει 532 διαιρούμενο με το 10 , το οποίο είναι 53,2 , αλλά διακόπτει την .2 , αφήνοντας 53
5

Πληκτρολογήστε αυτές τις επόμενες τρεις γραμμές : .

Ζ είναι M mod 10 , πώληση

εκτύπωσης ( Ζ ) , πώληση

nl , πώληση

Η πρώτη θα mod αριθμό εισόδου σας και να αποθηκεύσετε το υπόλοιπο σε Ζ σας μεταβλητή . Για παράδειγμα, " 532 mod 10 " έχει ένα υπόλοιπο 2 , οπότε το Ζ γίνεται 2 . Οι επόμενες δύο γραμμές εκτυπώσετε αυτό το διαχωρισμένο ψηφίο στην οθόνη και να προσθέσετε μια νέα γραμμή για να κάνει έξοδο σας πιο εύκολο να διαβάσει
Η 6

Πληκτρολογήστε την τελική γραμμή για τον κανόνα σας : .

Διάσπαση ( MM , _ ) .

Αυτό θα καλέσει κατ 'επανάληψη τον κανόνα σας μέχρι τον αριθμό εισόδου σας ισούται με μηδέν . Αποθηκεύστε το αρχείο σας Prolog .
Η 7

Ανοίξτε το πρόγραμμα Prolog και να φορτώσετε το αρχείο prologSplit.pl σας . Πληκτρολογήστε τα ακόλουθα στη γραμμή εντολών και πατήστε enter : . .

Διάσπαση ( 532 , Α )

Prolog θα χωρίσει τον αριθμό σας και να εμφανίσει κάθε ψηφίο σε μια νέα γραμμή
Η
εικόνων