Script Programming(스크립트 프로그래밍)

소스 파일명: testWhileCPP.cpp

1. /*
2.  * Filename: testWhileCPP.cpp
3.  *
4.  * Purpose:  Example using the while loop syntax
5.  *               while ....
6.  *
7.  * Compile:  cl -EHsc testWhileCPP.cpp
8.  *
9.  * Execute:  testWhileCPP -200 300
10. */
12. #include <iostream>
13. #include <cmath>
15. using namespace std;
17. // 사용법 표시
18. void printUsage() {
19.     cout << "Using: testWhileCPP [integer1] [integer2]" << endl;
20.     cout << "This finds the greatest common divisor of the given two integers." << endl;
21. }
23. int main(int argc, char *argv[]) {
24.     long val1, val2;
25.     long a, b, q, r, gcd;
27.     if (argc != 3) {
28.         printUsage();
29.         exit(1);
30.     }
32.     // 명령행 인자의 두 스트링을 가져와서
33.     // 긴정수(long) 타입으로 변환하여
34.     // 변수 val1과 val2에 저장한다.
35.     val1 = atoi(argv[1]);
36.     val2 = atoi(argv[2]);
38.     // a는 |val1|, |val2| 중 큰 값
39.     a = abs(val1);
40.     b = abs(val2);
41.     if (a < b) {
42.         a = abs(val2);
43.         b = abs(val1);
44.     }
45.     if (b == 0L) {
46.         cout << "GCD(" << val1 << ", " << val2 << ") = " << a << endl;
47.         exit(0);
48.     }
50.     // -------------------------------------------
51.     // Euclidean 알고리즘의 시작
52.     //
53.     // a를 b로 나누어 몫은 q에, 나머지는 r에 저장
54.     q = a / b;
55.     r = a % b;
57.     // Euclidean 알고리즘의 반복 (나머지 r이 0이 될 때 까지)
58.     while (r != 0L) {
59.         a = b;
60.         b = r;
61.         q = a / b;
62.         r = a % b;
63.     }
65.     // 나머지가 0이면 그 때 나눈 수(제수) b가 최대공약수(GCD)이다.
66.     gcd = b;
68.     // 최대공약수(GCD)를 출력한다.
69.     cout << "GCD(" << val1 << ", " << val2 << ") = " << gcd << endl;
70.     return 0;
71. }

컴파일:

Command> cl -EHsc testWhileCPP.cpp


실행:

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

Command> testWhileCPP 200 -300
GCD(200, -300) = 100

Command> testWhileCPP 0 -300
GCD(0, -300) = 300

Command> testWhileCPP 20 -125
GCD(20, -125) = 5

Command> testWhileCPP 121 66
GCD(121, 66) = 11

Command> testWhileCPP -111 -37
GCD(-111, -37) = 37





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

소스 파일명: testWhile.c

1. /*
2.  * Filename: testWhile.c
3.  *
4.  * Purpose:  Example using the while loop syntax
5.  *               while ....
6.  *
7.  * Compile:  cl testWhile.c
8.  *
9.  * Execute:  testWhile -200 300
10. */
12. #include <stdio.h>
13. #include <math.h>
15. // 사용법 표시
16. void printUsage() {
17.     printf("Using: testWhile [integer1] [integer2]\n");
18.     printf("This finds the greatest common divisor of the given two integers.\n");
19. }
21. int main(int argc, char *argv[]) {
22.     long val1, val2;
23.     long a, b, q, r, gcd;
25.     if (argc != 3) {
26.         printUsage();
27.         exit(1);
28.     }
30.     // 명령행 인자의 두 스트링을 가져와서
31.     // 긴정수(long) 타입으로 변환하여
32.     // 변수 val1과 val2에 저장한다.
33.     val1 = atoi(argv[1]);
34.     val2 = atoi(argv[2]);
36.     // a는 |val1|, |val2| 중 큰 값
37.     a = abs(val1);
38.     b = abs(val2);
39.     if (a < b) {
40.         a = abs(val2);
41.         b = abs(val1);
42.     }
44.     if (b == 0L) {
45.         printf("GCD(%ld, %ld) = %ld\n", val1, val2, a);
46.         exit(0);
47.     }
49.     // -------------------------------------------
50.     // Euclidean 알고리즘의 시작
51.     //
52.     // a를 b로 나누어 몫은 q에, 나머지는 r에 저장
53.     q = a / b;
54.     r = a % b;
56.     // Euclidean 알고리즘의 반복 (나머지 r이 0이 될 때 까지)
57.     while (r != 0L) {
58.         a = b;
59.          b = r;
60.         q = a / b;
61.         r = a % b;
62.     }
64.     // 나머지가 0이면 그 때 나눈 수(제수) b가 최대공약수(GCD)이다.
65.     gcd = b;
67.     // 최대공약수(GCD)를 출력한다.
68.     printf("GCD(%ld, %ld) = %ld\n", val1, val2, gcd);
69.     return 0;
70. }

컴파일:

Command> cl testWhile.c


실행:

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

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

Command> testWhile 0 -300
GCD(0, -300) = 300

Command> testWhile 20 -125
GCD(20, -125) = 5

Command> testWhile 121 66
GCD(121, 66) = 11

Command> testWhile -111 -37
GCD(-111, -37) = 37

소스 파일명: testWhile.lua

1. --[[
2.   Filename: testWhile.lua
3.   Purpose:  Example using the while loop syntax
4.                 while ....
5.   Execute: lua testWhile.lua -200 300
6. --]]
8. -- 사용법 표시
9. function printUsage()
10.     print "Using: lua testWhile.lua [integer1] [integer2]"
11.     print "This finds the greatest common divisor of the given two integers."
12. end
14. if #arg ~= 2 then
15.     printUsage()
16.     os.exit(1)
17. end
19. -- 명령행 인자의 두 스트링을 가져와서
20. -- 정수 타입으로 변환하여
21. -- 변수 val1과 val2에 저장한다.
22. val1 = tonumber(arg[1])
23. val2 = tonumber(arg[2])
25. -- a는 |val1|, |val2| 중 큰 값
26. a = math.abs(val1)
27. b = math.abs(val2)
28. if a < b then
29.     a = math.abs(val2)
30.     b = math.abs(val1)
31. end
33. if b == 0 then
34.     print( "GCD(" .. val1 .. ", " .. val2 .. ") = " .. a )
35.     os.exit(0)
36. end
38. -- Euclidean 알고리즘의 시작
39. --
40. -- a를 b로 나누어 몫은 q에, 나머지는 r에 저장
41. q = a / b
42. r = a % b
44. -- Euclidean 알고리즘의 반복 (나머지 r이 0이 될 때 까지)
45. while r ~= 0 do
46.     a = b
47.     b = r
48.     q = a / b
49.     r = a % b
50. end
52. -- 나머지가 0이면 그 때 나눈 수(제수) b가 최대공약수(GCD)이다.
53. gcd = b
55. -- 최대공약수(GCD)를 출력한다.
56. print( "GCD(" .. val1 .. ", " .. val2 .. ") = " .. gcd )

실행:

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

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

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

Command> lua testWhile.lua 21 81
GCD(21, 81) = 3

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





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