Bahasa pengaturcaraan PL/I

**PL/I**
Paradigma:	imperatif, pengaturcaraan berstruktur
Diterbitkan pada:	1964
Direka oleh:	Hursley Laboratories
Dibangunkan oleh:	IBM
Dialek:	PL/M, XPL, PL/P, PL/C, PL/S, PL/AS, PL/X, PL/8, EPL
Dipengaruhi oleh:	COBOL, Fortran, ALGOL,

PL/I ("Programming Language One", disebut /ˌpiːˌɛlˈwʌn/) merupakan bahasa pengaturcaraan komputer imperatif direka bagi applikasi saintifik, kejuruteraan, dan perniagaan. Ia merupakan salah satu satu dari bahasa pengaturcaraan yang kaya ciri dan yang pertama dalam kategori kaya dengan ciri-ciri. Ia telah digunakan oleh pelbagai pengguna akademik, perdagangan, dan industri semenjak ia diperkenalkan pada awal 1960-an, dan masih aktif sehingga kini.

Domain utama PL/I adalah pemprosesan data; ia menyokong rekrusif dan pengaturcaraan berstruktur. Sintek bahasa menyerupau bahasa Inggeris dan sesuai bagi menggambarkan format data rumit, dangan set fungsi yang luas tersedia bagi mengesah dan menggunakannya.

Senarai kandungan

[sunting] Sejarah PL/I

PL/I dibangunkan oleh IBM, di Makmal Hursley di United Kingdom, sebagai sebahagian dari System/360. Sebelum System/360, IBM membuat beberapa model tidak serasi komputer kerangka IBM bagi tujuan berlainan: sesetengah bertujuan bagi kegunaan perdagangan, yang lain bagi tujuan saintifik. Matlamat projek System/360 adalah membangunkan siri modelkomputer yang serasi bagi menggantikan semua model sebelumnya, dan boleh digunakan sama baik sama ada untuk tujuan perdagangan dan saintifik.

[sunting] Ciri-ciri dipertingkat

With full support for pointers to all data types (including pointers to structures), recursion, co-processing, extensive built-in functions and many other facilities, PL/I was indeed quite a leap forward compared to the programming languages of its time. In addition, the PL/I macro preprocessor was unusual, perhaps unique, in using its target language's syntax and semantics (e.g. as compared to the C preprocessor's "#" directives). However, these were not enough to convince a majority of programmers or shops to switch to PL/I.

[sunting] Contoh aturcara

[sunting] Aturcara Hello dunia

Hello2: proc options(main);
     put list ('Hello, dunia!');
end Hello2;

[sunting] Carian ayat

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;

[sunting] Piwaian

ANSI ANSI X3.53-1976 (R1998) Information Systems - Programming Language - PL/I.
ANSI ANSI X3.74-1987 (R1998) Information Systems - Programming Language - PL/I General-Purpose Subset.