Kamis, 18 April 2013

Algoritma looping lengkap pascal dan delphi


Kebetulan ini tugas kampus saya. dan kebetulan juga, dosen selalu mengasih tugas sebelum menjelaskannya. saya buat di 2 contoh pascal dan dhelphi masalahnya adalah saya lupa menyimpan yang di pascal  beberapa terutama nomer 9. tapi intinya adalah belajar algoritma pemrograman. Di delphi sama aja ya? wong 1 bahasa.

sekarang saya menjelaskan dulu gimana cara kerja mereka for, while dan repeat until.

nomer 1 FOR
Mari kita membahasnya dengan cara yang ringan

for 1 to 9 do
begin 
bla bla bla
end;

Ini seperti bahasa pemrograman lain semuanya dilakukan dengan menghitung dan mengulang-ngulang statement bla-bla bla sebanyak 9 kali. dan ini adalah kebalikannya :

for 9 downto 1 do
begin 
bla bla bla
end;


nomer 2 WHILE

a:=0;
while a  <= 10 do
begin
bla bla
a:=a+2;
end;

ini berarti dia akan melooping dengan step 2 sampai memenuhi persamaan while itu yaitu 10 . berarti perulangan sebanyak 5 kali yaitu di rang 2,4,6,8,10.. okeh bro?

nomer 3 adalah REPEAT UNTIL.

ini 1 1nya yang beda. dia akan berhenti mengulang apabila si angka sudah tidak memenuhi lagi.. contoh
 x:=0;
repeat
bla bla bla
x:=x+1
until x >10;
berarti dia akan mengulang sebanyak 9 kali. :D dan begitu seterusnya.. gampang kan?

untuk gambar di atas silahkan sedot disini pascal dan delphi.

Tidak ada komentar: