Euro-Rechner

Mit BASIC lassen sich schnell zum Beispiel kleinere Rechenaufgaben lösen: Das folgende Beispielprogramm fragt nach einem Betrag in EURO und gibt den entsprechenden Wert in DM aus:

10 print "Wechselkurs"
 20 print "———--"
 30 dmeuro=1.95583
 40 print "Geben Sie den Betrag in Euro ein: ";
 50 input "",euro
 60 if euro=0 then goto 100
 70 dm=euro*dmeuro
 80 print "In DM sind das: ";dm
 90 goto 40
 100 end

Durch die Abfrage, ob ein Betrag von 0 eingegeben wurde, wird eine Abbruchbedingung geprüft: BASIC springt zur Zeile 100, falls der Wert 0 ist; dann wird das Programm beendet. Anderenfalls wird immer wieder ein neuer Wert erfragt, da am Ende der Berechnung über den goto-Befehl wieder zur Befehlszeile zurückgesprungen wird, die die Werteingabe einleitet. Ein Programmlauf sieht dann folgendermaßen aus:

bwBASIC: run
 Wechselkurs
 ———–
 Geben Sie den Betrag in Euro ein: 150
 In DM sind das:  293.3745000
 Geben Sie den Betrag in Euro ein: 20
 In DM sind das:  39.1166000
 Geben Sie den Betrag in Euro ein: 0
 bwBASIC:

Auch Schleifen lassen sich in BASIC leicht programmieren. Wahlweise können Sie mit Befehlen der Form

10 for i=1 to 10
 20   print i, i*3, i*10
 30 next

eine Variable (hier i) der Reihe nach alle Werte vom Start- zum Endwert durchlaufen lassen, oder Sie verwenden Schleifen, deren Abbruch von einer Bedingung abhängt: Dies sind while-Schleifen der Form

10 wert=-1
 20 while wert<>0
 30   print "Wert eingeben, 0 fuer Ende: ";
 40   input "",wert
 50   print "Wert ist: ";wert
 60 wend

In unserem Euro-DM-Rechner hätten wir statt des GOTO-Sprungs also auch eine WHILE-Schleife verwenden können: Dank WHILE-Schleifen kann auf die explizite Angabe eines Sprungziels verzichtet werden. Wenn Sie Ihr BASIC-Programm in einer Datei ablegen, können Sie übrigens ganz auf die Vergabe von Zeilennummern verzichten: BASIC interpretiert die Befehle dann in der Reihenfolge, wie sie in der Datei auftauchen. Das obige Programm wird dann zur folgenden Version, die fast schon wie ein Shell-Skript aussieht:

wert=-1
 while wert<>0
 print "Wert eingeben, 0 fuer Ende: ";
   input "",wert
   print "Wert ist: ";wert
 wend

Kurzreferenz

Eine etwas magere Kurzreferenz zu den Befehlen von bwBASIC bietet der Hersteller unter http://www.bwbasic.com/extended.html; für einen ausführlicheren Einstieg in BASIC sind zum Beispiel die folgenden Seiten interessant:

LinuxCommunity kaufen

Einzelne Ausgabe
 
Abonnements
 
TABLET & SMARTPHONE APPS
Bald erhältlich
Get it on Google Play

Deutschland

Ähnliche Artikel

  • PureBasic: Software für Linux, Windows und OS X entwickeln
    Die französische Softwareschmiede Fantaisie Software bietet mit PureBasic eine Entwicklungsumgebung an, mit der Sie Programme für Linux, Windows und OS X erstellen. Wir helfen bei den ersten Programmierprojekten mit dem modernen BASIC-Dialekt.
  • Homecomputer Simulator Atari++ in Fedora.
  • Programmieren für Einsteiger
    Programmierer haben Linux und die zahlreichen Linux-Anwendungen entwickelt. Auch für Neulinge auf diesem Gebiet bietet Linux zahlreiche Optionen – wie Sie hier einen Einstieg finden können, verraten die Artikel unserer aktuellen Titelstrecke.
  • Einsteigertauglich
    Die leichte Erlernbarkeit und der überschaubaren Sprachumfang machen Basic besonders für Programmieranfänger interessant. Mit einer passenden IDE erstellen auch Einsteiger schnell Programme für die grafische Oberfläche.
  • Tabelle unter Kontrolle
    OpenOffice bringt eine eigene Makro-Programmiersprache mit: Mit StarBasic können Sie umständliche manuelle Tätigkeiten automatisieren. Wir stellen Variablen, Kontrollstrukturen und Schleifen vor.
Kommentare

Infos zur Publikation

LU 08/2016: Multimedia

Digitale Ausgabe: Preis € 5,99
(inkl. 19% MwSt.)

LinuxUser erscheint monatlich und kostet 5,95 Euro (mit DVD 8,50 Euro). Weitere Infos zum Heft finden Sie auf der Homepage.

Das Jahresabo kostet ab 86,70 Euro. Details dazu finden Sie im Computec-Shop. Im Probeabo erhalten Sie zudem drei Ausgaben zum reduzierten Preis.

Bei Google Play finden Sie digitale Ausgaben für Tablet & Smartphone.

HINWEIS ZU PAYPAL: Die Zahlung ist ohne eigenes Paypal-Konto ganz einfach per Kreditkarte oder Lastschrift möglich!

Aktuelle Fragen

Wie kann man das berichtigen
Udo Muelle, 17.07.2016 20:39, 1 Antworten
Fehlschlag beim Holen von http://extra.linuxmint.com/dists/rosa/main/binary-i386/Packages Hash-S...
Installation Genimotion
Horst Müller, 15.07.2016 17:00, 1 Antworten
Hallo, ich kann Genimotion nicht installieren. Folgende Fehlermeldung habe ich beim Aufruf erh...
Probleme beim Hochfahren der Terastaion 5400 mit Unix-Distrib
Sheldon Cooper, 10.07.2016 09:32, 0 Antworten
Hallo ihr lieben, habe seit zwei Tagen das Problem, das das NAS (Raid5) nicht mehr sauber hoch...
Mit Firewire Videos improtieren?
Werner Hahn, 09.06.2016 11:06, 5 Antworten
Ich besitze den Camcorder Panasonic NV-GS330, bei dem die Videos in guter Qualität nur über den 4...
lidl internetstick für linux mint
rolf meyer, 04.06.2016 14:17, 3 Antworten
hallo zusammen ich benötige eure hilfe habe einen lidl-internetstick möchte ihn auf linux mint i...