[Inhalt] [Zurück] [Weiter] [Thema] [Index]

Allgemeine Funktionen





[Inhalt] [______] [______] [Thema] [Index]

Beispiel


 
# Beispielprogramm zu allgemeinen Funktionen

AZUR (Zeitpunkt zp=@";11.11.88";, Real zahl=1)
	IF (IsValid (zp))
		Print ("Der Zeitpunkt : ", zp)
		zeitstring := ZPStr (zp, "#A, der #x. #i #Y, #w.#M Uhr")
		Print (zeitstring)
		Print () 
		Print ("Die Zahl : ", zahl)
		zahlstring := RStr (zahl, ".10f")
		Print (zahlstring)
	ELSE
		System ("azur info.azr")
	ENDIF
Print () 
Print ("Und die Zufallszahl lautet : ", Random())
END

Ausgabe:

 
Der Zeitpunkt : 11.11.1988 07:30
Freitag, der 11. November 1988, 7.30 Uhr

Die Zahl : 1
1.0000000000

Und die Zufallszahl lautet: 0.1036071777



toposoft GmbH 2. Dezember 2014