-
Perulangan
Jika dibandingkan dengan computer, manusia mempunyai kekurangan. Salah satu kekurangannya adalah manusia tidak mampu melaksanakan suatu perintah berulangkali tanpa mengenal lelah dan bosan. Sedangkan computer sebaliknya, computer mampu melaksanakan suatu perintah berulangkali tanpa mengenal lelah dan bosan. Di dalam algoritma pengulangan/ loop dapat dilakukan sejumlah kali, atau sampai kondisi berhenti pengulangan tercapai. * Struktur Pengulangan…
-
Program Mencari Rata-rata, Nilai Tertinggi dan Terendah
Contoh program untuk mencari nilai rata-rata, tertinggi dan terendah uses wincrt; var a, siswa : integer; nilai, total, tinggi, rendah, rata : real; begin total := 0; write (‘jumlah siswa : ‘); readln (siswa); writeln; for a := 1 to siswa do begin write (‘nilai siswa ke ‘,a,’ : ‘); readln (nilai); total := total…
-
Contoh Looping
Dibuat program memasukkan password, misal password = ‘kunci’. selama password tidak sama dengan (<>) ‘kunci’, program akan terus meminta password. uses wincrt; var username, password : string ; begin repeat write(‘username : ‘);readln(username); write(‘password : ‘);readln(password); writeln(”); until (username = ‘user’)and (password =’pass’); writeln(username, ‘ , selamat datang’); end.