티스토리 뷰

FORTRAN 4

1번부터 80번 캄럼까지 있는 코딩 용지에 작성
1~5번 칼럼까지는 문장 번호, 7~72번 칼럼은 문장을 적음.
내재적 형선언을 사용하여,
변수명의 첫글자가 I, J, K, L, M, N으로 시작하면 INTEGER형으로
그 외의 문자로 시작하면 REAL형으로 선언된다.

주석 = C-- 주석입니다
배열 선언 = DIMENSION LIST(99)
입력 = READ 60, LEN 
출력 = WRITE 80, IRESULT
if문 = IF((LEN .GT. 0) .AND. (LEN .LT. 100)) GO TO 101          GT = '>',  LT = '<'
for문 = DO 55 ICOUNT = 1, LEN, 1
종료 = END

FORTRAN 95

묵시적 선언 X = Implicit none
주석 = ! 주석입니다
배열 생성 = Integer::int_List(99)
입력 = Read *, List_Len
출력 = Print *, 'ABCD :', Result
if문 = (Int_List(Counter) > Average) Then  ~~~~~ End if
for문 = Do Counter = 1, List_Len ~~~~~ End Do
종료 = END

ALGOL

블록으로 구조화된 언어
begin-end를 블록이라고 함

프로그램 시작과 종료 = begin ~~~~~ end
주석 = comment 주석입니다
배열 생성 = integer array intlist[1:99];

입력 = readint(listlen);
출력 = printstring("test :");
if문 = ((listlen > 0) ^ (listlen < 100) then begin ~~~~ end             '^' = AND
for문 = counter = 1 step 1 until listlen do begin ~~~~ end

BASIC

탄생 초기에는 키워드 혹은 변수명을  만들 때, 3자까지만 허용
타임 쉐어링 기법 도입

배열 생성 = DIM intlist(99)
입력 = INPUT listlen
출력 = PRINT "HELLO:"; result
if문 = IF listlen > 0 AND listlen < 100 THEN ~~~~~ END IF
for문 = FOR counter = 1 TO listlen ~~~~~ NEXT counter
종료 = END

PASCAL

프로그램 선언 = program pasex (input, output);
type 선언 = intlisttype  array [1..99] of integer;
변수 선언 = var
                  intlist : intlisttype;
                  counter : intger;
프로그램 실행과 종료 = begin ~~~~~ end.
주석 = { 주석입니다 }
입력 = readln (listlen);
출력 = writeln('Hello:', result)
if문 = intlist[counter] > average) then begin ~~~~~ end
for문 = for counter = 1 to listlen do begin ~~~~~ end

C언어

main 선언 = void main()
주석 = /* 주석입니다 */
함수 선언과 종료 = { ~~~~~ }
배열 선언 = int intlist[99];
입력 = scanf("%d", &listlen);
출력 = printf('%d" listlen);
if문 = if(listlen >0) { ~~~~~ }
for문 = for(int i=0; i<5; i++) { ~~~~~ }

ADA

C++의 #include와, using과 비슷한 부분
with Ada.Text_IO, Ada.Integer.Text_IO;
use Ada.Text_IO, Ada.Integer.Text_IO;

프로시져 선언 = procedure Ada_Ex is
type 선언 = type int_List_Type is array (1..99) of integer;
프로시져 시작과 종료 = begin ~~~~~ end Ada_Ex;
주석 = -- 주석입니다.
입력 = Get (List_Len);
출력 = Put("Hello:");
if문 = if (Liest_Len > 0) then ~~~~~ end if;
for문 = for Counter := 1 .. List_Len loop ~~~~~ end loop;

COBOL

수식이 별로 없고 모두 영어 문장처럼 만들어짐
4가지 DIVISION으로 나누어 진다.
IDENTIFICATION DIVISION : 프로그램의 ID를 뜻함
ENVIORMENT DIVISION : 환경을 나타내는데 CONFIGURATION SECTION과 INPUT-OUTPUT SECTION으로 나누어짐
DATA DIVISION : 변수 선언
PROCEDURE DIVISION : 로직 구문

728x90
댓글
댓글쓰기 폼
공지사항