2.4.13 DIVIDE statement (나눗셈 문)

경고	박우범의 허락 없이는 상업적 사용을 금합니다.

2.4.13 DIVIDE statement

( 나눗셈 문 )

[형식 1]


	DIVIDE	{	데이터명-1	}	INTO	데이터명-2	[ ROUNDED ]
	DIVIDE	{	리터랄-1	}	INTO	데이터명-2	[ ROUNDED ]

						[ 데이터명-3 [ ROUNDED ] … ]

						[ ON SIZE ERROR 무조건 명령 ]

①

INTO 다음 데이터명의 값을 INTO 앞 데이터명의 값으로 나누며,

그 몫을 INTO 다음의 데이터명에 기억시킵니다.

[예문 1]

	DIVIDE	R	INTO	S.			→	( S = S / R )
	DIVIDE	7	INTO	A	B	ROUNDED.		( A = A / 7 , B = B / 7 )

⇒

B의 결과 값은 반올림된 값이 기억됩니다.

[형식 2]

DIVIDE

{

데이터명-1

}

{

INTO

}

{

데이터명-2

}

리터랄-1

BY

리터랄-2

GIVING

데이터명-3

[ ROUNDED ]

[ 데이터명-4 [ ROUNDED ] … ]

[ ON SIZE ERROR 무조건 명령 ]

[예문 1]


	DIVIDE	A	BY	B.			→	( A = A / B )
	DIVIDE	A	INTO	B.			→	( B = B / A )
	DIVIDE	A	BY	B	GIVING	C.	→	( C = A / B )
	DIVIDE	A	INTO	B	GIVING	C.	→	( C = B / A )

⇒

참고) 위 문장에서는 GIVING 문을 사용하는 것이 좋습니다.

[예문 2]


	DIVIDE	A	BY	B	GIVING	C	ROUNDED	D
		ON SIZE ERROR GO TO K-RTN.

⇒

C에는 A/B 결과의 반올림된 결과 값이 기억되며,

D에는 A/B 한 결과 값만 기억됩니다.

⇒

C·D에 SIZE(크기) 에러가 발생하면 K-RTN으로 분기합니다.

[형식 3]

DIVIDE

{

데이터명-1

}

{

INTO

}

{

데이터명-2

}

리터랄-1

BY

리터랄-2

GIVING

데이터명-3

[ ROUNDED ]

REMAINDER 데이터명-4

[ ON SIZE ERROR 무조건 명령 ]

⇒	데이터명-3에는 몫이 기억되며,
	데이터명-4에는 나머지가 기억됩니다.

[예문 1]

DIVIDE

K

BY

B

GIVING

D

REMAINDER

A.

⇒

( D = K / B ... A (나머지) )

[예문 2]

	MOVE	10	TO	A.
	MOVE	4	TO	B.
	DIVIDE	B	INTO	A	GIVING	C	REMAINDER	D.

⇒

( C = A / B ... D (나머지) )

결과 값) C = 2 (몫) , D = 2 (나머지)

지적 소유권을 보호합시다.