Contoh Program Looping

Program Belah ketupat ^-^

program belah_ketupat;
uses wincrt;
var
 x,y,z:integer;
begin
readln (y);
for x:=1 to y do
begin for z:=y downto x do
write (' ');
for z:=1 to x*2-1 do
write ('*');
writeln ;
end;
for x:=y downto 1 do
begin
for z:=y downto x do
write (' ');
for z:=1 to 2*x-1 do
write ('*');
writeln;
end;
end.

LOOPING

Dalam program pascal looping merupakan pernyataan perulangan. Pernyataan perulangan adalah pernyataan yang akan menjalankan pernyataan yang

mengikutinya secara berulang sampai syarat tertertentu terpenuhi. Ada 3 buah pernyataan perulangan, yaitu FOR, WHILE dan REPEAT.

A. Statement FOR

Statement FOR adalah suatu perintah yang berfungsi untuk melakukan proses

pengulangan, dimana jumlah pengulangannya sudah diketahui. Bentuk dari statement

FOR adalah:

FOR {Variabel} := {Nilai Awal} TO {Nilai Akhir} DO

BEGIN

{Statement 1}

{Statement 2}

....

{Statement n}

END;

B. Statement WHILE

Statement WHILE adalah suatu perintah yang berfungsi untuk melakukan proses

pengulangan, dimana pengulangan akan terus dilakukan jika kondisi tertentu dipenuhi.

Jika banyaknya pengulangan diketahui tapi kenaikan atau penurunan pengulangan

tidak sebesar satu, statement IF tidak cocok untuk digunakan. Sebagai alternatif dapat

digunakan statement WHILE atau REPEAT. Sedangkan jika banyaknya pengulangan tidak diketahui maka statement IF tidak dapat digunakan, sehingga harus digunakan

statement WHILE atau REPEAT. Bentuk dari statement WHILE adalah:

WHILE {Kondisi} DO

BEGIN

{Statement 1}

{Statement 2}

....

{Statement n}

END;

C. Statement REPEAT

Statement REPEAT adalah suatu perintah yang berfungsi untuk melakukan proses

pengulangan, dimana pengulangan akan berhenti jika kondisi yang tertulis di akhir

pengulangan dipenuhi. Sintak dari statement REPEAT adalah:

REPEAT

{Statement 1}

{Statement 2}

....

{Statement n}

UNTIL {Kondisi};

Input Dan Output

Dalam bahasa Pascal pernyataan input adalah pernyataan yang digunakan untuk

memasukkan data. Pernyataan input yang ada di Pascal adalah READ dan READLN.

Sedangkan pernyataan output adalah pernyataan yang digunakan untuk menampilkan hasil. Pernyataan input:

A.   Pernyataan READ dan READLN

Bentuk pernyataan READ READLN:

READ (<variabel-1, variabel-2,.., variabel-n>) ;

Atau

READLN (<variabel-1, variabel-2,.., variabel-n>) ;

Tiap-tiap data yang dimasukkan harus sesuai dengan tipe variabelnya. Setelah data

dimasukkan, tombol ENTER ditekan. Perbedaan antara READ dan READLN adalah pada sifat menangani kelebihan data yang diinputkan:

1.  READ : Jika ada kelebihan data, pernyataan ini tidak akan membuangnya. Kelebihan

data tersebut akan diberikan pada pernyataan READ atau READLN berikutnya.

2.  READLN : Jika ada kelebihan data, pernyataan ini akan membuangnya. Kelebihan data tersebut tidak akan diberikan pada pernyataan READ atau READLN

berikutnya.

Ada dua pernyataan output yaitu WRITE dan WRITELN.

B. Pernyataan WRITE dan WRITELN

Bentuk pernyataan WRITE dan WRITELN:

WRITE (<argumen >);

Atau

WRITELN (<argumen>);

Jika pernyataan WRITELN yang digunakan, setelah menampilkan hasil maka kursor ganti

baris. Sedangkan jika pernyataan WRITE yang digunakan, setelah menampilkan hasil

maka kursor tidak ganti baris. Dalam format penulisan WRITE dan WRITELN jika yang

