Contoh Flowchart Pascal

Dari soal tersebut terdapat dua kondisi yang mungkin terjadi :

1. Nilai = atau > dari 75

2. Nilai < dari 75

Karena dari soal tersebut diatas ada dua kondisi, maka statemen if yang digunakan maka bagian Else akan mengikuti stateman if yang digunakan.

Procedure pascal

program mencari_kuadrat;

uses crt;

var a:integer;

begin

        clrscr;

        write ('Masukkan Nilai = ');

        readln(a);

        if a >= 75 then

                write('LULUS')

        else

                write('TIDAK LULUS');

        readln;

end.