장안동베짱e's LoG# 머리 복잡할 때 보면 더 복잡해지는 블로그 RSS FEED

볼랜드의 델파이의 전신이 파스칼이다.
DOS시절때에는 C와 더불어 범용 프로그래밍 언어로 각광을 받았다.
C에 Turbo-C가 있었다면, 파스칼에는 Turbo-Pascal이 있어 쌍벽(?)을 이뤘다.

델파이가 있다지만, 현재에는 거의 사용되지 않는 언어다.

용량이 커서 링크만 표시했다.

Borland Turbo Pascal Compiler
http://community.borland.com/museum/

GNU Pascal Compiler
http://www.gnu-pascal.de/

Free Pascal
http://www.freepascal.org/

Dev-Pascal
http://www.bloodshed.net/devpascal.html

포트란은 오래된 프로그래밍언어이지만 아직까지도 현업에 과학계산용으로 많이 쓰이고 있다.
물리학 계열에서 많이 쓰인다고는 하나,
범용 컴파일러는 아니므로 일반적인 IT기업에서는 전혀 사용되지 않는다.

현재 77를 넘어 90스펙까지 나왔지만, 77를 기준으로 공부하면 되겠다.
77에 비해 90은 소스코드 작성시 컬럼에 맞춰 코딩해야 하는 코딩규칙을 완화하는 등
유연성이 높아졌다.

현재 상용 포트란 컴파일러 아래 2개 제품이 유명하다.

Compaq Visual Fortran
Microsoft Visual Studio의 IDE에 통합되어 사용할 수 있으므로 사용이 무척 편리하다.
현재 컴팩이 HP와 통합된 관계로 6.6버전을 마지막으로 더 이상 출시되지 않는다.
해서, 인텔 포트란 컴파일러로 이전되는 추세이다.
구URL: http://www.compaq.com/fortran/

Intel Visual Fortran
사용해보지 않았음
http://www.intel.com/cd/software/products/asmo-na/eng/compilers/fwin/index.htm

무료 컴파일러는 gcc를 설치하면 사용할 수 있다.
별다른 것이 없다면 리눅스에서 g77, f77 명령어로 사용할 수 있다.

GNU Fortran G77 for Win32
http://www.geocities.com/Athens/Olympus/5564/
* 사용법은 파일내의 readme1.txt를 참조

설치법
1. 압축파일을 풀면 G77폴더가 생김
2. G77폴더에서 g77setup.bat를 수정하고 실행(C:\G77로 되어 있는 부분을 압축을 푼 디렉토리로 지정)
3. g77로 컴파일/실행

D:\temp>type a.f
C 1에서 10까지 합을 구함
     integer sum
     n = 10
     sum = 0
10    n = n + 1
     sum = sum + n
     if(n .lt. 10) goto 10
     write(6,60) sum
60    format(2X, '실행결과: ', I2)
     stop
     end
D:\temp>g77 a.f

D:\temp>a
  실행결과: 11

D:\temp>

invalid-file

RM/COBOL-85 Compiler - Version 5.01.06 for DOS 2.00+
윈도에서 마땅한 코볼 컴파일러도 없고, 도스용이라 컴파일이 느림


사용법
D:\>type gugudan.cbl
      IDENTIFICATION      DIVISION.
      PROGRAM-ID.         GUGUDAN.
     *----------------------------------------------------------------
      ENVIRONMENT         DIVISION.
      CONFIGURATION       SECTION.
      SOURCE-COMPUTER.    IBM-PC.
      OBJECT-COMPUTER.    IBM-PC.
      INPUT-OUTPUT        SECTION.
      FILE-CONTROL.
          SELECT PRINT-F ASSIGN TO OUTPUT "GUGU.PRN"
          ORGANIZATION IS LINE SEQUENTIAL.
     *----------------------------------------------------------------
      DATA                DIVISION.
      FILE                SECTION.
      FD  PRINT-F LABEL RECORD IS STANDARD.
      01  PRINT-R PIC X(80).
      WORKING-STORAGE     SECTION.
      77 I PIC 99.
      77 J PIC 99.
      77 K PIC 99.
      01 TITLE.
          02 FIL PIC X(3)  VALUE SPACE.
          02 FIL PIC X(20) VALUE ">>> 구 구 단 <<<".
      01 GUGUDAN.
          02 FIL PIC X(8) VALUE SPACE.
          02 GI  PIC 9.
          02 FIL PIC X(3) VALUE " * ".
          02 GJ  PIC 9.
          02 FIL PIC X(3) VALUE " = ".
          02 GK  PIC Z9.
     *----------------------------------------------------------------
      PROCEDURE           DIVISION.
      SIJAK.
          OPEN OUTPUT PRINT-F.
          MOVE SPACE TO PRINT-R.
          WRITE PRINT-R FROM TITLE.
          PERFORM GUGUDAN
              VARYING I FROM 2 BY 1 UNTIL I > 9
              AFTER   J FROM 1 BY 1 UNTIL J > 9.
          CLOSE PRINT-F.
          STOP RUN.
      GUGUDAN.
          COMPUTE K = I * J.
          MOVE I TO GI.
          MOVE J TO GJ.
          MOVE K TO GK.
          WRITE PRINT-R FROM GUGUDAN.

