Auf der Karte anzeigen

[mkb]

Hallo.
Ich versuche, ein Programm in lisp zu erstellen, wo ich eine Reihe von Listen erstellen muss, die von der Benutzereingabe abhängig sind,
wir sagen für die Einfachheit, dass das Programm muss fragen, wie viele Klassen von 10 Schülern einen Lehrer hat, und für jede Klasse legt es in die Namen der Schüler in einer speziellen Liste
Mein Code, den ich unter Drehungen trage, aber tut nicht, was ich will, schafft keine Liste von Listen
Name
Name
Bezeichnung
...
in dem es die Namen der Schüler eingibt, aber einfach eine Namensliste
Name

Hier ist der Code
(defunc c:class()
(setq nclassi(getint "erfindet die Anzahl der Klassen : "))))
(setq cont)

(Repeat nclasses)
(setq n(itoa cont))
(setq nomelist(strcat "nomelista" n)
(Namensliste drucken)
(Setq-Namensliste(Liste )
(Repeat 10)
(seq nallievo(list (getstring "study name: "))))))))
(Sectq Namelist(Nallievo Namelist Append))
)
(Namensliste drucken)
(setq cont(+ cont 1))

); Endwiederholung
); Ende verstorben


Dank allen
mk

 

[confutatis]

(Defunc c:Klassen)
(setq nclasses (getint " Geben Sie die Anzahl der Klassen ein : ")
cont 1
)
(Repeat nclasses)
(setq nomelist nil)
(princ (strcat "nomelista" (itoa cont))) (princ "\n")
(Repeat 5)
(Studyname: ")
(setq nomelist (cons allievo nomelista))
)
(lesen (strcat "nomelista" (itoa cont)))
(setq cont (1+ cont))
)
)

 

[mkb]

Vielen Dank!!! Der Code funktioniert und Sie haben ein großes Problem gelöst! Ich schätze, was die Linie tut.

(lesen (strcat "nomelista" (itoa cont)))

mit den gesetzten und gelesenen Befehlen, die ich nicht wusste, hoffe ich in der Mittagspause zu vertiefen!
Danke noch mal.
mk