기본 콘텐츠로 건너뛰기

2월, 2008의 게시물 표시

프로그래밍 언어 - PL/I

PL/I (숫자 1이 아니라 영문자 I를 쓰고, 읽는건 One으로 읽는다.)는 1965년 IBM에 의해 탄생하였고, 구조적 프로그래밍 방법을 사용한다. 당시 과학 기술 계산용 언어인 FORTRAN과 사무처리용으로 만들어진 코볼 언어의 기능을 모두 수용하여, 하나의 언어로 모든 종류의 프로그램을 만들기 위해 탄생되었다고 한다. 아래 2개의 샘플 프로그램 소스를 올려본다. Hello world program Hello2: proc options(main);     put list ('Hello, world!'); end Hello2; Search for a string FINDSTRINGS: PROCEDURE OPTIONS(MAIN)   /* READ A STRING, THEN PRINT EVERY */   /* SUBSEQUENT LINE WITH A MATCH */   DECLARE PAT VARYING CHARACTER(100),          LINEBUF VARYING CHARACTER(100),          (LINENO, NDFILE, IX) FIXED BINARY;   NDFILE = 0; ON ENDFILE(SYSIN) NDFILE=1;   GET EDIT(PAT) (A);   LINENO = 1;   DO WHILE (NDFILE=0);   GET EDIT(LINEBUF) (A);   IF LENGTH(LINEBUF) > 0 THEN DO;      IX = INDEX(LINEBUF, PAT);      IF IX > 0 THEN DO;        PUT SKIP EDIT (LINENO,LINEBUF)(F(2),A)      END;   END;   LINENO = LINENO + 1;   END; END FINDSTRINGS; PL/I ("Programming Language One") is an imperative