| | |
| 10. FAHRENHEIT UND CELSIUS | |
| Dieses Programm wandelt die Werte von Fahrenheit in Celsius um und umgekehrt. | |
| | |
| 10 REM DEGREE FAHRENHEIT | |
| 20 REM CELSIUS | |
| 30 CLS | |
| 40 PRINT "UMRECHNUNG IN FAHRENHEIT(1)" | |
| 50 INPUT "ODER CELSIUS(2)";A | |
| 60 IF A = 2 THEN 110 | |
| 70 INPUT "CELSIUS";B | |
| 90 PRINT B * 9 / 5 + 32;"FAHRENHEIT" | |
| 100 END | |
| 110 INPUT "FAHRENHEIT";B | |
| 120 PRINT B;"FAHRENHEIT ="; | |
| 130 PRINT (B - 32) * 5 / 9;"CELSIUS" | |
| 140 END | |