摄氏到华氏 trs-80 基本

Celsius to Fahrenheit trs-80 basic

有没有人记得将华氏度转换为摄氏度的旧 BASIC 代码?如果有人愿意 post 文本,我将不胜感激。

尝试关注

INPUT "Enter Fahrenheit "; FAHR20 : PRINT "Celsius is ", (FAHR-32) * 5 / 9

查看以下 PDF,第 40 页(pdf 第 57 页):

对于 Level II BASIC,代码类似于:

10 INPUT "FAHRENHEIT: "; F
20 C = 5 * (F - 32) / 9
30 PRINT F; " FAHRENHEIT IS "; C; " CELSIUS"
40 GOTO 10

如果您使用的是 I 级 BASIC 模型 I,或其他一些严格限制的 TRS-80,您可能需要更简单的东西。