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 02/2016: Alt-PCs flott machen

Digitale Ausgabe: Preis € 4,95
(inkl. 19% MwSt.)

Mit der Zeitschrift LinuxUser sind Sie als Power-User, Shell-Guru oder Administrator im kleinen Unternehmen monatlich auf dem aktuelle Stand in Sachen Linux und Open Source.

Sie sind sich nicht sicher, ob die Themen Ihnen liegen? Im Probeabo erhalten Sie drei Ausgaben zum reduzierten Preis. Einzelhefte, Abonnements sowie digitale Ausgaben erwerben Sie ganz einfach in unserem Online-Shop.

NEU: DIGITALE AUSGABEN FÜR TABLET & SMARTPHONE

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

Der Tipp der Woche

Schon gewußt?

14.11.2015

Auch unter Ubuntu 15.10 kann man wieder mit dem Startmedienersteller (alias Startup Disk Creator) ein Live-System auf einem USB-Stick einrichten. ...

Fehler des Startmedienerstellers von Ubuntu 15.10 umgehen

Aktuelle Fragen

Tails Update
Val Lerie, 11.01.2016 10:51, 0 Antworten
Hallo zusammen, updaten > update Speichern unter > Persistent nicht möglich, mit der Meldung;...
Recoll
Jürgen Heck, 20.12.2015 18:13, 4 Antworten
Wie kann man mit Recoll nach bestimmten Zeichen/Satzzeichen bzw. Zeichenkombinationen suchen, z....
Wings Platinum 4 auf Linux?
Bodo Steguweit, 18.12.2015 11:37, 4 Antworten
Hallo in die Runde ich nutze für meine Diashows Wings Platinum 4 als Diareferent. Arbeite jetzt...
Bandbreite regulieren
Georg Armani, 25.11.2015 16:50, 1 Antworten
Hallo, ich bin ein Neuling in Sachen Linux und hoffe auf Hilfe. Ich habe zwei Windows Rechner...
Windows 10 verhindert LINUX
Hans Wendel, 17.11.2015 17:47, 8 Antworten
Hallo alle, mit einem W10-Laptop (vorher war Win7) wollte ich LINUX ausprobieren. Alles, was ni...