1
2
3
4
5
6
7
8
9
public class Test {
public static void main(String arg[]) {
  try {
     throw new NullPointerException();
  } finally {
     throw new RuntimeException("Finally");
  }
}
}
 ...

1
2
3
4
5
6
7
8
9
public static void main(String arg[]) {
  try {
     throw new NullPointerException();
  } finally {
     throw new RuntimeException("Finally");
  }
}
 
 

1
2
3
4
5
6
7
8
9
class FinallyTest {
public static void main(String arg[]) {
  try {
     throw new NullPointerException();
  } finally {
     throw new RuntimeException("Finally");
  }
}
}
 ...

1
2
3
4
5
6
7
8
        IDENTIFICATION DIVISION.
        PROGRAM-ID. CHUGUN.
 
        ENVIRONMENT DIVISION.
 
        DATA DIVISION.
        WORKING-STORAGE SECTION.
        01 POWER PIC 999 .
 ...

1
2
3
4
5
6
7
8
        IDENTIFICATION DIVISION.
        PROGRAM-ID. CHUGUN.
 
        ENVIRONMENT DIVISION.
 
        DATA DIVISION.
        WORKING-STORAGE SECTION.
        777 n PIC Z9 .
 ...

1
2
3
4
5
6
7
8
        IDENTIFICATION DIVISION.
        PROGRAM-ID. CHUGUN.
 
        ENVIRONMENT DIVISION.
 
        DATA DIVISION.
        WORKING-STORAGE SECTION.
        77 n PIC Z9 .
 ...

1
2
3
4
5
6
7
8
        IDENTIFICATION DIVISION.
        PROGRAM-ID. CHUGUN.
 
        ENVIRONMENT DIVISION.
 
        DATA DIVISION.
        WORKING-STORAGE SECTION.
        77 n PIC Z9 .
 ...

1
2
3
DATA: ls_asaa type i. 
i = 12344.
write /, i. 

1
2
3
4
5
6
7
8
        IDENTIFICATION DIVISION.
        PROGRAM-ID. SAMPLE.
 
        ENVIRONMENT DIVISION.
 
        DATA DIVISION.
        WORKING-STORAGE SECTION.
        77 n PIC Z9 .
 ...

1
2
3
4
5
6
7
8
       IDENTIFICATION DIVISION.
       PROGRAM-ID. PRUEBA.
 
       ENVIRONMENT DIVISION.
 
       DATA DIVISION.
 
       WORKING-STORAGE SECTION.
 ...

1
2
3
4
5
6
7
8
       IDENTIFICATION DIVISION.
       PROGRAM-ID. PRUEBA.
 
       ENVIRONMENT DIVISION.
 
       DATA DIVISION.
 
       WORKING-STORAGE SECTION.
 ...

1
2
3
4
5
6
7
8
IDENTIFICATION DIVISION.
PROGRAM-ID. PRUEBA.
 
ENVIRONMENT DIVISION.
 
DATA DIVISION.
 
WORKING-STORAGE SECTION.
 ...

1
2
3
4
5
6
7
8
IDENTIFICATION DIVISION.
PROGRAM-ID. PRUEBA.
 
ENVIRONMENT DIVISION.
 
DATA DIVISION.
 
WORKING-STORAGE SECTION.
 ...

1
2
3
4
5
6
7
8
9
identification division
program-id. Exerc1.
author. Jonathan Pereira.
*
data division.
working-storage section.
77 largura pic 9(003) value zeros.
77 altura pic 9(003) value zeros.
77 area-result pic 9(006) value zeros.
 ...

1
2
3
4
       IDENTIFICATION DIVISION.
       ENVIRONMENT DIVISION.
       DATA DIVISION.
       PROCEDURE DIVISION.

1
2
3
4
5
6
7
8
        IDENTIFICATION DIVISION.
        PROGRAM-ID. SAMPLE.
 
        ENVIRONMENT DIVISION.
 
        DATA DIVISION.
        WORKING-STORAGE SECTION.
        77 n PIC Z9 .
 ...

1
2
3
4
5
6
7
8
9
 IDENTIFICATION DIVISION.
        PROGRAM-ID. SAMPLE.
 
        ENVIRONMENT DIVISION.
 
        DATA DIVISION.
        WORKING-STORAGE SECTION.
        77 n PIC Z9 .
 
 ...

1
2
3
4
5
6
7
8
9
 IDENTIFICATION DIVISION.
        PROGRAM-ID. SAMPLE.
 
        ENVIRONMENT DIVISION.
 
        DATA DIVISION.
        WORKING-STORAGE SECTION.
        77 n PIC Z9 .
 
 ...

1
2
3
4
5
6
7
8
9
#include<stdio.h>
 
