Selasa, 23 Februari 2010

Algoritma dan Pascal I

PENGANTAR ALGORITMA DAN PASCAL

Pengertian ALGORITMA
Pada Merriam-Webster’s Collegiate Dictionary, istilah algoritma diartikan sebagai prosedur langkah demi langkah untuk memecahkan masalah atau menyelesaikan suatu tugas. Kamus Besar Bahasa Indonesia (KBBI) mendefinisikan algoritma sebagai urutan logis pengambilan keputusan untuk pemecahan masalah.

Contoh Algoritma dan Pemrograman Pascal:

Buat algoritma dan program untuk Menghitung Luas Persegi Panjang:

Jawab:

Algoritma
Program Menghitung Luas Persegi Panjang;
Kamus
Luas, Panjang , Lebar : Real;
Algoritma
Input(Panjang);
Input(Lebar);
Luas := Panjang x Lebar;
Write(‘Luas Persegi Panjang adalah:’,Luas);

Program Pascal:

Program LuasPersegiPanjang;
Var
Luas, Panjang, Lebar : real;
Begin
Readln(panjang);
Readln(Lebar);Luas:= Panjang*Lebar;
Writeln(‘Luas Persegi Panjang adalah:’,Luas);
Readln;
End.


Latihan:
Buat algoritma dan program pascal untuk Menghitung:
1. Luas Segitiga
2. Luas Lingkaran


STRUKTUR KENDALI “IF’

Struktur kendali aliran adalah suatu bentuk/struktur yang memiliki peranan khusus untuk mengatur aliran urutan pengerjaan operasi atau beberapa operasi tertentu.
Salah satu contoh pernyataan kendali yaitu pernyataan if .
Pernyataan if (if statement) akan memeriksa suatu persyaratan dan menentukan apakah syarat tersebut benar atau salah, kemudian melakukan pekerjaan sesuai dengan nilai pernyataan tersebut.
Struktur Penulisan:
1. If dengan satu pernyataan (statement)
If (kondisi) then pernyataan ;
2. If dengan dua atau lebih pernyataan (statement)
If (kondisi) then
begin
pernyataan1 ;
pernyataan2 ;
…..
end;
3. If dan else
If (kondisi) then
begin
pernyataan1 ;
pernyataan2 ;
…..
end
else
begin
pernyataan1 ;
pernyataan2 ;
…..
end;
Dari bentuk bentuk pernyataan if di atas yang harus diperhatikan adalah untuk pernyataan if dan else, pernyataan-pernyataan setelah then tanpa menggunakan “;”. Dengan kata lain jika pernyataan setelah then hanya terdiri dari satu pernyataan saja maka pernyataan tersebut tanpa menggunakan “;”, namun jika pernyataan setelah then terdiri dari lebih dari satu pernyataan maka setelah end tanpa menggunakan “;”.

Latihan:
Buat flowchart dan Program sederhana untuk menampilkan bilangan terbesar.

Jawab:

Algoritma

Program BilanganTerbesar;
Kamus
Bilangan_1, Bilangan_2, Terbesar : Integer;
Algoritma
Input(Bilangan_1);
Input(Bilangan_2);
If(Bilangan_1>Bilangan_2) then
Terbesar := Bilangan_1
Else
Terbesar := Bilangan_2;
Write(Terbesar);

Program Pascal:

Program BilanganTerbesar;
Var
Bilangan_1, Bilangan_2, Terbesar : integer;

Begin
Readln (Bilangan_1);
Readln (Bilangan_2);
If Bilangan_1 > Bilangan_2 then
Terbesar := Bilangan_1
Else
Terbesar := Bilangan_2;
Writeln(Terbesar);
End.

Latihan:
Buat Algoritma dan Program sederhana untuk menghitung luas segitiga dan lingkaran.

1 komentar:

  1. pak,mau tanya kalo algoritma buat nyari "n day after now" atau "before now" gimana ya?

    BalasHapus