Logika Perulangan WHILE DO Pascal: Difference between revisions
No edit summary Tag: Reverted |
No edit summary Tag: Manual revert |
||
| Line 3: | Line 3: | ||
Sebagai latihan, kita membuat kode program yang menghasilkan teks: “Variabel <code>i</code> sekarang bernilai: <code>5</code>”, “Variabel <code>i</code> sekarang bernilai: <code>6</code>”, … Hingga “Variabel <code>i</code> sekarang bernilai: <code>10</code>”. Hanya 5 baris. Silahkan modifikasi kode program pada [[Perulangan WHILE DO dalam Pascal|halaman ini]]. | Sebagai latihan, kita membuat kode program yang menghasilkan teks: “Variabel <code>i</code> sekarang bernilai: <code>5</code>”, “Variabel <code>i</code> sekarang bernilai: <code>6</code>”, … Hingga “Variabel <code>i</code> sekarang bernilai: <code>10</code>”. Hanya 5 baris. Silahkan modifikasi kode program pada [[Perulangan WHILE DO dalam Pascal|halaman ini]]. | ||
program while_do; | program while_do; | ||
uses crt; | uses crt; | ||
| Line 24: | Line 23: | ||
Tapi, juga bisa menggunakan kode program berikut: | Tapi, juga bisa menggunakan kode program berikut: | ||
program while_do; | program while_do; | ||
uses crt; | uses crt; | ||
Latest revision as of 16:34, 16 November 2021
Untuk bisa membuat perulangan dengan WHILE DO, kita perlu pemahaman logika. Logika diperlukan untuk menentukan nilai awal dan kondisi akhir.
Sebagai latihan, kita membuat kode program yang menghasilkan teks: “Variabel i sekarang bernilai: 5”, “Variabel i sekarang bernilai: 6”, … Hingga “Variabel i sekarang bernilai: 10”. Hanya 5 baris. Silahkan modifikasi kode program pada halaman ini.
program while_do;
uses crt;
var
i: integer;
begin
clrscr;
i:= 5;
while i <= 10 do
begin
writeln('Variabel i sekarang bernilai: ',i);
i:= i + 1;
end;
readln;
end.
Kuncinya adalah bagaimana menentukan kondisi awal variabel i, dan kondisi akhir dari perulangan. Dengan membuat i:= 5, dan while i <= 10 do, artinya nilai i akan mulai dari 5, 6, 7, 8, 9, dan 10.
Tapi, juga bisa menggunakan kode program berikut:
program while_do;
uses crt;
var
i: integer;
begin
clrscr;
i:= 5;
while i < 11 do
begin
writeln('Variabel i sekarang bernilai: ',i);
i:= i + 1;
end;
readln;
end.
Dapatkah kita melihat bedanya? Perhatikan bahwa kali ini menggunakan kondisi while i < 11 do. Sebenarnya ini sama seperti while i <= 10 do. Angka 10 akan TRUE jika dibandingkan dengan “< 11″, maupun “<= 10“.
Konsep seperti ini agar selalu diperhatikan ketika membuat perulangan WHILE DO.