Rabu, 20 Mei 2015

Membuat Program Sederhana Bilangan Terbesar Dan Password Pada Pascal

Membuat Program Bilangan Terbesar Di Pascal

Pertama masuk dulu ke software pascal untuk membuat program Bilangan Terbesar  ketik uses crt; itu gunanya  jika ingin menggunakan perintah ‘clrscr’ (perintah untuk membersihkan layar) dan ‘readkey’ (perintah untuk membaca masukan user). Setelah itu ketik Var a,b,c : Integer; itu adalah nama variabel akan di buat yaitu a, b dan c. Setelah itu ketik begin untuk mengawali program pascal. Kemudian ketik clrscr; yaitu untuk menghilangkan atau membersihkan layar di program pascal. Kemudian ketik write (‘ Input Nilai : ‘); readln (a); dan ketik lagi seperti itu untuk variabel yang “b” dan “c” nya itu. Write adalah instruksi untuk mencetak & parameter teks yang akan dicetak sedangkan readln adalah gunanya untuk mencetak lalu menambahkan Enter/baris baru (write and add new line, writeln berasal dari write + ln, ln merupakan singkatan dari line). Setelah sudah ketik lagi if (a>b) and (a>b) then write (‘Nilai Terbesar Adalah ‘,a) else if (b>c) then write (‘Nilai Terbesar Adalah ‘,b) else write (‘Nilai Terbesar Adalah ‘,c); ini menggunakan perintah sistem perulangan if then else if itu adalah sistem perulangannya yang di mana kita akan mencari nilai terbesar dari semua inputannya. Statement IF THEN atau ungkapan. Ungkapan adalah kondisi yang akan diseleksi oleh oleh statemen if. Jika kondisi yang diseleksi terpenuhi, maka statemen yang mengikuti then akan diproses sedangkan bila kondisi tidak terpenuhi, maka yang akan diproses adalah statemen berikutnya. Setelah sudah ketik readln; dan ketik end jangan lupa dikasih TitIk (.). dan jadiah suatu program Bilangan Terbesar
Biar lebih jelasnya lagi lihat gambar input dan outputnya di bawah ini :




Membuat Program Sederhana Dengan Memasukan Username dan password Di Pascal

Pertama masuk dulu ke software pascal lalu ketik uses crt; itu gunanya  jika ingin menggunakan perintah ‘clrscr’ (perintah untuk membersihkan layar) dan ‘readkey’ (perintah untuk membaca masukan user). Lalu ketik Var a: string; b : string; itu adalah nama variabel yang akan dibuat. Kemudian ketik clrscr; gunanya untuk membersihkan atau menghapus program yang sudah ada. Setelah sudah ketik write (‘Username : ‘); readln (a); dan write (‘Password : ‘) readln (b); Write adalah instruksi untuk mencetak & parameter teks yang akan dicetak sedangkan readln adalah gunanya untuk mencetak lalu menambahkan Enter/baris baru (write and add new line, writeln berasal dari write + ln, ln merupakan singkatan dari line).  setelah sudah ketik if (a=’Dingga’) itu untuk memberikan statement IF THEN and (b=’labsi’) then write (‘Anda Berhasil Login’) else write setelah sudah ketik readln; dan end.
Biar lebih jelasnya lagi lihat gambar input dan outputnya di bawah ini :











































Tidak ada komentar:

Posting Komentar