Page 11 - Pengenalan Bahasa Basic
P. 11

4.  Tempatkan kursor pada baris 50, lalu tekan [Ctrl-N]
                  5.  Kemudian ketik statement 45 PRINT D
              Sehingga program secara lengkapnya menjadi:

                     10 LET A = 10
                     20 LET B = 5
                     30 LET C = A + B
                     35 LET D = A – B
                     40 PRINT C
                     45 PRINT D
                     50 END

              D.  String Variable

              Perhatikan program berikut:
                     10 LET A$ = “SELAMAT”
                     20 LET B$ = “DATANG”
                     30 PRINT A$
                     40 PRINT B$
                     50 END

              Setelah dijalankan hasilnya
                     SELAMAT
                     DATANG

              Pada  baris  10  dan  20,  A$  dan  B$  merupakan  variable  string  dan  kata  SELAMAT  dan  DATANG
              merupakan data String (bukan numerical). Cara penulisan data string harus diapit dengan tanda petik dua
              (“). Tanda petik dua setelah statement PRINT menyebabkan computer mencetak pada layer, apa adanya
              data yang terdapat di antara tanda petik dua.

              Perhatikan beberapa contoh program di bawah ini:

                         a)  10 LET A = 8
                            20 LET B = 7
                            30 LET C = A + B
                            40 PRINT “A = “,A
                            50 PRINT “B = “,B
                            60 PRINT “C = “,C
                            70 PRINT “SELESAI”
                            80 END

                         Hasilnya adalah:
                            A = 8
                            B = 7
                            C = 15
                            SELESAI

                         b)  10 LET A = 4
                            20 LET B = 3
                            30 LET C$ = “A + B”
                            40 LET D = A + B
                            50 LET E = D
                            60 PRINT C$
                            70 PRINT D
                            80 PRINT E
                            90 END




              Program Turbo Basic                          8                      Edi Supriyanto, S. Pd.
   6   7   8   9   10   11   12   13   14   15   16