Page 21 - Pengenalan Bahasa Basic
P. 21
SOAL-SOAL LATIHAN
Tuliskan hasil pelaksanaan program berikut!
1. 10 LET X = 3 5. 10 DATA 40, 50, 80
20 PRINT X 20 READ S, M, U
30 IF X = 7 THEN 60 30 LET NA = (2 * P+3 * M + 5 * U)/10
40 LET X = X + 2 40 IF NA < 56 THEN 70
50 GOTO 20 50 PRINT “DINYATAKAN LULUS”
60 END 60 GOTO 80
70 PRINT “DINYATAKAN TIDAK
2. 10 REM ”PROGRAM LOOP” LULUS”
20 LET X = 1 80 END
30 PRINT ”D A M A I D I H A T I”
40 IF X = 5 THEN 60 6. 10 DATA ALI, 40, 50, 80
50 LET X = X + 1 20 READ N$, P, Q, R
60 GOTO 30 30 LET NA = (2 * P + 3 * Q + 5 * R) / 10
70 END 40 TL$ = “DINYATAKAN TIDAK
LULUS”
3. 10 LET X = 0 50 L$ = “DINYATAKAN LULUS”
20 PRINT X * X 60 IF NA < 56 THEN 90
30 IF X = 10 THEN 60 70 PRINT N$, TL$
40 LET X = X + 2 80 GOTO 100
50 GOTO 20 90 PRINT N$, L$
60 END 100 END
4. 10 DATA 40,80 7. 10 DATA 25, 50
20 READ N1, N2 20 READ A, B
30 LET X = (N1 + N2)/2 30 IF A > B THEN 60
40 IF X > 55 THEN 70 40 PRINT A; “LEBIH KECIL DARI ”; B
50 PRINT “SISWA TIDAK LULUS” 50 GOTO 70
60 GOTO 80 60 PRINT A; “LEBIH BESAR DARI “; B
70 PRINT “SISWA LULUS” 70 END
80 END
8. Lengkapi pada baris 30 program di bawah ini!
10 LET X = 1
20 PRINT X
30 IF X = .... THEN .....
40 LET X = X + 2
50 GOTO 20
60 END
Hasil pelaksanaan programnya adalah:
1
3
5
9. Kita bermaksud membeli buku tulis. Untuk pembelian 10 buah atau lebih, harga pembelian Rp.
1000,00. Jika pembelian kurang dari 10 buah, maka harga pembelian Rp. 1.250,00 per buku.
Lengkapilah baris 40 pada program berikut!
10 DATA .....
20 READ N
30 IF N > 10 THEN 60
40 ................................
50 GOTO 70
60 LET H = 1000 * N
70 PRINT ”HARGA SELURUH BUKU = ”; H
80 END
Program Turbo Basic 18 Edi Supriyanto, S. Pd.