Test Kondisi dalam Pascal

Test Kondisi ( Pemilihan & Penyelesaian )

- IF – THEN = Suatu program yang digunakan di dalam pascal untuk alternative pilihan satu 

atau dua.

One case

If kondisi then

Statement;

Two Case

If kondisi then

Statement  1( yang pertama)

Else

Statement 2(yang kedua)

Contoh

Buatlah program untuk menampilkan jenis kelamin seseorang berdasarkan kode Jenis :

0 = Laki-laki

1 = Perempuan

Jawab :

Uses crt;

Var

                Kode : Char

Begin

Clrscr;

Write(‘Ketik Kode Jenis’);

Readln(kode);

If kode = ‘0’ then

Writeln (‘Laki-laki’)

Else

If kode = ‘1’ then

Writeln(‘Perempuan’)

Else

Writeln(‘Salah Kode’);

Readln;

End.

- CASE – OF = Suatu program yang digunakan di dalam pascal untuk alternative pilihan lebih dari dua. Hanya bisa untuk type data text (Char), Numeric (Bilangan Bulat), & Logika.

Bentuk Umum

Case variabel of

Nilai 1 (yang pertama) : Statement 1;

NIlai 2 (yang Kedua) : Statement 2;

Nilai N : statement n;

End;