D:\>rmcobol gugudan.cbl
RM/COBOL-85 Compiler - Version 5.01.06 for DOS 2.00+.
Copyright (c) 1985, 1990 by Ryan McFarland Corp.  All rights reserved.
Registration number: GK-0390-00000-99
Total generated object size:        748 (X"000002EC") bytes
Errors: 0, Warnings: 0, Lines: 47 for program GUGUDAN.
Compilation complete -- Programs: 1, Errors: 0, Warnings: 0.

D:\>run gugudan.cob
RM/COBOL-85 Runtime - Version 5.01.06 for DOS 2.00+.
Configured for 001 user.
Copyright (c) 1985, 1990 by Ryan McFarland Corp.  All rights reserved.
Registration Number: GL-0315-00034-01
COBOL STOP RUN  at line 41 in GUGUDAN.COB (D:\GUGUDAN.COB).

D:\>type gugu.prn
  >>> 구 구 단 <<<
       2 * 1 =  2
       2 * 2 =  4
       2 * 3 =  6
       2 * 4 =  8
       2 * 5 = 10
       2 * 6 = 12
       2 * 7 = 14
       2 * 8 = 16
       2 * 9 = 18
       3 * 1 =  3
       3 * 2 =  6
       3 * 3 =  9
       3 * 4 = 12
       3 * 5 = 15
       3 * 6 = 18
       3 * 7 = 21
       3 * 8 = 24
       3 * 9 = 27
       4 * 1 =  4
       4 * 2 =  8
       4 * 3 = 12
       4 * 4 = 16
       4 * 5 = 20
       4 * 6 = 24
       4 * 7 = 28
       4 * 8 = 32
       4 * 9 = 36
       5 * 1 =  5
       5 * 2 = 10
       5 * 3 = 15
       5 * 4 = 20
       5 * 5 = 25
       5 * 6 = 30
       5 * 7 = 35
       5 * 8 = 40
       5 * 9 = 45
       6 * 1 =  6
       6 * 2 = 12
       6 * 3 = 18
       6 * 4 = 24
       6 * 5 = 30
       6 * 6 = 36
       6 * 7 = 42
       6 * 8 = 48
       6 * 9 = 54
       7 * 1 =  7
       7 * 2 = 14
       7 * 3 = 21
       7 * 4 = 28
       7 * 5 = 35
       7 * 6 = 42
       7 * 7 = 49
       7 * 8 = 56
       7 * 9 = 63
       8 * 1 =  8
       8 * 2 = 16
       8 * 3 = 24
       8 * 4 = 32
       8 * 5 = 40
       8 * 6 = 48
       8 * 7 = 56
       8 * 8 = 64
       8 * 9 = 72
       9 * 1 =  9
       9 * 2 = 18
       9 * 3 = 27
       9 * 4 = 36
       9 * 5 = 45
       9 * 6 = 54
       9 * 7 = 63
       9 * 8 = 72
       9 * 9 = 81

D:\>

invalid-file

GW-BASIC 3.26

간단한 사용법
SYSTEM 베이직 종료
윈도자체에는 QBASIC이 설치되어 있으므로, 특별한 경우가 아니면 이 놈을 이용하도록 하자.
명령 프롬프트에서 qbasic.exe를 실행하면 됨.

베이직 정보
http://www.geocities.com/KindlyRat/GWBASIC.html

베이직 튜토리얼
http://www.o-bizz.de/qbtuts/gw-train/

invalid-file