Script Code Fungsi Logika IF(2)
Setelah pembuatan Latihan Untuk yang Pertama, sekarang kita lanjut untuk latihan saya yang keduaa. Tidak jauh berbeda dengan Latihan Pertama, Script kali ini hampir sama cuma ada penambahan sedikit .... yuk mari kita lihat sama-sama.
Flowcart
1. Begin
2. Masukkan Nilai = A
3. Jika Nilai > 70 maka dinyatakan LULUS dan DITERIMA
4. Jika tidak maka dinyatakan TIDAK LULUS
5. Cetak Penyataan
6. End.
SCRIPT
program Project1;
{$APPTYPE CONSOLE}
uses
SysUtils;
var
nilai : integer;
ket1, ket2 : string;
begin
write('Masukkan Nilai: ');readln(nilai);
If nilai > 70 then
begin
ket1:='LULUS';
ket2:='ANDA DITERIMA'
end else
begin
ket1:='TIDAK LULUS';
ket2:='SILAKAN COBA LAGI';
end;
write('Hasil = ');writeln(ket1);
write('Keterangan = ');write(ket2);
readln;
end.
SCREENSHOOT
 | |
| Jika Nilai diatas 70 |
 |
| Jika Nhlai dibawah 70 |
