Page 16 - Pengenalan Bahasa Basic
P. 16

BAB 6
                                           STATEMENT READ DAN DATA

                       Selain  statement  LET,  untuk  memberi  harga  suatu  variable  dapat  menggunakan  statement
               READ dan statement DATA. Sebagai contoh perhatikan program berikut!

                       10 DATA 10, 15
                       20 READ A, B
                       30 PRINT A: PRINT B
                       40 LET C = A + B
                       50 PRINT C
                       60 END

               Hasil pelaksanaan programnya adalah:
                       10
                       15
                       25

               Harga variable A dan B berturut-turut adalah 10 dan 15. Jadi pada baris 10 menunjukkan DATA.
               Pada  baris  20  memberikan  harga  variabel  A  dan  B.  Baris  30  memerintahkan  komputer  mencetak
               harga variabel A dan B. Baris 40 memberikan harga variabel C = 25 yang diperoleh dari 10 + 15.
               Baris 50 memerintahkan komputer mencetak harga variabel C.

                       Statement  DATA,  dapat  ditempatkan  pada  baris  sesudah  statement  READ,  tanpa
               mempengaruhi hasil pelaksanaan program. Perhatikan beberapa contoh program berikut!

               a.      10 READ P, Q
                       20 PRINT P: PRINT Q
                       30 LET R = P + Q
                       40 DATA 20, 25
                       50 PRINT R
                       60 END

               Hasil pelaksanaan programnya adalah :
                       20
                       25
                       45

               b.      10 READ A, B
                       20 READ C
                       30 DATA 5, 10, 15
                       40 PRINT A: PRINT B: PRINT C
                       50 END

               Hasil pelaksanaan programnya adalah :
                       5
                       10
                       15

               c.      10 READ A, B
                       20 DATA 10, 15
                       30 LET C = A + B
                       40 PRINT A
                       50 PRINT B
                       60 PRINT C
                       70 END


               Program Turbo Basic                          13                         Edi Supriyanto, S. Pd.
   11   12   13   14   15   16   17   18   19   20   21