Skip to main content

Posts

Showing posts with the label perulangan while do

Perulangan Repeat-Until While-Do Lazarus Free Pascal

Perulangan Repeat ... Until dan While ... Do pada Lazarus Free Pascal mempunyai fungsi yang sama dengan perulangan For yaitu mengulang perintah yang diberikan dengan syarat tertentu. Perbedaan yang utama Perulangan Repeat-Until While-Do dengan perulangan For adalah tidak ada penambahan / pengurangan nilai secara otomatis seperti pada perulangan For, untuk itu perlu menggunakan prosedur INC dan DEC: Prosedur INC Prosedur INC berfungsi untuk menambah nilai variabel Syntax: INC(variabel) //menambah nilai kelipatan 1. atau INC(variabel,kelipatan_n) //menambah nilai kelipatan n Contoh: inc(i); //akan menambah nilai variabel i dengan kelipatan 1 inc(i,4); //akan menambah nilai variabel i dengan kelipatan 4 Prosedur DEC Prosedur DEC berfungsi untuk mengurangi nilai variabel Syntax: DEC(variabel) //mengurangi nilai kelipatan 1 atau DEC(variabel,kelipatan_n) //mengurangi nilai kelipatan n Contoh: dec(i); //akan mengurangi nilai variabel i dengan kelipatan 1 dec(i,5); /...