Salam Pascal Mania !
Kali ini admin mau nge-share membuat program looping sebuah output login dimana program ini mempunyai dua variabel yaitu username dan password.Fungsi looping disini yaitu apabila kita memasukan username dan passwordnya salah maka program akan terus berjalan sampai username dan passwordnya benar maka program tersebut berhenti.
Pada listing program di bawah ini admin contohkan, fungsi looping pakai Repeat..until sebuah program yang diset username dan passwordnya adalah 'saya' selain itu program akan terus menanyakan inputan yang sesuai tak terbatas.
Mau belajar lengkap pemrogramaan klik DISINI banyak PDF Lengkap seputar pemrogramman
Ini dia sintaxnya, untuk sahabat pascal mania :
uses crt;
var username : string;
password : string;
begin
clrscr;
repeat
write('Masukan Username = ');
readln(username);
write('Masukan Password = ');
readln(password);
until (username='saya') and (password='saya');
end.
var username : string;
password : string;
begin
clrscr;
repeat
write('Masukan Username = ');
readln(username);
write('Masukan Password = ');
readln(password);
until (username='saya') and (password='saya');
end.
Penjelasan sintax diatas, mempunyai makna tiap barisnya sebagai berikut :
- Fungsi pengguna
- Fungsi variabel
- Deklarasi variabel username dengan tipe data string
- Deklarasi variabel password dengan tipe data string
- Memulai menulis program utama
- Memanggil fungsi pembersih layar saat program di compile secara otomatis
- Ulangilah berikut (secara terus menerus)
- Inputan username
- Dimasukan di variabel username
- Inputan password
- Dimasukan di variabel password
- Pengulangan berhenti sampai username berisi saya dan password juga saya
- Dibaca
- Selesai
Apabila script tersebut telah diketik maka ketika di compile hasilnya seperti ini :
Demikian penjelasan beserta program sintax nya, semoga bermanfaat. Terima-kasih telah mengunjungi artikel ini
Salam Pascal Mania !
Mau belajar lengkap pemrogramaan klik DISINI banyak PDF Lengkap seputar pemrogramman