akan ditampilkan adalah suatu kata/kalimat yang tidak disinpan dalam suatu variabel, maka

kata/kalimat tersebut harus ditulis diantara tanda petik tunggal (’).

Karakteristik write dan writeln yang lain adalah:

1. WRITE atau WRITELN dapat menerima argumen berupa variabel

Bentuk Pernyataan : WRITE (<variable>); WRITELN (<variabel>);  

2. WRITE atau WRITELN dapat menerima argumen bertipe data dasar (seperti boolean,real atau integer) bahkan char atau string.

3.  WRITE atau WRITELN dapat menerima argumen lebih dari satu. Jika argumen lebih dari satu maka harus dipisahkan oleh tanda koma (,). WRITE atau WRITELN dapat menerima argumen berupa ekspresi.

4.  WRITELN bisa juga tanpa argumen. Biasanya digunakan untuk membuat baris

kosong;

Pernyataan....

PERNYATAAN BERSYARAT dalam Pascal

Didalam pascal akan sering digunakan beberapa pernyataan bersyarat. Pernyataan bersyarat adalah pernyataan yang akan menjalankan pernyataan yang

mengikutinya sesuai dengan syarat tertertentu. Ada 2 buah pernyataan bersyarat, yaitu IF dan CASE.

A. Pernyataan IF

Bentuk pernyataan IF:

IF <syarat logika> THEN <Pernyataan>;

IF <syarat logika> THEN <Pernyataan-1>

ELSE <Pernyataan-2> ;

Jika syarat logika bernilai Benar maka yang akan dijalankan adalah pernyataan yang

mengikuti THEN, dan sebaliknya jika syarat logika bernilai Salah maka yang akan

dijalankan adalah pernyataan yang mengikuti ELSE. Jika pernyataan yang mengikuti

THEN atau ELSE lebih dari satu maka harus diawali oleh Begin dan diakhiri oleh End.

Statement End sebelum ELSE tidak boleh ada tanda titik koma (;).

IF <syarat logika> THEN begin

<Pernyataan-1>;

<Pernyataan-2>;.

<Pernyataan-n>;

end

ELSE begin

<Pernyataan-21>;

<Pernyataan-22>;

<Pernyataan-2m>;

end;

B. Pernyataan CASE

Bentuk pernyataan CASE:

CASE <variabel-pemilih> OF

<daftar-label-1> : <Pernyataan-1>;

<daftar-label-2> : <Pernyataan-2>;

<daftar-label-n> : <Pernyataan-n>;

ELSE <Pernyataan-lain> ;

END;

Variabel pemilih tidak boleh bertipe real. Pernyataan yang akan dijalankan sesuai

dengan daftar-label yang memuat nilai variabel pemilih. Jika nilai dari variabel pemilih

tidak ada dalam semua daftar label, maka pernyataan yang akan dijalankan adalah

pernyataan yang mengikuti ELSE. ELSE dalam pernyataan CASE boleh tidak ada.

Sama halnya dengan pernyataan IF, Jika pernyataan yang mengikuti daftar-label lebih

dari satu maka harus diawali oleh Begin dan diakhiri oleh End.

Tipe Data PASCAL

Merupakan Tipe tipe data digunakan pada variabel pembuatan program dalam PASCAL

Tipe data meliputi:

1. Tipe Data Sederhana, terdiri dari :
    a. Tipe data standar :
        – integer  : merupakan tipe data berupa bilangan bulat
        –real        : merupakan jenis bilangan pecahan
        – char      : merupakan karakter yg ditulis diantara tanda petik tunggal. Ex : ‘A’, ‘a’, ’5′ dll
        – string                    : merupakan urut-urutan dari karakter yang terletak di antara tanda petik tunggal.
        – boolean : merupakan tipe data logika, yang berisi dua kemungkinan nilai: TRUE atau FALSE .
    b. Tipe data didefinisikan pemakai
2. Tipe Data Terstruktur, terdiri dari :
    a. Array
    b. Record
    c. File
    d. Set
3. Tipe Data Pointer Operator
Tanda operasi (operator) di dalam bahasa Pascal di kelompokkan dalam :
1. Assignment operator (operator pengerjaan) menggunakan simbol titik dua diikuti oleh tanda sama dengan (:=). Contoh –> A:=B;

2. Binary operator digunakan untuk mengoperasikan dua buah operand yang berbentuk konstanta ataupun variable. Operator ini digunakan untuk operasi arithmatika yang berhubungan dgn nilai tipe data Integer dan Real. Operasi yang dilakukan adalah : Pertambahan (+), Pengurangan (-), Perkalian (*), Pembagian Bulat (DIV), Pembagian Real (/) dan Modulus atau Sisa Pembagian (MOD)

3. Unary operator, operator ini menggunakan sebuah operand saja dapat berupa unary minus dan unary plus. Contoh : +2.5, a+(+b) dll

4. Bitwise operator digunakan untuk operasi bit per bit pada nilai integer.
Operator yang digunakan (NOT, AND, OR, XOR, Shl, Shr

Bagian Bagian PASCAL

1.      Menu bar

 didalam menu bar berisi sekumpulan menu menu yang digunnakan untuk menjalankan perintah ketika turbo pascal siap digunakan. Dan di tiap menu terdapat sub mneu yang mendukung proses kerja didalam membuat suatu program.

2.      Toolbar

toolbar merupakan sekumpulan simbol simbol yang mempunyai fungsi untuk memberikan perintah pada komputer untuk menjalankan program yang telah dibuat.

3.      Editor

 merupakan daerah atau wilayah kerja yang digunakan dalam pembuatan serta penyuntingan program.

Struktur penulisan didalam pascal

Nama program;

USES <deklarasi unit> LABEL <deklarasi label> CONST <deklarasi konstanta> TYPE <deklarasi tipe> VAR <deklarasi variabel> <deklarasi fungsi dan prosedur>

Begin End.

PASCAL

Pascal????

Dalam pembelajaran PIK kali ini kita akan membahas mengenai PASCAL. Apa itu pascal? Pascal merupakan bahasa pemrograman tingkat tinggi. Pascal merupakan pengembangan dari bahasa ALGOL 60, bahasa pemrograman untuk sains komputasi. Tahun 1960, beberapa ahli komputer bekerja untuk mengembangkan bahasa ALGOL, salah satunya adalah Dr. Niklaus Wirth dari Swiss Federal Institute of Technology (ETH-Zurich), yang merupakan anggota grup yang membuat ALGOL. Tahun 1971, dia menerbitkan suatu spesifikasi untuk highly-structured language (bahasa tinggi yang terstruktur) yang menyerupai ALGOL. Dia menamainya dengan PASCAL (dari nama Blaise Pascal, ahli matematika&philosophi terkenal abad 17 dari Perancis). Pascal bersifat data oriented, yaitu programmer diberi keleluasaan untuk mendefinisikan data sendiri. Pascal juga merupakan teaching language (banyak dipakai untuk pengajaran tentang konsep pemrograman). Kelebihan yang lain adalah penulisan kode Pascal yang luwes, tidak seperti misalnya FORTRAN, yang memerlukan programmer untuk menulis kode dengan format tertentu.

Belajar PIK Yuk .....

Belajar PIK sangat menyenangkan, kita belajar mengenai logika. bagaimana suatu permasalahan dapat dipecahkan dengan menggunakan alur berpikir yang sistematis. dalam hal ini kita tidak akan bisa lepas dengan komputer. komputer merupakan bagian yang vital dalam suatu pemrograman. Istilah komputer mempunyai arti yang luas dan berbeda bagi setiap orang. komputer adalah sistem elektronik untuk memanipulasi data yang cepat dan tepat serta dirancang dan diorganisasikan supaya secara otomatis menerima dan menyimpan data input, memprosesnya, dan menghasilkan output berdasarkan instruksi-instruksi yang telah tersimpan di dalam memori. banyak sekali bentuk bentuk program yang ada didalam komputer, hal tersebut disesuaikan dengan kebutuhan user. karena saya berada dijurusan statistika, program yang dominan dipakai adalah program yang berbasis dengan pengolahan, penganalisisan, dan interpretasi data. selain itu pemrograman didalam statistika merupakan hal yang penting.