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

F# 언어에서 int 타입과 bigint 타입을 상호변환 하는 것은 의외로 쉽다. 명령 프롬프트> fsi Microsoft (R) F# 2.0 Interactive build 2.0.0.0 Copyright (c) Microsoft Corporation. All Rights Reserved. For help type #help;; > let a = 100I;; val a : System.Numerics.BigInteger = 100I > let b = int a;; val b : int = 100 > let c = bigint b;; val c : System.Numerics.BigInteger = 100I > b**5;; b**5;; ^ stdin(13,1): error FS0001: The type ..

정의 (소수와 합성수) 1보다 큰 양의 정수 n에 대하여 (i) n = a * b 를 만족하고 1보다 큰 두 양의 정수 a와 b가 존재하면, n을 합성수(合成數, composite number)라고 한다. 참고로 이 경우, a, b 중에 적어도 하나는 sqrt(n) 보다 작거나 같다. 합성수의 예로는 4, 6, 9, 24, 143 등이 있다. (ii) n = a * b 를 만족하고 1보다 큰 두 양의 정수 a와 b가 존재하지 않으면, 즉 n을 두 양의 정수의 곱으로 표현하는 방법이 1*n과 n*1 두 가지 뿐이면, n을 소수(素數, prime number)라고 한다. 소수의 예로는 2, 3, 5, 7, 11 등이 있다. n이 소수인지 아닌지 확인하려면, n을 2 보다 크거나 같고 sqrt(n) 보다 작거..

[파일명: TestStringFindInList.fs]------------------------------------------------ #light let find arr s = List.findIndex (fun x -> x = s) arr let printList data = let rec loop l = match l with | x::[] -> printf "%O" x | x::xs -> printf "%O, " x; loop xs | [] -> printf "" printf "[" loop data printf "]" // Begin here let cmdArgs = System.Environment.GetCommandLineArgs() let words = ["하나"; "둘"; "셋"; ..

printList 함수를 F#의 함수형 언어의 특징을 살려 (꼬리 재귀호출과 match 표현을 이용하여) 구현하였다. [파일명: TestSort.fs]------------------------------------------------ #light let printList data = let rec loop l = match l with | x::[] -> printf "%O" x | x::xs -> printf "%O, " x; loop xs | [] -> printf "" printf "[" loop data printf "]" // Begin here let cmdArgs = System.Environment.GetCommandLineArgs() let b = cmdArgs.[1..] |> Arr..

초등학교 때 배우던 두 정수의 곱셈표를 만들어 주는 F# 소스이다. 이 소스는 Python 소스를 F# 소스로 변환한 것이라 F#의 명령형 언어 특징을 위주로 짜여져 있다. (* * Filename: MakeMultTable.fs * * Print a multiplication table. * * Compile: fsc MakeMultTable.fs * Execute: MakeMultTable 230 5100 * * Date: 2010/07/15 * Author: PH Kim [ pkim ((AT)) scripts.pe.kr ] *) #light exception RuntimeError of string exception ValueError of string let println s = printfn "..

▒ F# 소스: TestStringReverse.fs #light let a = "Hello, world!" let b = "안녕하세요?" let mutable arr = a.ToCharArray() arr

다음은 초등학교에서 배우는 나눗셈 계산표를 만들어주는 F# 소스 코드이다. 나눗셈 계산표를 완성하고 나서 약수, 배수 관계를 알려준다. 아래의 소스는 Python 용 소스를 F# 용 소스로 거의 일대일 변환한 것이라서, F# 언어의 명령형 언어의 특징을 위주로 짜여져 있다. (* * Filename: MakeDivisionTable.fs * * Purpose: Make a division table in a handy written form. * * Compile: fsc --codepage:949 MakeDivisionTable.fs * * Execute: MakeDivisionTable 12345 32 * MakeDivisionTable 500210 61 * MakeDivisionTable 234 5..

ASCII(애스키)란 American Standard Code for Information Interchange의 줄임글로서, 영문자에 기초한 문자 인코딩이다. 이 문자 인코딩에는 C0 제어문자(C0 control character)도 포함되어 있다. ( 참고: ASCII - Wikipedia, the free encyclopedia ) 다음은 7bit ASCII 코드표를 만들어 보여주는 F# 소스 코드이다. 소스 코드 중에 진법변환에 필요한 함수 atoi(string, radix) itoa(number, radix) 를 F# 코드로 자체 작성하여 사용하였다. (아래의 소스는 Python 소스를 F# 소스로 일대일 변환 수정한 것이라서, F# 언어의 명령형 언어 특징을 위주로 작성되어 있다.) (* * ..

컴퓨터 프로그래밍에서 꼭 알아두어야 할 주요 진법은 당연히 10진법, 2진법, 8진법, 16진법이다. 다음은 0 에서 15 까지의 정수를 10진법, 2진법, 8진법, 16진법의 표로 만들어 보여주는 F# 소스 코드이다. 진법 변환에 필요한 함수 atoi(string, radix) itoa(number, radix) 를 F# 코드로 자체 작성하여 사용하였다. (아래의 소스는 Python 소스를 F# 소스로 일대일 변환 수정한 것이라서, F# 언어의 명령형 언어 특징을 위주로 작성되어 있다.) (* * Filename: MakeRadixTable.fs * Show the radix table with 10-, 2-, 8-, 16-radices. * * Compile: fsc MakeRadixTable.fs ..

Algorithm STRASSEN(A,B) 1. n ←number of rows of A 2. if n = 1 then return (a11b11) 3. else 4. Determine Aij and Bij for i, j = 1, 2 (blocks as before) 5. Compute M1, . . . , M7 (as below) 6. Compute C11, C12, C21, C22 (as below) 7. return C11 C12 C21 C22 M1 = (A11 + A22)*(B11 + B22) M2 = (A21 + A22)*B11 M3 = A11*(B12 − B22) M4 = A22*(B21− B11) M5 = (A11 + A12)*B22 M6 = (A21 − A11)*(B11 + B12) M7..