|
|||||
| 1. | Lbl 5: ClrHome Menu("INHOUD","BOL", 1, "CILINDER", 2, "KEGEL",3, "STOP", 4) Lbl 1 INPUT"STRAAL?", A Disp"INHOUD:", (4/3)*π*A^3 GOTO 5 Lbl 2 INPUT"STRAAL?", A INPUT"HOOGTE?", B Disp"INHOUD", π * A^2 * B GOTO 5 Lbl 3 INPUT"STRAAL?", A INPUT""HOOGTE?", B Disp"INHOUD", (1/3)*π * A^2 * B GOTO 5 Lbl 4: STOP |
||||
|
© h.hofstede (h.hofstede@hogeland.nl) |
|||||