【问题标题】:Celsius to Fahrenheit trs-80 basic [closed]摄氏到华氏trs-80基本[关闭]
【发布时间】:2015-01-19 06:42:44
【问题描述】:

有人记得用于将华氏温度转换为摄氏温度的旧 BASIC 代码吗?如果有人能发布文字,我将不胜感激。

【问题讨论】:

    标签: basic


    【解决方案1】:

    查看以下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 或其他一些严重受限的 TRS-80,您可能需要更简单的东西。

    【讨论】:

    • 你怎么知道不是 Model I,Level I?还是可可?或者,$DEITY 禁止 100 型? :-)
    • 非常酷!但我正在寻找更旧的版本。 :)
    • @Red,那么你需要指定哪个版本。除非你当然是在钓鱼,我开始怀疑:-)
    • 抱歉没有拖钓。真的很抱歉,我只是希望 trs-80 的爱好者能得到答案:)
    • @Red,不是业余爱好者,但我确实对这些野兽大吃一惊。这个答案就是您想要的答案,将代码带过来,稍作修改,因此您不必搜索古老的 PDF。
    【解决方案2】:

    尝试关注

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

    【讨论】:

    • 没有。旧的原始 BASIC 代码。每行都以整数开头,goto 被认为是很好的编码风格。
    • 顺便说一下,@Red, GOTO 不被认为是好的风格,Dijkstra 在 60 年代就已经明确了这一点,很久在 Trash80 出现之前。只是没有其他选择:-)
    猜你喜欢
    • 2021-06-17
    • 2017-07-24
    • 1970-01-01
    • 1970-01-01
    • 1970-01-01
    • 1970-01-01
    • 2016-04-14
    • 2017-11-30
    • 1970-01-01
    相关资源
    最近更新 更多