Senin, 09 Desember 2013

Manfaat Belajar Program Turbo Pascal














Apa itu Pascal ?

Pascal adalah bahasa pemrograman yang yang dirancang oleh Profesor  Niclaus Wirth dari Technical Univerciti Zurich, Swizerland. Nama pascal sendiriadalah sebagai suatu bentuk penghargaan kepada Blaise Pascal, yaitu seorang ahlimatematika dan Filsafat yang terkenal pada abad 17 yang berasal dari Prancis.
Profesor Niclaus Wirt memperkenalkan Compiler Bahasa pascal ini Pertamakali untuk komputer CDC 6000 (Control Data Comporation) yang dipublikasikan pada tahun 1971 dengan tujuan untuk membantu mengajarkan program komputer secara sistematis, khususnya untuk mengajarkan program yang terstruktur (stuktured programing).

Jadi pascal adalah bahasa yang ditujukan untuk membuat program yang terstruktur. Dalam waktu yang singkat pascal telah menjadi bahasa yang sangat populer dikalangan para pelajar universitas dan merupakan bahasa yang diajarkan di banyak perguruan tinggi. Banyak propesional komputer yang beralih ke bahasa pascal. Kenyataannya, pascal merupakan bahasa yang paling cepat populer dibandingkan bahasa-bahasa pemerograman tingkat tinggi lainnya. 

Manfaat dan kelebiahannya pada bahasa Program Pascal :

1.Tipe Data Standar, tipe-tipe data standar yang telah tersedia pada kebanyakan bahasa pemrograman. Pascal memiliki tipe data standar: boolean, integer, real,char, string,

2.User defined Data Types, programmer dapat membuat tipe data lain yangditurunkan dari tipe data standar.

3.Strongly-typed, programmer harus menentukan tipe data dari suatu variabel,dan variabel tersebut tidak dapat dipergunakan untuk menyimpan tipe dataselain dari format yang ditentukan.

4.Terstruktur, memiliki sintaks yang memungkinkan penulisan program dipecahmenjadi fungsi-fungsi kecil (procedure dan function) yang dapat dipergunakan berulang-ulang.

5.Sederhana dan Ekspresif, memiliki struktur yang sederhana dan sangatmendekati bahasa manusia (bahasa Inggris) sehingga mudah dipelajari dandipahami.

Standart pascal adalah bahasa pascal yang didefinisikan oleh K. Jensen dan Niclaus Wirth. penerapan dari standart pascal banyak yang berbeda seperti apayang telah didefinisikan oleh K. Jensen dan Niclaus Wirth. Pascal di Eropadidefinisikan oleh ISO (Internasional Standart Orgazation) dan di Amerika olehkerjasama antara ANSI (America Nasional Standart Institute) dan IEEE (Instituteof Electrical and Electronic Engineers).
Bahasa PASCAL juga merupakan bahasa yang digunakan sebagai standar  bahasa pemrograman bagi tim nasional Olimpiade Komputer Indonesia (TOKI).Selain itu, Bahasa PASCAL masih digunakan dalam IOI (International Olympiadin Informatics).Terdapat beberapa versi dari pascal yang telah berada di pasaran dan sampaisaat ini untuk komputer-komputer micro personal Turbo Pascal merupakan yang paling populer dan banyak digunakan. Turbo Pascal banyak di gemari karena bersifat interaktif. Selain itu Turbo Pascal mengikuti definisi dari standar pascalyang didefinisikan oleh K. Jansen dan Niclaus Wirht di Pascal User Manual



Penggunaan Procedure pada Program Pascal untuk Menghitung Nilai Vce pada Transistor

Berikut contoh penggunaan procedure pada pascal untuk menghitung nilai Vce pada transistor :


Skrip program :

uses wincrt;
procedure transistor;
var
r1,r2,rc,re,b,vcc : integer;
rb,vbb,ib,ic,ie,vce : real;
begin
clrscr;
write('masukan nilai R1  : ');readln(r1);
write('masukan nilai R2  : ');readln(r2);
write('masukan nilai Rc  : ');readln(rc);
write('masukan nilai Re  : ');readln(re);
write('masukan nilai B   : ');readln(b);
write('masukan nilai Vcc : ');readln(vcc);
rb := (r1*r2/(r1+r2));vbb := ((r2/(r1+r2))*vcc);
ib := ((vbb-0.7)/(rb+(b+1)*re));
ic := (b*ib);
ie := ((b+1)*ib);
vce := (vcc-(ic*rc)-(ie*re));

writeln('=====================================');

writeln(' nilai Rb adalah  : ' ,rb);
writeln(' nilai Vbb adalah : ' ,vbb);
writeln(' nilai Ib adalah  : ' ,ib);
writeln(' nilai Ic adalah  : ' ,ic);
writeln(' nilai Ie adalah  : ' ,ie);
writeln(' nilai Vce dalah  : ' ,vce);

end;
begin
transistor;
end.


Berikut outputnya setelah running :
Berikut dilampirkan juga flowchart

Pernyataan Percabangan IF pada Pascal


Uses wincrt;
Var
 Nil1, Nil2 : Integer;
 NilRata    : Real;


 Grade      : Char;
 Keterangan : String;
Begin
 ClrScr;
 Write('Masukan Nilai 1 : ');
 ReadLn(Nil1);
 Write('Masukan Nilai 2 : ');
 ReadLn(Nil2);

 NilRata := (Nil1 + Nil2)/2;
 WriteLn('Nilai Rata-Rata = ', NilRata:5:2);

 IF NilRata >= 90 THEN
 Begin
 Grade := 'A';
 Keterangan := 'Sempurna';
 End
 ELSE IF NilRata >= 80 THEN
 Begin
 Grade := 'B';
 Keterangan := 'Baik'
 End
 ELSE IF NilRata >= 70 THEN
 Begin
 Grade := 'C';
 Keterangan := 'Cukup'
 End
 ELSE
 Begin
 Grade := 'E';
 Keterangan := 'Gagal';
 End;

 WriteLn('Grade Nilai yang Didapat = ',Grade);
 WriteLn('Keterangan Nilai         = ',Keterangan);
 ReadLn;
End.


Membuat Tabel di HTML

Tabel digunakan untuk menyajikan data dalam betuk baris dan kolom. Adapun Elemen-Elemen yang digunakan untuk membuat Tabel adalah:
Atribut Tabel tag <TD>

Mengatur Border
Border adalah garis yang mengelilingi sebuah tabel.
Contoh:
<html>
<head><title>Sampul Ilmu</title></head>
<body>
<BODY><CENTER>
<P>Menggunakan tag <b>&lt;
TABLE BORDER="1"&gt;</b><P>
<TABLE BORDER="1">
<TR>
<TD>Baris #1 Kolom #1</TD>
<TD>Baris #1 Kolom #2</TD>
</TR>
<TR>
<TD>Baris #2 Kolom #1</TD>
<TD>Baris #2 Kolom #2</TD>
</TR>
</TABLE></body></html>

Menggabungkan  Kolom 
Contoh :
<html>
<head><title>Sampul Ilmu</title></head>
<BODY>
<TABLE BORDER="1" CELLPADDING="1" CELLSPACING="1">
<TR>
<TD COLSPAN=2>Kolom A & B</TD>
</TR>
<TR>
<TD>Kolom C</TD>
<TD>Kolom D</TD>
</TR>
</TABLE></BODY>
</html>


Menggabungkan Baris
Contoh
<html>
<head><title>Sampul Ilmu</title></head>
<BODY>
<TABLE BORDER="1" CELLPADDING="1" CELLSPACING="1">
<TR>
<TD ROWSPAN="2">Kolom A & C</TD>  <!-- Menggabung baris -->
<TD>Kolom B</TD>
</TR>
<TR>
<TD>Kolom D</TD>
</TR>
</TABLE>
</BODY>
</html>


Perataan Tabel
Posisi tabel dapat diatur pertaannya dengan menyertakan atribut ALIGN pada tag <TABLE>
Contoh:
<html><body>
<TABLE BORDER ALIGN="center">
<TR>
<TH>ALIGN="center"</TH>
<TD>Kolom #A Tengah</TD>
<TD>Kolom #B Tengah</TD>
</TR>
</TABLE><BR>
<TABLE BORDER ALIGN="right">
<TR>
<TH>ALIGN="right"</TH>
<TD>Kolom #A Kanan</TD>
<TD>Kolom #B Kanan</TD>
</TR>
</TABLE><BR>
<TABLE BORDER ALIGN="left">
<TR>
<TH>ALIGN="Left"</TH>
<TD>Kolom #A Kiri</TD>
<TD>Kolom #B Kiri</TD>
</TR>
</TABLE>
</body></html>


Mengatur Isi Sel
Teks dalam sel dapat diatur (align) dengan: Rata kiri, rata tengah, dan rata kanan 
Atribut yang digunakan adalah :
Align={“left” | “center” | “right”} pada tag <TD>
Atau 
Align={“left” | “center” | “right” | “justify”} pada tag <P> dalam tag <TD> 
Contoh:
<html>
<BODY>
<TABLE BORDER="1" CELLSPACING="1" WIDTH="100%">
<TR bgcolor="silver">
<td>Text Rata Kiri</td>
<td>Text Rata Tengah</td>
<td>Text Rata Kanan</td>
<td>Text Rata Kiri-Kanan</td>
</TR>
</TR>
<TR>
<TD ALIGN="left" bgcolor="yellow">Kata-kata dalam sel ini rata KIRI</TD>
<TD ALIGN="center">Kata-kata dalam sel ini rata TENGAH</TD>
<TD ALIGN="right" bgcolor="green"><font color="yellow">Kata-kata dalam sel ini rata KANAN</TD>
<TD><p Align="Justify">Kata-kata dalam sel ini rata KIRI-KANAN</TD>
</TR>
</TABLE>
</BODY>
</html>

Kamis, 05 Desember 2013

Latihan Soal Pascal !!!
1. Struktur pertama dalam pascal adalah .....

a. Char;
b. String
c. End.
d. Writeln
e. Uses crt;

Jawaban : e. Uses crt;
Alasan : uses digunakan untuk memanggil library dalam pascal, sehingga harus ditulis paling atas.
2. Untuk melihat hasil dari program yang dikerjakan tekan tombol .....

a. Crtl+f5
b. Ctrl+f9
c. Ctrl+f2
d. Ctrl+f12
e. Ctrl+f4
Jawaban : b. Ctrl+f9
Alasan : Ctrl+f9 merupakan shortkey untuk run program pascal.
3. Berapa kode yang digunakan untuk membuat tulisan berwarna “CYAN” .....

a. 4
b. 2
c. 128
d. 7
e. 3
Jawaban : e. 3
Alasan : karena kalau yang 7 bukan warna cyan
4. Perintah dasar sederhana dalam program pascal adalah .....

a. Readln
b. End
c. Write
d. Writeln
e. Uses crt;
Jawaban : d. Writeln

Alasan : untuk mencetak & parameter teks yang akan dicetak

5. Tipe data bahasa pascal untuk TRUE FALSE adalah
.....

a. String
b. Char
c. Boolean
d. Byte
e. Real
Jawaban : c. Boolean
Alasan : Boolean adalah suatu tipe data yang hanya mempunyai dua nilai. Yaitu true atau false (benar atau salah).
6. Siapakah penemu program pascal .....

a. Greyson change
b. Prof. Niklaus Wirth
c. Kondrazuse
d. Prof. Niklaus Smirth
e. Dr. Hercules
Jawaban : b. Prof. Niklaus Wirth
Alasan : Pascal adalah bahasa pemrograman yang pertama kali di buat oleh Profesor Niklaus Wirth, seorang anggota International Federation of Information Processing (IFIP) pada tahun 1971.
7. Struktur bahasa pemrograman pascal paling pertama adalah .....

a. Var;
b. Begin
c. End;
d. Uses crt;
e. Writeln;
Jawaban : d. Uses crt;
Alasan : uses digunakan untuk memanggil library dalam pascal, sehingga harus ditulis paling atas.

8. Tipe data pascal untuk karakter adalah
.....

a. Char
b. Boolean
c. Integer
d. Real
e. Byte
Jawaban : a. Char
Alasan : char merupakan tipe data yang dapat menyimpan karakter, tetapi tipe data ini hanya dapat menyimpan 1 karakter saja.

9. Kapan terbentuknya pascal
.....

a. 1981
b. 1971
c. 1961
d. 1991
e. 1987
Jawaban : b. 1971
Alasan : Pascal adalah bahasa pemrograman yang pertama kali di buat oleh Profesor Niklaus Wirth, seorang anggota International Federation of Information Processing (IFIP) pada tahun 1971.

10. Apakah kepanjangan dari USES
.....

a. Unit secure
b. Unit syntax
c. Unit system
d. Up software
e. Unit semiconductor
Jawaban : c. Unit System
Alasan : Uses adalah sintak program yang digunakan untuk memanggil library atau unit. Kepanjangannya adalah Unit System.
11. Berikut ini adalah penulisan identifier yang benar dalam pemrogramnan pascal adalah .....

a. 9program_satu
b. Program_satu
c. Program satu
d. Begin
e. Array
Jawaban : b. Program_satu
Alasan : Penulisan identifier tidak boleh didahului oleh angkan, dan tidak boleh dipisahkan dengan spasi.
12. Tipe bilangan bulat dalam bahasa pascal dikenal dengan .....

a. Byte
b. Integer
c. Char
d. String
e. Boolean
Jawaban : b. Integer
Alasan : Integer adalah tipe data apapun yang merepresentasikan bilangan bulat, atau beberapa bagian dari bilangan bulat.
13. Istilah “perulangan” dalam pemrograman pascal dikenal sebagai .....

a. Repeating
b. Again
c. Function
d. Replay
e. Looping
Jawaban : e. Looping
Alasan : Looping adalah sebuah perulangan yang digunakan untuk megulang sebuah kode program tertentu.
14. Perintah untuk menutup program pada Pascal adalah .....
a. END.
b. Program
c. Uses crt;
d. Finish
e. END;
Jawaban : a. END.
Alasan : end. merupakan instruksi dalam Pascal untuk mengakhiri sebuah program.
15. Menggambarkan program secara logika merupakan fungsi dari .....
a. flowchart
b. DxDiag
c. Begin
d. SI
e. Sistem Operasi
Jawaban : a. flowchart
Alasan : Flowchart atau diagram alir merupakan sebuah diagram dengan simbol-simbol grafis yang menyatakan aliran algoritma atau proses yang menampilkan langkah-langkah yang disimbolkan dalam bentuk kotak, beserta urutannya dengan menghubungkan masing masing langkah tersebut menggunakan tanda panah.
16. Deklarasi yang digunakan untuk mengidentifikasi data yang nilainya sudah ditentukan dan pasti, tidak dirubah dalam program disebut deklarasi .....
a. Deklarasi label
b. Deklarasi Konstanta
c. Deklarasi tipe
d. Deklarasi Variabel
e. Deklarasi Prosedur
Jawaban : b. Deklarasi Konstanta
Alasan : Konstanta digunakan untuk mendeklarasikan suatu identifier yang nilainya tetap.
17. Dibawah ini termasuk dalam Deklarasi dalam Pascal kecuali .....
a. Deklarasi perubah
b. Deklarasi proses
c. Deklarasi konstanta
d. Deklarasi tipe
e. Deklarasi prosedure
Jawaban : b. Deklarasi proses
18. Bilangan yang mengandung pecahan, paling sedikit harus ada satu digit sebelum dan sesudah titik desimal termasuk dalam tipe data .....
a. Real
b. Boolean
c. Integer
d. Longint
e. Byte
Jawaban : a. Real
Alasan : Real adalah bilangan yang berisi titik desimal. Dalam Pascal paling sedikit harus ada satu digit sebelum dan sesudah titik desimal, tidak boleh ada koma dan nilainya bisa positif atau negatif.
19. Prosedur yang digunakan untuk membersihkan layar saat program dijalankan adalah .....
a. Writeln
b. Readln
c. Begin
d. Write
e. Clrscr
Jawaban : e. Clrscr
Alasan : Clrscr adalah prosedur untuk membersihkan layar. Kepanjangannya adalah clear screen.
20. Bentuk dari suatu statement IF berada didalam lingkungan statement IF yang lainnya, disebut IF dalam kondisi .....
a. IF bersarang
b. IF bercabang
c. IF tunggal
d. IF-THEN
e. IF do while-until
Jawaban : a. IF bersarang
Alasan : IF bersarang merupakan statement IF yang didalamnya terdapat lagi statement IF yang lainnya.
21. Tipe data terstruktur yang terdiri dari sejumlah komponen-komponen yang mempunyai tipe sama, disebut tipe data .....
a. Array
b. Byte
c. Longint
d. Integer
e. Boolean
Jawaban : a. Array
Alasan : Array adalah sebuah struktur datayang terdiri atas banyak variabel dengan tipe data sama, dimana masing-masing elemen variabel mempunyai nilai indeks.
22. Perintah untuk menampilkan atau cetak dilayar monitor tanpa pindah baris, disebut .....
a. Writeln
b. Write
c. Readln
d. Read
e. Begin
Jawaban : b. Write
Alasan : Perintah write digunakan untuk menuliskan output, dengan posisi cursor – penunjuk aktif, terletak pada akhir output yang ditampilkan pada baris yang sama.
23. Perintah untuk menampilkan atau cetak dilayar monitor lalu pindah baris kebawah, disebut .....
a. Writeln
b. Write
c. Readln
d. Read
e. Begin
Jawaban : a. Writeln
Alasan : Perintah writeln digunakan untuk menuliskan output, dengan posisi cursor – penunjuk aktif, terletak pada awal baris berikutnya.
24. Suatu identifier non-standar yang nilainya tidak tetap atau nilainya merupakan hasil dari suatu proses, disebut .....
a. Variabel
b. Tipe Data
c. Prosedur
d. Deklarasi
e. Array
Jawaban : a. Varibel
Alasan : Variabel adalah nama yang mewakili suatu elemen data dan nilainya tidak tetap.
25. Suatu program terpisah dalam blok sendiri yang berfungsi sebagai subprogram (bagian program), disebut .....
a. Variabel
b. Tipe Data
c. Prosedur
d. Deklarasi
e. Array
Jawaban : c. Prosedur
Alasan : Prosedur adalah suatu program terpisah dalam blok tersendiri yang berfungsi sebagai sub program (program bagian) dan diawali dengan kata cadangan Procedure.
created : Agus Setiawan