fb:porticula NoPaste

Info / Hilfe Liste

Übersicht / Liste Neu

Datei hochladen Suche

Quellcode suchen

Dateidownload

Programm

Uploader:	programmierer
Datum/Zeit:	26.10.2013 19:42:30

Hinweis: Dieser Quelltext ist Bestandteil des Projekts Geschichtswissen, zu dem es auf FreeBASIC-Portal.de eine Projektseite gibt.

Dim As string karl

Dim As string alt

Dim As string rom

Dim As string ost

Dim As string welt

Dim As string reich

Dim As string jahr



Input "Wer war Koenig der Franken ?", karl

Print "Sie haben "; karl; " geschrieben !"

Print "Antwort: Es war KARL DER GROSSE !"

Input "Wie alt wurde Karl der Grosse ?", alt

Print "Sie haben "; alt; " angegeben !"

Print "Antwort: Er wurde 66 Jahre alt !"

Input "Wann wurde ROM gegruendet ?", rom

Print "Sie haben "; rom; " angegeben !"

Print "Antwort: Es wurde am 21.April 753 v.Chr. gegruendet !"

Input "Welches Reich gab es laenger ?", ost

Print "Sie haben "; ost; " angegeben !"

Print "Antowort: Das Ostreicht !"

Input "Wann begann der 2.Weltkrieg ?", welt

Print "Sie haben "; welt; " angegeben !"

Print "Antwort: Am 01.09.1939 !"

Input "Wer war Reichsfueher ?", reich

Print "Sie haben "; reich; "angegeben !"

Print "Antwort: Adolf Hitler !"

Input "Welches Jahr haben wir heute ?", jahr

Print "2013"

Print

Print "Vielen Dank !"





Sleep

Impressum • Nutzungsbedingungen • Datenschutz

Microsoft, Windows, Windows NT, XBOX und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.