language: COBOL 85 (tinycobol-0.65.9)
date: 127 days 5 hours ago
link:
visibility: public
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
identification division.
program-id. sample1.
environment division.
data division.
file section.
working-storage section.
01 ws-name pic X(10).
01 WS-num pic 9(2).
Procedure division.
1000-main-para.
    accept ws-name.
    accept ws-num.
    display 'Name: ', ws-name.
    display 'Number: ', ws-num.
    stop run.
1000-exit.
   exit.
  
 
  • upload with new input
  • result: Success     time: 0.01s    memory: 3996 kB     returned value: 0

    Name:           
    Number: 00