05 September 2009

Contoh Sederhana Program Pascal



Program KaryaPertamaku;
uses crt;
var
     nama: string;
Begin
     write('Nama Anda : '); readln(nama);
     clrscr;
     write('Hi ', nama, ' Apa Kabar?');
End.

Kita dapat mengetahui arti dari setiap kode dan bagian-bagian program tersebut, antar lain :

Uses crt digunakan untuk memanipulasi layar teks

Var atau juga disebut Variabel yaitu deklarasi suatu prgram. di var saya isi dengan nama : string. Karena berupa string, variabel nama bisa menampung input dari user berupa kata dan angka. Untuk lebih jelas tentang jenis tipe data lihat tabel di bawah. Jangan sampai salah mendeklarasikan jenis variabel

Begin, nah inilah awalnya isi program tanpa begin program tidak bisa dijalankan


write adalah listing code, sesuai namanya write yaitu menulis jadi jika program dijalankan maka code listing write akn dijalankan. Fungsinya mencetak kalimat atau isi variabel yang ada ke layar. Jadi yang tercetak adalah "Masukkan nama anda: ".

Selanjutnya ada perintah readln. Apa fungsinya? readln itu berfungsi untuk menampung (menyimpan hasil input user) dan disimpan pada variabel nama. Jadi sekarang variabel nama bernilai sama yang kamu ketikan.

clrscr merupakan fungsi unit dari uses crt yang berfungsi untuk membersihkan layar yang tadinya kita buat.

('Hi ', nama, ' Apa Kabar?'); maksudnya jika kita menjalankan program maka kan ada tampilan Nama Anda :. Jik kita memasukkan nama misalkan Nasirkemudian enter maka hasilnya akan ada jawaban dari listing code ('Hi ', nama, ' Apa Kabar?'); yaitu Hi NasirApa Kabar?

end. akhir program jangan lupa beri tanda . (titik) setelah end






Sebelumnya Mohon Maaf Atas Kekurangannya Karena Saya Masih Belajar

Muhammad Nasir

Informatics Engineering an der privaten Universität in der Stadt seiner Geburt, wie Technologie, Animation, Programmierung, Fotografie, Grafik-Design, und vieles mehr. ich liebe islam, Gestern war über Ehre, ist heute über Gerechtigkeit.

0 comments:

 

Copyright @ 2013 Muhammad Nasir.

Designed by Templateism | Modified By Muhammad Nasir