IF.. THEN.. ELSE..

IF.. THEN.. ELSE..

     If.. then.. else.. biasa digunakan untuk mencetak hasil yang sudah di tentukan, contohnya
   seperti ''Seleksi Security '' dan ''Penentuan tinggi badan'' di tempat bekerja .
   Langsung aja bisa dilihat contohnya seperti gambar di bawah ini :

 1. Ini adalah Progam menseleksi Security saat memenuhi persyaratan .. maka akan diterima.
 

Dan jika tidak maka seperti ini :

2.  Yang kedua yaitu seperti halnya " Study Kasus " yaitu memasukkan data Nilai dan mengeluarkan        data Grade.

     Contohnnya seperti gambar dibawah ini :

    Jika Nilai siswa memenuhi angka target yang ditentukan maka siswa tersebut mendapat grade             tinggi.

  Dan sebalikkanya jika siswa tidak memenuhi angka yang sudah di targetkan maka siswa tersebutt       mendapat grade terendah. Seperti gambar berikut :

Jika anda ingin mencobanya mencoba script coding dibawah ini :

1. Script untuk yang no.1

program if_else_progamseleksiskuriti;

{$APPTYPE CONSOLE}

uses

  SysUtils;

var

    t:integer;

begin

  writeln('Nama : Maisirotul Rizka');

  writeln('Nim  : 114224022');

  writeln('--------------------------');

  writeln('-------------------------');

  writeln('                          ');

  writeln('   PROGRAM SELEKSI SECURITY   ');

  writeln(' ============================');

  writeln('                              ');

write(' Masukkan Tinggi Badan Anda = '); readln(t);

writeln;

If t > 169 then

begin

  writeln(' Tinggi Anda',t,'cm');

  writeln;

  writeln('   Anda Layak Bekerja di Kantor Kami...!!!');

  writeln;

  writeln('         " SELAMAT ANDA DITERIMA...!! "');

end

else

begin

  writeln(' Tinggi Anda',t,'cm');

  writeln;

  writeln('    Maaf Tinggi Badan Anda Kurang Mencukupi Persyaratan Kami...!!!');

  writeln;

  writeln('                 MOHON MAAF ANDA TIDAK DITERIMA...!!!');

end;

  readln;

end.

  2.  Dan ini Script untuk yang no.2

program if_else_input_nilai_siswa;

{$APPTYPE CONSOLE}

uses

  SysUtils;

Var

    n:integer;

    g:string;

begin

  writeln('Nama : Maisirotul Rizka');

  writeln('Nim  : 114224022');

  writeln('--------------------------');

  writeln('-------------------------');

  writeln('                         ');

  writeln('          PROGRAM INPUT NILAI SISWA');

  writeln('          =========================');

  writeln('                         ');

  write('Masukkan Nilai Anda = '); readln(n);

    if n >= 90 then g:= 'A' ELSE

    if n >= 80 then g:= 'B' ELSE

    if n >= 90 then g:= 'C' ELSE g:= 'D' ;

    writeln;

    writeln('           GRADE = ' ,g);

    readln;

end.

Seelamat mencoba.. ^^