Buchempfehlung
Mikrocomputertechnik mit Controllern der Atmel AVR-RISC-Familie
Mikrocomputertechnik mit Controllern der Atmel AVR-RISC-Familie
Umfassend, aber leicht verständlich führt dieses Buch in die Programmierung von ATMEL AVR Mikrocontrollern ein. [Mehr Infos...]
FreeBASIC-Chat
Es sind Benutzer im FreeBASIC-Chat online.
(Stand:  )
FreeBASIC bei Twitter
Twitter FreeBASIC-Nachrichten jetzt auch über Twitter erhalten. Follow us!

fb:porticula NoPaste

Info
Info / Hilfe Liste
Übersicht / Liste Neu
Datei hochladen Suche
Quellcode suchen Download
Dateidownload

Zahl verdoppeln, bis Wert erreicht ist

Uploader:AdministratorSebastian
Datum/Zeit:09.08.2013 15:33:39

DIM ZAHL AS INTEGER = 1

DO
    ZAHL = ZAHL * 2
    PRINT ZAHL
    SLEEP 250
LOOP UNTIL ZAHL > 200

PRINT "Zahl war groesser als 200. Das reicht jetzt."
SLEEP