int main()
{int x;
    int a[3][4] = { 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12 };
    x=*(a+0);
   printf("%d\n",x);
printf("%u, %u, %u\n", a[0]+1, *(a[0]+1), *(*(a+0)+1));
    return 0;
 ...

1
2
3
4
5
6
7
8
        IDENTIFICATION DIVISION.
        PROGRAM-ID. SAMPLE.
 
        ENVIRONMENT DIVISION.
 
        DATA DIVISION.
        WORKING-STORAGE SECTION.
        77 n PIC Z9 .
 ...

1
2
3
4
5
6
7
8
        IDENTIFICATION DIVISION.
        PROGRAM-ID. SAMPLE.
 
        ENVIRONMENT DIVISION.
 
        DATA DIVISION.
        WORKING-STORAGE SECTION.
        77 n PIC Z9 .
 ...

1
2
3
4
5
6
7
8
9
       IDENTIFICATION DIVISION.
       PROGRAM-ID.    BALL-O-STRING.
       AUTHOR.        BILL ROGERS.
       ENVIRONMENT DIVISION.
       DATA DIVISION.
       WORKING-STORAGE SECTION.
       01 WHOLE-NAME                PIC X(25).
       01 FIRST-NAME                PIC X(25).
       01 MIDDLE-NAME               PIC X(25).
 ...

1
2
3
4
5
6
7
8
9
       IDENTIFICATION DIVISION.
       PROGRAM-ID.    BALL-O-STRING.
       AUTHOR.        BILL ROGERS.
       ENVIRONMENT DIVISION.
       DATA DIVISION.
       WORKING-STORAGE SECTION.
       01 WHOLE-NAME                PIC X(25).
       01 FIRST-NAME                PIC X(25).
       01 MIDDLE-NAME               PIC X(25).
 ...

1
2
3
4
5
6
7
8
9
       IDENTIFICATION DIVISION.
       PROGRAM-ID.    BALL-O-STRING.
       AUTHOR.        BILL ROGERS.
       ENVIRONMENT DIVISION.
       DATA DIVISION.
       WORKING-STORAGE SECTION.
       01 WHOLE-NAME                PIC X(25).
       01 FIRST-NAME                PIC X(25).
       01 MIDDLE-NAME               PIC X(25).
 ...

1
2
3
4
5
6
7
8
9
       IDENTIFICATION DIVISION.
       PROGRAM-ID.    BALL-O-STRING.
       AUTHOR.        BILL ROGERS.
       ENVIRONMENT DIVISION.
       DATA DIVISION.
       WORKING-STORAGE SECTION.
       01 WHOLE-NAME                PIC X(25).
       01 FIRST-NAME                PIC X(25).
       01 MIDDLE-NAME               PIC X(25).
 ...

1
2
3
4
5
6
7
8
9
000100 IDENTIFICATION DIVISION.
000200 PROGRAM-ID.     HELLOWORLD.
000300
000400*
000500 ENVIRONMENT DIVISION.
000600 CONFIGURATION SECTION.
000700 SOURCE-COMPUTER. RM-COBOL.
000800 OBJECT-COMPUTER. RM-COBOL.
000900
 ...

1
2
3
4
5
6
7
8
9
       IDENTIFICATION DIVISION.
       PROGRAM-ID.    BALL-O-STRING.
       AUTHOR.        BILL ROGERS.
       ENVIRONMENT DIVISION.
       DATA DIVISION.
       WORKING-STORAGE SECTION.
       01 WHOLE-NAME                PIC X(25).
       01 FIRST-NAME                PIC X(25).
       01 MIDDLE-NAME               PIC X(25).
 ...

1
2
3
4
5
6
7
8
9
        IDENTIFICATION DIVISION.
        PROGRAM-ID. CALCULAMEDIA.
        AUTHOR. RICARDO KOBALL
        DATE-WRITTEN.25/08/2010
        REMARKS. TRABALHO SOBRE A LINGUAGEM COBOL.
        ENVIRONMENT DIVISION.
 
        DATA DIVISION.
        77  myvar PIC 999 .
 ...

1
2
3
4
5
6
7
8
9
        IDENTIFICATION DIVISION.
        PROGRAM-ID. CALCULAMEDIA.
        AUTHOR. RICARDO KOBALL
        DATE-WRITTEN.25/08/2010
        REMARKS. TRABALHO SOBRE A LINGUAGEM COBOL.
        ENVIRONMENT DIVISION.
 
        DATA DIVISION
                77  myvar PIC 999 .
 ...

1
2
3
4
5
6
7
8
9
        IDENTIFICATION DIVISION.
        PROGRAM-ID. CALCULAMEDIA.
        AUTHOR. RICARDO KOBALL
        DATE-WRITTEN.25/08/2010
        REMARKS. TRABALHO SOBRE A LINGUAGEM COBOL.
        ENVIRONMENT DIVISION.
 
        DATA DIVISION
        77  myvar PIC 999 .
 ...