(최대공약수 구하기) while... 반복문 예제 for Boo

Boo 언어의 while... 반복문 구문은 Python 언어의 그것과 동일하다.

        while 조건식:
                블럭

스트링을 긴정수(즉 64비트 정수) 타입으로 변환하는 변수에 저장하는 Boo 언어의 구문은

        변수명 as long = Convert.ToInt64(스트링)

이다.

소스 파일명: testWhile.boo

1. # Filename: testWhile.boo
2. #
3. # Purpose:  Example using the while loop syntax
4. #                while ....
5. #
6. # Execute: booi testWhile.boo -200 300
7. #
9. import System
11. # 사용법 표시
12. def printUsage():
13.     print "Using: booi testWhile.boo [integer1] [integer2]"
14.     print "This finds the greatest common divisor of the given two integers."
16. if argv.Length != 2:
17.     printUsage()
18.     Environment.Exit(1)
20. # --------------------------------------
21. # 명령행 인자의 두 스트링을 가져와서
22. # 정수 타입으로 변환하여
23. # 변수 val1과 val2에 저장한다.
24. val1 as long = Convert.ToInt64(argv[0])
25. val2 as long = Convert.ToInt64(argv[1])
27. # a는 |val1|, |val2| 중 큰 값
28. a as long = Math.Abs(val1)
29. b as long = Math.Abs(val2)
30. if a < b:
31.     a = Math.Abs(val2)
32.     b = Math.Abs(val1)
34. if b == 0:
35.     print "GCD(${val1}, ${val2}) = ${a}"
36.     Environment.Exit(1)
38. # --------------------------------------
39. # Euclidean 알고리즘의 시작
40. #
41. # a를 b로 나누어 몫은 q에, 나머지는 r에 저장
42. q = a / b
43. r = a % b
45. # --------------------------------------
46. # Euclidean 알고리즘의 반복 (나머지 r이 0이 될 때 까지)
47. while r != 0:
48.     a = b
49.     b = r
50.     q = a / b
51.     r = a % b
53. # 나머지가 0이면 그 때 나눈 수(제수) b가 최대공약수(GCD)이다.
54. gcd = b
56. # 최대공약수(GCD)를 출력한다.
57. print "GCD(${val1}, ${val2}) = ${gcd}"

 

실행:

Command> booi testWhile.boo
Using: booi testWhile.boo [integer1] [integer2]
This finds the greatest common divisor of the given two integers.

Command> booi testWhile.boo -200 300
GCD(-200, 300) = 100

Command> booi testWhile.boo -200 0
GCD(-200, 0) = 200

Command> booi testWhile.boo 125 100
GCD(125, 100) = 25

Command> booi testWhile.boo 23 25
GCD(23, 25) = 1


 

크리에이티브 커먼즈 라이선스

이 저작물은 크리에이티브 커먼즈 코리아 저작자표시-비영리-동일조건변경허락 2.0 대한민국 라이선스에 따라 이용하실 수 있습니다.