HP 48gII Benutzerhandbuch Seite 844

«
DEG
0. 100. XRNG
0. 50. YRNG
ERASE
(5., 2.5) (95., 47,5) BOX
(50., 50.) 10. 0. 360. ARC
(50., 50.) 12. –180. 180. ARC
1 8 FOR j
(50., 50.) DUP
'12*COS(45*(j-1))'
'12*SIN(45*(j-1))'
R C
+
LINE
NEXT
{ } PVIEW
»
Beispiel 2 – Ein Programm zum Plotten eines natürlichen Flussquerschnitts
Diese Anwendung kann sich bei der Feststellung der Fläche und der
befeuchteten Randbereiche eines Flussquerschnitts als sehr nützlich erweisen.
Normalerweise wird ein Flussquerschnitt anhand einer Reihe von Punkten, und
zwar die Koordinaten x und y bezogen auf ein beliebiges Koordinatensystem,
vermessen. Diese Punkte werden geplottet und danach eine
Entwurfszeichnung des Querschnitts in einer bestimmten Höhe der
Wasseroberfläche erzeugt. Die folgende Abbildung zeigt die in diesem
Abschnitt beschriebenen Bedingungen.
Starten des Programms
Wählen Sie Grad für Winkelmaße
x-Bereich setzen
y-Bereich setzen
Bild löschen
Kästchen zwischen (5,5) und (95,95)
zeichnen
Kreis mit der Mitte in (50,50) und r
=10 zeichnen
Kreis mit der Mitte in (50,50) und r
=12 zeichnen
8 Linien im Inneren des Kreises
zeichnen
Die Linienmitte befindet sich im
Punkt (50,50)
NUM Berechnen von x , das andere Ende
bei 50 + x
NUM Berechen von y , das andere Ende
bei 50 + y
Konvertieren von x y in (x,y),
komplexe Zahlen
(50,50) mit (x,y) addieren
Zeichnen der Linie
Ende der FOR-Schleife
Anzeigen des Bildes
Seite 22-27