BELAJAR KONDISI PADA PASKAL

KONDISI

  1. IF-THEN

Suatu Ungkapan adalah sebuah kondisi yang diseleksi oleh statement IF. Bila kondisi yang diseleksi

terpenuhi, maka statement yang mengikuti THEN akan diproses, sebaliknya bila kondisi

tidak terpenuhi, maka yang akan diproses statement berikutnya.

IF Kondisi THEN Statement

  1. CASE-OF

suatu ungkapan logika yang disebut dengan selector dan

sejumlah statemen yang diawali dengan suatu label permasalahan (case label) yang

mempunyai tipe sama dengan selector.Statement yang mempunyai case label yang bernilai sama dengan case label yang bernilai sama dengan nilai selector akan diproses sedang statemen yang lainya tidak.

case variabel kondisi of

case label 1; statement 1;

case label 2; statement 2;

……..

case label n; statement n;

end;

Program pertama                                                                        LAT 1

Isi coding :

program case_of;

uses crt;

var i:integer;

angka:string;

begin

clrscr;

write(‘masukkan angka [1..3] ‘);readln(i);

case i  of

1:angka:=’satu’;

2:angka:=’dua’;

3:angka:=’tiga’;

else

angka:=’invalid’;

end;

writeln(‘angka yang di masukkan ‘,angka);

readln;

end.

TAMPILAN PADA PASKAL :


ALUR LOGIKA:

  1. 1. PROGRAM case..of ;

Sebuah judul program boleh di gunakan boleh tidak, kalau ingin di gunakan harus sesuai prosedur dengan menggunakan “program  nama judul;

  1. 2. Uses crt;

Sebuah definisi program boleh di tulis boleh tidak. Biasanya apabila ingin menggunakan menu window seperti clrscr; harus menggunakan uses crt ;

  1. 3. Var

Sebuah deklarasi  variabel . dimana setiap variable di berikan type datanya dan bentuk datanya dapat berubah ubah contoh :i:integer; berarti nilai I  adalah bilangan bulat dan nilai b adalah sebuah string.

  1. Begin di akhiri dengan end.

Merupakan blok program yang mengandung pernyataan-pernyataan dan intruksi-intruksi baris program yang di buat;

  1. 5. Clrscr;

Untuk membersihkan layar dari program sebelumnya;. Setiap penggunaannya harus di definisi program tersebut dengan uses crt; .

  1. 6. Write(‘masukkan angka [1..3]’);

Adalah untuk menampilkan isi  program cursornya terdapat  di samping .contoh di atas diminta untuk mencetak masukkan angka [1..3]

  1. 7. Readln( );

Untuk membaca  suatu variable,dimana pada kasus di atas di minta untuk membaca variable i

  1. 8. Case  variabel  of

Kondisi:statement;

End;

Adalah statement kondisi yang sederhana dan lebih mudah dalam percabanganyang banyak.

Di mana bila variable  I lebih dari 3 maka akan tercetak invalid. Bila I Di Masukkan Angka 1 Maka Akan Tercetak  Satu.dan di masukkan 2 maka akan tercetak huruf dua .dan di masukkan 3 maka akan tercetak huruf tiga.

  1. 9. Readln;

Untuk membaca/menampilkan  suatu variable yang ingin di  tampilkan atau di baca;

Output:

masukkan angka [1..3] 3


PEROGRAM KE DUA

Isi coding :

program if_then_else;

uses crt;

var nilai:integer;

begin

clrscr;

write(‘besar nilai=’);readln(nilai);

if nilai >65 then writeln(‘lulus’)

else

writeln(‘TIDAK  LULUS ‘);

readln;

end.

TAMPILAN PADA PASKAL:

ALUR LOGIKA:

  1. 1. PROGRAM case..of ;

Sebuah judul program boleh di gunakan boleh tidak, kalau ingin di gunakan harus sesuai prosedur dengan menggunakan “program  nama judul;

  1. 2. Uses crt;

Sebuah definisi program boleh di tulis boleh tidak. Biasanya apabila ingin menggunakan menu window seperti clrscr; harus menggunakan uses crt ;

  1. 3. Var

Sebuah deklarasi  variabel . dimana setiap variable di berikan type datanya dan bentuk datanya dapat berubah ubah contoh nilai:integer; berarti nilai  adalah bilangan bulat dan nilai b adalah sebuah string.

  1. Begin di akhiri dengan end.

Merupakan blok program yang mengandung pernyataan-pernyataan dan intruksi-intruksi baris program yang di buat;

  1. 5. Clrscr;

Untuk membersihkan layar dari program sebelumnya;. Setiap penggunaannya harus di definisi program tersebut dengan uses crt; .

  1. 6. Write(‘besar nilai = ’);

Adalah untuk menampilkan isi  program cursornya terdapat  di samping .contoh di atas diminta untuk mencetak besar nilai =

  1. 7. Readln( );

Untuk membaca  suatu variable,dimana pada kasus di atas di minta untuk membaca variable i

  1. 8. IF KONDISI THEN statement

ELSE

Statement;

Adalah statement kondisi yang mengkasilkan  nilai Boolean tru or false. Contoh bila nilai  dalam program di atas bernilai lebih dari 65 maka akan tercetak lulus dan apabila kurang atau sama dengan 65 maka tercetak tidak lulus

  1. 9. Readln;

Untuk membaca/menampilkan  suatu variable yang ingin di  tampilkan atau di baca.

 

Output program:

besar nilai = 90


CODING PROGRAM KE 3:

 

program kondisi_if_then_imam_magribi;

uses crt;

var a,b,c:integer;d:real;

begin

clrscr;

writeln(‘*selamat datatang di menu program 1 imam *’);

writeln(‘1-penjumlahan’);

writeln(‘2-pengurangan’);

writeln(‘3-perkalian  ‘);

write(‘pilihlah [1-3]  : ‘);readln(a);

case a of

1..3:begin

if a=1 then

begin

clrscr;

writeln(‘* penjumlahan *’);

writeln;

write(‘a =’);readln(b);

write(‘b =’);readln(c);

d:=b+c;

clrscr;

writeln(‘    ‘,b);

writeln(‘    ‘,c);

writeln(‘    ___+’);

writeln(‘    ‘,d:5:0);

end;

if a=2 then

begin

clrscr;

writeln(‘* pengurangan *’);

writeln;

write(‘a= ‘);readln(b);

write(‘b= ‘);readln(c);

d:=b-c;

writeln(‘    ‘,b);

writeln(‘    ‘,c);

writeln(‘  _____-‘);

writeln(‘  ‘,d:5:0);

end

else

begin

clrscr;

writeln(‘* perkalian *’);

writeln;

write(‘a= ‘);readln(b);

write(‘b= ‘);readln(c);

d:=b*c;

writeln(‘  ‘,b);

writeln(‘  ‘,c);

writeln(‘  _____*’);

writeln(‘   ‘,d:5:0);

end;

end;

else

begin

writeln(‘syntax error’);

end;

end;

readln;

end.

 

 

About imam_magribi

saya tinggal di kebagusan pasar minggu saya lulusan sd 04 smp 175 sman 109 dan saya sekarang sedang kuliah di universitas swasta di jakarta

Posted on March 3, 2011, in Uncategorized. Bookmark the permalink. 1 Comment.

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s

%d bloggers like this: