Adakalanya sebuah instruksidikerjakan jika kondisi tertentu dipenuhi. Pencarian data terkecil dilakukan dengan membandingkan data. Mula-mula data pertama dianggap data terkecil sementara (min). Bandingkan (min) denghan data ke-2, 3, …, N. Selama proses pembandingan, bila data ke-j lebih kecil dari min, maka data ke-j itu jadi min baru.
If-then
Struktur pemilihan if-then hanya memberikan satu pilihan aksi bila kondisi dipenuhi, dan tidak memberi pilihan aksi lain bila kondisi bernilai salah. Bentuk pemilihan yang lebih umum adalah memilih satu dari dua buah aksi bergantung pada nilai kondisinya:
if kondisi then
aksi 1
else
aksi 2
Else artinya kalau tidak. Bila kondisi benar aksi 1 dikerjakan, kalau tidak aksi 2 dikerjakan. Contoh:
If hari hujan then
pergilah dengan mobil
else
pergilah dengan motor
Contoh:
program Kelulusan;
uses wincrt;
var
a,b,c,d:real;
Ket:string[11];
begin
writeln ('Masukkan Nilai PDB=');readln(a);
writeln ('Masukkan Nilai Kalkulus=');readln(b);
writeln ('Masukkan Nilai Statistika Inferensial=');readln(c);
d:=(a+b+c)/3;
Writeln ('Rata-rata Nilai',(d):5:2);
Ket:='Lulus';
if d <50 then Ket:='Tidak Lulus';
writeln(Ket);
end.
0 komentar:
Posting Komentar