1 Ανοίξτε ένα πρόγραμμα επεξεργασίας κειμένου , όπως το Notepad . Σημειωματάριο μπορεί να έχει πρόσβαση σε 2
Πληκτρολογήστε τον ακόλουθο ορισμό για μια αναδρομική συνάρτηση ύψωσης "Έναρξη > Όλα τα προγράμματα - > Αξεσουάρ- > Σημειωματάριο . " :
( define ( expt βάσης n )
( if ( n = 0 )
1
( * βάσης ( expt βάσης ( - n 1 ) ) ) ) )
Ο ορισμός αυτός δίδεται στο Lisp . Ωστόσο , η ίδια λειτουργία μπορεί να γραφτεί σε οποιαδήποτε γλώσσα που υποστηρίζει αναδρομή . Πρώτον, η λειτουργία αυτή πρέπει να δοκιμαστεί για την κατάσταση εξόδου, το οποίο στην περίπτωση μας θα συμβεί αν η = 0 . Στη συνέχεια , η λειτουργία μας πολλαπλασιάζει τις φορές βάση τον εκθέτη της βάσης στην αρχική δύναμη μείον 1 . Αυτό είναι παράλληλη με την μαθηματικό ορισμό της ύψωσης σε δύναμη .
Εικόνων 3
Ανοίξτε τον ορισμό του διερμηνέα . Εάν χρησιμοποιείτε ένα διερμηνέα Lisp , χρησιμοποιήστε τη λειτουργία όπως:
( expt 2 2 )
Αυτό θα
επιστρέψει , 4 φωτογραφίες <. br >
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα