Fungsi Logika IF Dalam Bahasa Pemrograman

Perintah percabangan IF adalah suatu perintah yang berfungsi untuk mengambil keputusan dari beberapa kondisi. Bentuk percabangan ini biasanya digunakan untuk kondisi yang jumlahnya tidak terlalu banyak.

Agar lebih faham ayo kita langsung ke scripnya saja okkk

1. Fungsi IF untuk seleksi penerimaan pegawai baru yang di lihat dari tinggi badan-nya

Berikut contoh script-nya:

{$APPTYPE CONSOLE}

uses
  SysUtils;
var
tinggi:integer;
begin
  writeln ('Progaram Seleksi Tingggi Badan');
  writeln (' ');
  writeln ('Nama : MUNAWIR');
  writeln ('NIM : 114224030');
  writeln ('********************************');
  write ('Masukkan Tinggi Badan=');readln(tinggi);
  if tinggi>168 then
  writeln ('Selamat Anda Diterima')
  else
  writeln ('Maaf Anda Gagal');
  readln;
end.

Berikut hasilnya kita coba untuk tinggi badan di bawa 168

Berikut hasil apabila kita input tinggi badannya di atas 168

2. Penggunaan Logika IF Untuk Pendidikan
Contoh penggunaan fungsi ini yaitu untuk melihat nilai mahasiswa,
Penggunaaan Fungsi Logika IF ini ada 2 cara yaitu:
a). menggunakan IF saja (tanpa else)

 {$APPTYPE CONSOLE}

uses
  SysUtils;
var
nilai:integer;
grade:string;
begin
  writeln ('Progaram Menghitung Luas Persegi');
  writeln (' ');
  writeln ('Nama : MUNAWIR');
  writeln ('NIM : 114224030');
  writeln ('********************************');
  write ('masukkan Nilai IP = ');readln(nilai);
  if nilai>=90 then grade:='A';
  if (nilai>=80) and (nilai<=89) then grade:='B';
  if (nilai>=70) and (nilai<=79) then grade:='C';
  if nilai<70 then grade:='D';
  writeln ('grade=',grade);
  readln;
end.

b). menggunakan IF dan Else

{$APPTYPE CONSOLE}

uses
  SysUtils;
var
nilai:integer;
grade:string;
begin
  writeln ('Program Menghitung Nilai IP');
  writeln (' ');
  writeln ('Nama : MUNAWIR');
  writeln ('NIM : 114224030');
  writeln ('********************************');
  write ('Masukkan Nilai IP=');readln(nilai);
  if nilai>=90 then grade:='A' else
  if nilai>=80 then grade:='B' else
  if nilai>=70 then grade:='C' else
  if nilai<70 then grade:='D';
  writeln ('grade=',grade);
  readln;
end.

 Mungkin sampai disini untuk materi Penggunaan Fungsi Logika IF. Semoga Bermanfaat  amiiinnnn
Baca juga Materi Looping
Terima thank you *-*      :D