프로그래밍/Pascal 4

FreePascal 언어로 역삼각함수, 역쌍곡선함수 값을 구하는 예제

역삼각함수란 삼각함수의 역함수를 의미하고, 역쌍곡선함수란 쌍곡선함수의 역함수를 의미한다. 수학에서 sin 함수의 역함수는 arcsin 으로 표기되는데, FreePascal 언어에서는 asin 함수로 구현되어 있다. FreePascal 은 http://www.freepascal.org 에서 구할 수 있다. 아래의 소스는 FreePascal 의 (명령줄 컴파일 명령) fpc 로 컴파일되는 소스이다. 참고 1. FreePascal 은 이전(MS-DOS 시절)에 많이 쓰였던 Turbo Pascal 과 유사하며, Turbo Pascal을 발전시킨 것이라고 보변 된다. 아래는 Wikipedia 에서 적어 놓은 FreePascal 의 설명이다. ----------------------------------------..

Free Pascal 과 근사공식을 이용한 PI/sqrt(12) 의 근사값 계산

근사 공식 \frac{\pi}{\sqrt{12}} = \sum^\infty_{k=0} \frac{(-3)^{-k}}{2k+1} 을 이용하여 근사값 계산하는 프로그램을 Pascal 언어로 작성해 보았다. (*****************************************************) (* Filename: approximatePiOverSqrt12.pas *) (* *) (* Compile: fpc approximatePiOverSqrt12.pas *) (* Execute: approximatePiOverSqrt12,pas *) (*****************************************************) program ApproximatePiOverSqrt12; ..

구구단 출력 예제 for Pascal

Pascal 언어의 for 반복문 양식은 for varName := startValue to finalValue do begin block; end; 또는 for varName := startValue downto finalValue do begin block; end; * Pascal 언어의 for 반복문에는 step 이 없다. * Pascal 언어는 C 언어와 달리 변수명과 프로시듀어명, 함수명에 대소문자를 구별하지 않는다. 즉, 아래의 소스에서 변수명 dan 과 Dan 은 같은 것아고, 프로시듀어명 printDan 과 PrintDan 은 같은 것아다. * C 언어에서 void 함수라고 하는 것 즉 리턴값이 없는 함수를 Pascal 언어에서는 function 이라 하지 않고 procedure 라고 한..