"Selamat Datang Di Kinabi Poetra | Blog"

Oct 24, 2012

- Perulangan Bersarang

,
for variabel1=nilaiawal to nilaiakhir
  for variabel2=nilaiawal to nilaiakhir
    perintah
  next variabel2
next variabel1


pencarian data pada matriks (baris, kolom)

ani    nita    jen
koko    kiki    kuku

datamahasiswa(1,1) = ani
datamahasiswa(1,2) = nita
datamahasiswa(1,3) = jen
datamahasiswa(2,1) = koko
datamahasiswa(2,2) = kiki
datamahasiswa(2,3) = kuku

jen = 1,3

  A   A   A   A
 
  A   A   A   A

  A   A   A   A

CLS
FOR X=1 TO 3
 FOR Y=1 TO 4
   PRINT "A"
 NEXT Y
 PRINT
NEXT X
END



TEST      1   2   3   4   5
      6   7   8   9   10

CLS
LET A=1
FOR X=1 TO 2
 FOR Y = 1 TO 5
   PRINT A;
   LET A=A+1
 NEXT Y
 PRINT
NEXT X
END


TEST     1  2  3  4
     1  2  3  4
     1  2  3  4
     1  2  3  4


CLS
FOR X=1 TO 4
 FOR Y=1 TO 4
  PRINT Y;
 NEXT Y
 PRINT
NEXT X
END


TEST       3  4  5  6
     4  5  6  7
     5  6  7  8

CLS
FOR X=3 TO 5
 LET A=X
 FOR Y=1 TO 4
   PRINT A;
   LET A=A+1
 NEXT Y
 PRINT
NEXT X
END


TEST    1  2  3  4  5
    6  7  8  9  10
    10 9  8  7  6
    5  4  3  2  1

CLS
LET A=1
FOR X=1 TO 4
 FOR Y=1 TO 5
   PRINT A;
   IF X <= 2 THEN
     LET A= A+1
   ELSE
     LET A=A-1
   END IF
 NEXT Y
 PRINT
 IF A > 10 THEN A=10
NEXT X
END


0 komentar to “- Perulangan Bersarang”

Post a Comment

Powered by Blogger.