将摄氏温度转换为华氏温度的COBOL代码

Question

给出以下代码，对将遵循提供的结构图的程序部门进行编码。

程序部门必须使用PERFORM…VARYING代码结构，该结构将控制将摄氏温度转换为华氏温度的模块。

使用提供的层次结构图作为逻辑基础。在“层次结构图”中记录我的评论。

IDENTIFICATION DIVISION.
PROGRAM-ID.  TEMPERATURE-CONVERSION.
AUTHOR.  Mel Sanschagrin (AKA Captain COBOL).

DATA DIVISION.

WORKING-STORAGE SECTION.

01   TEMPERATURE-VARIABLES.

        05   CELSIUS-VALUE        PIC 9(3) VALUE  ZERO.

       05   START-CELSIUS-TEMP     PIC 9(3)  VALUE ZERO.

       05   CELSIUS-INCREMENT      PIC  9(2)  VALUE ZERO.

01   CONVERSION-DETAIL-RECORD.

       05   CELSIUS-VALUE-OUT     PIC 9(3).

       05   FILLER            PIC X(3)  VALUE SPACES.

       05   FAHRENHEIT-TEMP          PIC  9(3).  

================================================ ===========

将此行代码编码为摄氏温度转换为华氏温度。

COMPUTE   FAHRENHEIT-TEMP = CELSIUS-VALUE * (9 / 5) + 32 

200 Initialize模块是CELCIUS-VALUE（控制变量），START-CELCIUS-TEMP（初始值）和设置了CELCIUS-INCREMENT（增量值）。使用DISPLAY and ACCEPT命令输入这些值。

一旦计算出摄氏值，就应使用DISPLAY命令显示记录CONVERSION-DETAIL-RECORD。

提示– PERFORM .. VARYING语句应位于100生产摄氏转换模块，因为它控制201生产一摄氏转换模块。

Answer 1

我该如何完成？

程序部门。

100程序CELSIUS转换。

    PERFORM  200-INITIALIZE-CELSIUS-VARIABLES.
    PERFORM  201- PRODUCONE-CELSIUS-CONVERSION

UNTIL EOF-FLAG = “YES”

     PERFORM 202-TERMINATE-CONVERSION.

     STOP RUN.

200-初始化CELSIUS-VARIABLES。

    PERFORM 

201-PRODUCONE-CELSIUS-CONVERSION。

     PERFORM

202终止转换。

    CLOSE