Mengenal Turbo Pascal

Tips Menghilangkan Rasa Ngantuk Saat Hujan Turun, Dari Pada Siang2 Tidur Mendingan Mengasah Otak Biar Gak Jadi Orang Pelupa 😀

Mengenal Program Pascal
Pascal Merupakan Bahasa Pemograman tingkat Tinggi yang terstruktur dan sering digunakan sebagai sarana awal untuk pemograman komputer.

Di bawah Ini merupakan salah contoh source code Pascal versi 1.5
Penjelasan :

// contoh program sederhana dengan bahasa pascal//

Uses wincrt;
Var input:integer;
Begin
writeln(‘Nama : cyberdos’);
writeln(’email : cyb3rd0s@yahoo.com’);
writeln(‘==================’);
writeln(‘ ‘);
Write(‘Masukkan Umur anda = ‘);readln(input);
If input <2 then
Writeln(‘klasifikasi Anda = Bayi’)
else If input <12 then
Writeln(‘klasifikasi Anda = Anak-anak’)
else If input <18 then
Writeln(‘klasifikasi Anda = Remaja’)
else If input <24 then
Writeln(‘klasifikasi Anda = Dewasa muda’)
else If input <40 then
Writeln(‘klasifikasi Anda = Dewasa tua’)
else If input <55 then
Writeln(‘klasifikasi Anda = Orang Tua’)
Else
Writeln(‘klasifikasi Anda = Lansia’);
Repeat until keypressed
End.

Uses Wincrt <—– untuk memulai suatu program ( wajib ada pada pascal )
Var input:integer <—— Salah Satu Variabel ( Input ) dan tipe data yang digunakan ( Integer )
writeln <——– Menampilkan Kelayar dalam 1 baris
write <—— Menampilkan kelayar
if , then , else <—— merupakan syarat / statemen pada logika
end <—- Untuk mengakhiri sebuah program

Balikpapan 23 Oktober 2011

Tanpa nama
No porn , No Sara
Just Information and education only

Artikel Oleh: Muhammad Sholeh Albarathy

Iklan

Perihal Ronny Tri Asmara
University Student | Computer Technician | Programmer | Webmaster | Blogger | Pusamania | Metalheads

Tinggalkan Komentar

Isikan data di bawah atau klik salah satu ikon untuk log in:

Logo WordPress.com

You are commenting using your WordPress.com account. Logout / Ubah )

Gambar Twitter

You are commenting using your Twitter account. Logout / Ubah )

Foto Facebook

You are commenting using your Facebook account. Logout / Ubah )

Foto Google+

You are commenting using your Google+ account. Logout / Ubah )

Connecting to %s

%d blogger menyukai ini: