Nested Loop PASCAL

Nested Loop PASCAL

NESTED LOOP

Pengertian sederhananya dari Nested Loop adalah adanya Loop didalam Loop , atau bisa disebut pengulangan bersarang.

Langsung saja kita ke contoh programnya.

Contoh Program NESTED LOOP sederhana :

Program NL;
Var
i,j:integer;
Begin
For i := 1 To 10 Do
Begin
For j := 1 To 8 Do
Write ('+');
Writeln;
End;
End.


Nested Loop PASCAL
hasil coding akan membentuk + dengan panjang 10 dan lebar 8 dikarenakan ada looping untuk i row dan j kolom


Contoh program nested if yang lainnya bisa diliat coding dibawah akan membantuk coding 2 persegi :
Program duasegi(output);
Var
baris, kolom : Integer;
Begin
For baris := 1 To 10 Do
Begin
For kolom := 1 To 8 Do
Write('+');
Write (' ');
For kolom := 1 To 8 Do
Write ('+');
Writeln;
End;
End.

Nested Loop PASCAL
hasil coding akan membentuk dua persegi sesuai dengan loop baris dan kolom, 1-10 baris membuat panjang kedua persegi , dan kolom  loop pertama 1-8  membuat lebar + setelah loop 8 selesai akan ada sepasi yang terjadi untuk membagi dua persegi ' ' lalu melanjutkan kembali  loop kedua baris 1-8 untuk lebar persegi kedua, maka terjadilah 2 persegi.


MATERI PASCAL

Jika kalian baru dalam pembelajaran pemrograman Pascal, Silakan belajar dari materi pertama :


Artikel Terkait:
Disqus Comments