Jumat, 12 Oktober 2012 Writen 0 komentar » Posted in

Script Code Fungsi Logika IF(1)


Percobaan Pertama, Latihan Pertama dalam pembuatan program di Delphi dalam Bentuk Aplikasi Console/Text Mode, mari langsung saja di lihat langkah demi langkahnya ....
Script Logika IF untuk Nilai Ujian .....

Flowcart
1. Begin
2. Masukkan Nilai : A
3. Jika Nilai A > 60 maka dinyatakan "LULUS"
4. Jika Tidak maka dinyatakan "TIDAK LULUS"
5. End.

 SCRIPT :

program Project2;
uses
  SysUtils;
var
nilai : integer;
begin
 write('Masukkan Nilai = ');readln(nilai);
 if nilai > 60 then
  write('LULUS')
 else
  write('TIDAK LULUS');
 readln;
end.
 SCREENSHOOT

Jika Nilai Lebih Besar dari 60

Jika Nilai Lebih Kecil dari 60

0 komentar:

Posting Komentar

Langganan: Posting Komentar (Atom)