小编Roc*_*und的帖子

假设十进制为输入 - 选项卡并输入添加尾随零

晚上好,

我刚开始学习Cobol,并且练习,我想编写一个简单的乘法程序,使用用户给出的两个十进制数.

所以我写了以下内容

   IDENTIFICATION DIVISION.
   PROGRAM-ID. exo.

   DATA DIVISION.
   WORKING-STORAGE SECTION.
   77 a PIC 9(2)V9.
   77 b PIC 9(2)V9.
   77 result PIC 9(4)V99.
   screen section.
   1 pla-title.
          2 blank screen.
          2 line 1 col 1 value 'Multiplication'.
   1 pls-numbers.
          2 line 4 col 2 value 'Number 1 : '.
          2 PIC 9(2)V9 to a required.
          2 line 5 col 2 value 'Number 2 : '.
          2 PIC 9(2)V9 to b required.
   1 pla-result.
          2 line 7 col 2 PIC 9(2)V9 …
Run Code Online (Sandbox Code Playgroud)

cobol

4
推荐指数
1
解决办法
67
查看次数

标签 统计

cobol ×1