Ujian Tengah Semester

var a, angka: integer; begin a := 5; if (a = angka) then begin writeln('Hello, World'); end; end. Kalimat Hello, World akan tercetak di layar monitor

var a, angka: integer; begin a := 5; if (a = angka) then begin writeln('Hello, World'); end; end. Variabel angka berisi nilai 0 (nol)

var a, angka: integer; begin a := 5; if (a = angka) then begin writeln('Hello, World'); end; end. Kondisi a = angka menghasilkan nilai FALSE

var a, b: integer; begin a := 5; b := 8; if (a < 5) xor (a < b) and (b > 5) then begin writeln('Halo FTIP'); end; end. Hasilnya: Halo FTIP

Operator XOR --> TRUE XOR TRUE menghasilkan TRUE