Pendeklarasian Tipe dan Label Pada Pascal

Deklarasi Type

Pengenal (identifier) dari data yang digunakan harus diperkenalkan Tipenya. Jika ingin menggunakan tipe data dengan nama yang dibuat oleh pemakai, maka harus disebutkan tipe data standarnya.

Contoh tanpa tipe                      Contoh dengan tipe

Var Nama : String[25];              Type Nm : String[25];

      Kelas  : String[7];                  Kls  : String[7];

      Nilai    : Integer;                    Nil   : Integer;

     Grade  : Char;                       Gr   : Char;

                                                   Var Nama  : Nm;

                                                          Kelas   : Kls;

                                                          Nilai     : Nil;

                                                          Grade   : Gr;  

    

Deklarasi Label

Deklarasi label digunakan untuk melompati beberapa perintah program. Memiliki arah dan tujuan yaitu dengan menggunakan GOTO

Contoh Program dengan Label :

PROGRAM DGN_LABEL;

USES CRT;

LABEL A,B,C;

BEGIN

  CLRSCR;

  WRITELN(‘TEXT1’);  GOTO A;

  WRITELN(‘TEXT2’);

A:WRITELN(‘TEXT3’); GOTO B;

  WRITELN(‘TEXT4’);

B:WRITELN(‘TEXT5’); GOTO C;

  WRITELN(‘TEXT6’);

C:READLN;

END.

Hasilnya

TEXT1

TEXT3

TEXT5

Contoh Program dengan Tipe :       

USES CRT;

TYPE Pecahan = Real;

     Bulat   = Integer;

VAR  A,T : Bulat;

     LS3 : Pecahan;

BEGIN

  CLRSCR;

  WRITE(‘Masukkan Nilai Alas   : ‘);

  READLN(A);

  WRITE(‘Masukkan Nilai Tinggi : ‘);

  READLN(T);

  LS3:=(A*T)/2;

  WRITELN(‘Luas Segitiga:’,LS3:8:1);

  READLN;

END.

Posted in: Belajar Pascal,Deklarasi Tipe