source code clone download copy to clipboard report bug / make suggestion

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
IDENTIFICATION DIVISION.
PROGRAM-ID. SequenceProgram.
AUTHOR. Michael Coughlan.                     
 
DATA DIVISION.
WORKING-STORAGE SECTION.
01 Num1 PIC 9 VALUE ZEROS.
01 Num2 PIC 9 VALUE ZEROS.
01 Result PIC 99 VALUE ZEROS.
 
 
PROCEDURE DIVISION.
CalculateResult.
   ACCEPT Num1.
   ACCEPT Num2.
   MULTIPLY Num1 BY Num2 GIVING Result.
   DISPLAY "Result is = ", Result.
   STOP RUN.
                   

clone download copy to clipboard

• upload with new input
  You have reached a limit of free submissions this month.
  You cannot send submissions this month anymore because of exceeding your monthly limit. Please recharge your account.
  
• # 2:   hide show   clone   input   146 days 3 hours ago    Success

  result: Success     time: 0.01s    memory: 3996 kB     returned value: 0

  input:

  10
  20
  

  output:

  Result is = 00
  
• # 1:   hide show   clone   input   146 days 3 hours ago    Success

  result: Success     time: 0.02s    memory: 3996 kB     returned value: 0

  input: no
  output:

  Result is = 00