[¿¹¹®]
|
01 |
|
|
A-TTT. |
|
|
|
|
|
|
|
03 |
|
A-TT |
OCCURS |
2. |
|
|
|
|
|
03 |
|
A-T |
OCCURS |
3. |
|
|
|
|
|
|
05 |
A |
OCCURS |
4 |
PIC |
9(3). |
|
|
<±â¾ï
ÇüÅÂ>
|
|
|
|
|
|
|
|
|
A-TTT
|
A-TT(1)
|
|
A-TT(2)
|
A-T(1, 1)
|
A-T(2, 1)
|
A(1, 1, 1)
|
A(1, 1, 2)
|
A(1, 1, 3)
|
A(1, 1, 4)
|
A(2, 1, 1)
|
A(2, 1, 2)
|
A(2, 1, 3)
|
A(2, 1, 4)
|
A-T(1, 2)
|
A-T(2, 2)
|
A(1, 2, 1)
|
A(1, 2, 2)
|
A(1, 2, 3)
|
A(1, 2, 4)
|
A(2, 2, 1)
|
A(2, 2, 2)
|
A(2, 2, 3)
|
A(2, 2, 4)
|
A-T(1, 3)
|
A-T(2, 3)
|
A(1, 3, 1)
|
A(1, 3, 2)
|
A(1, 3, 3)
|
A(1, 3, 4)
|
A(2, 3, 1)
|
A(2, 3, 2)
|
A(2, 3, 3)
|
A(2, 3, 4)
|
|
<*> ±â¾ï Àå¼Ò(¹è¿¸í) A´Â
2 ¡¿ 3 ¡¿ 4 = 24 °³ÀÇ Ç׸ñÀÔ´Ï´Ù.
<Çؼ³>
|
|
¨ç
|
PROCEDURE DIVISION¿¡¼´Â 3°³ÀÇ Ã·ÀÚ¸¦ »ç¿ëÇÕ´Ï´Ù. |
¨è
|
PIC±¸´Â ¸¶Áö¸· ´Ü°è¿¡ Çѹø¸¸ ±â¼úÇÕ´Ï´Ù. |
¨é
|
3Â÷¿ø ¹è¿ÀÇ Ã·ÀÚ´Â ¸é, Çà, ¿À» ³ªÅ¸³À´Ï´Ù. |
<*>
|
COBOL¿¡¼ ¹è¿Àº ¸é, Çà, ¿ ¼øÀ§ÀÔ´Ï´Ù.
À§ ¿¹¹®¿¡¼
|
05¹ø° ¹è¿ ¿ä¼Ò´Â A(1, 2, 1)À̸ç, |
|
15¹ø° ¹è¿ ¿ä¼Ò´Â A(2, 1, 3)ÀÔ´Ï´Ù. |
|
|