Page 130 - Pemrograman Dasar kelas X
P. 130
126 Pemrograman Dasar SMK Kelas X Sem 2
Program FORDO
Var i : integer;
Begin
For i := 1 to 5 Do
Writeln(‘Pascal’);
End.
Program NestedLoops; {* contoh aplikasi mencari nilai prima *}
var
i, j:integer;
begin
for i := 2 to 50 do
begin
for j := 2 to i do
if (i mod j)=0 then
break; {* if faktor ketemu, berarti bukan prima *}
if(j = i) then
writeln(i , ' adalah nilai prima' );
end;
end.
Ketiga kode program di atas adalah contoh dari perulangan dengan kondisi diawal.
Menanya
Dari ketiga contoh kode program di atas, buat pertanyaan yang berkaitan dengannya, misalkan:
1. Apakah yang membedakan 3 souce code di atas?
2. Bagaimana cara kerja dari 3 kode program di atas?
3. Lalu, apa hasil eksekusi dari 3 kode program di atas?
4. Ketiga kode program di atas merupakan contoh dari perulangan dengan kondisi di awal,
lalu kapan kita akan menggunakannya?
Mengumpulkan Informasi/Mencoba
