Referensi :
- Seri Diktat Kuliah : Pengantar Algoritma Dan Pemrograman Teknik Diagram AluDan Bahasa BASIC Dasar, Penerbit GUNADARMA,
- Yay Singleman, Business Programming Logic 2nd –ed, Prentice Hall Engelwood Cliffs,
- Gottfried, Programming in BASIC , Mc
- Insap Santosa, Pemrograman Terapan Menggunakan QUICK BASIC, Andi Offset,
- Jogiyanto, H.M.,Teori dan Aplikasi Program Komputer Bahasa BASIC, edisi 5, Andi Offset,
- Rijanto Tosin, Quik BASIC, Dinastindo.
v FUNGSI-FUNGSI STRING (MANIPULASI STRING)
- Fungsi LEN
Digunakan untuk menghitung panjang dari suatu ungkapan string
Contoh 1 :
INPUT “NAMA ANDA ?“;NAMA$
PRINT “PANJANG NAMA ANDA ADALAH”;LEN (NAMA$);”KARAKTER”
Output :
NAMA ANDA ? ARIEF KURNIAWAN
PANJANG NAMA ANDA ADALAH 15 KARAKTER
Ok
- Fungsi LEFT$
Digunakan untuk mengambil sejumlah karakter dari mulai posisi paling kiri
Contoh 2:
Y$=”ABCDEFGHIJKLMNOPQRSTUVWXYZ”
A$=LEFT$(Y$,6)
PRINT “A$=”;A$
END
Output :
A$=ABCDEF
- Fungsi RIGHT$
Digunakan untuk mengambil sejumlah karakter dari mulai posisi paling kanan
Contoh 3 :
Y$=”ABCDEFGHIJKLMNOPQRSTUVWXYZ”
C$= RIGHT$(Y$,15)
PRINT “C$=”;C$
END
Output :
C$= LMNOPQRSTUVWXYZ
- Fungsi MID$
Digunakan untuk mengambil sejumlah karakter ditengah mulai posisi yang tertentu.
Contoh 4 :
Y$=”ABCDEFGHIJKLMNOPQRSTUVWXYZ”
E$= MID$(Y$,7,6)
PRINT “E$=”;E$
END
Output :
E$= GHIJKL
- Fungsi VALUE(VAL)
Digunakan untuk mengkonversi data string menjadi data numerik
Contoh 5 :
A$=”300”
B$=”100”
A=VAL(A$)
B=VAL(B$)
PRINT A$,B$,A$+B$
PRINT A,B,A+B
Output :
300 100 300100
300 100 400
- Fungsi STR$
Digunakan untuk mengkonversi data numerik menjadi data string.
Contoh 6 :
A=300
B=100
A$=STR$(A)
B$=STR$(B)
PRINT A$,B$,A$+B$,STR$(A+B)
PRINT A,B,A+B
Output :
300 100 300100 400
300 100 400
- Fungsi ASC
Digunakan untuk mencari kode ASCII dari karakter pertama suatu data string. Meskipun data string tersebut terdiri lebih dari 1 karakter, tetapi yang dilihat hanya pada karakater pertamanya.
Contoh 7 :
PRINT ASC(“A”)
PRINT ASC(“AGUSTUS”)
Output :
65
65
Ok
- Fungsi CHR$
Digunakan untuk mengkonversi dari kode ASCII ke karakter.
Contoh 8 :
A=68
B=35
PRINT A;”Adalah Kode ASCII Untuk Karakter”;CHR$(A)
PRINT B;”Adalah Kode ASCII Untuk Karakter”;CHR$(B)
Output :
68 Adalah Kode ASCII Untuk Karakter D
35 Adalah Kode ASCII Untuk Karakter #
Ø FUNGSI ARITMATIKA
- Fungsi SIN
Digunakan untuk mencari harga sinus suatu sudut yang dinyatakan dalam radian.
Contoh 9 :
PRINT SIN(1.5)
PRINT SIN(30)
PRINT SIN(45)
Output
.9974951
-.9880317
.8509035
- Fungsi COS
Digunakan untuk mencari harga cosinus suatu sudut yang dinyatakan dalam radian.
Contoh 10 :
D= 3.14159/180
PRINT COS (15*D)
PRINT COS (30*D)
PRINT COS (45*D)
Output :
.965926
.866026
.707107
- Fungsi TAN
Digunakan untuk mencari harga tangen suatu sudut yang dinyatakan dalam radian. Bila sudut ingin dinyatakan dalam bentuk derajat,kalikan sudutnya dengan 0.015
Contoh 11 :
PRINT TAN(1.5)
PRINT TAN(30*.015)
PRINT TAN(30)
PRINT TAN(45)
Output :
14.10142
.483055
-6.405332
1.619775
- Fungsi ABS (Absolute)
Digunakan untuk mengambil harga mutlak dari suatu ekspresi numeris.
Contoh 12 :
PRINT ABS(-28.8)
PRINT ABS(-5*3)
PRINT ABS(3*4.2*2)
Output
28.8
15
25.2
- Fungsi EXP
Digunakan untuk untuk menghitung ex . Dengan bilang natural e = 2.71828
Contoh 13 :
PRINT EXP(0)
PRINT EXP(1)
PRINT EXP((0.25)
Output :
1
2.71828
1.284025
- Fungsi SGN
Untuk mengetahui sign dari suatu bilangan.
Jika SGN(X) = 0 Jika X = 0.
SGN(X) = -1 Jika X = bilangan negatif
SGN(X) = 1 Jika X = bilangan positif
Contoh 14 :
PRINT(-0.25)
PRINT(0)
PRINT(1.75)
Output :
-1
0
1
- Fungsi LOG
Digunakan untuk menghitung nilai logaritmadari suatu bilangan.
Contoh 15 :
PRINT LOG(100)
PRINT LOG(5)
Output :
2
.69897
- Fungsi SQR
Digunakan untuk mengambil harga akar kuadrat dari suatu bilangan.
Contoh 16 :
PRINT SQR(16)
PRINT SQR(32*2)
A=SQR(81)
PRINT A
Output :
4
8
9
- Fungsi Integer (INT)
Digunakan untuk membulatkan suatu pecahan ke bilangan bulat terkecil.
Contoh 17 :
PRINT INT (- 3.5)
PRINT INT (5.4)
PRINT INT (7.8)
PRINT INT(-2.25)
Output :
-4
5
7
-3
- Fungsi FIX
Digunakan untuk membuang nilai pecahan.
Contoh 18 :
PRINT FIX(-3.5)
PRINT FIX (5.4)
PRINT FIX (7.8)
PRINT FIX(-2.25)
Output :
-3
5
7
-2
- Fungsi CINT
Digunakan untuk membualtkan suatu pecahan ke bilangan bulat terbesar
Contoh 19 :
PRINT CINT(3.5)
PRINT CINT(5.4)
PRINT CINT(7.8)
Output :
4
5
8
- Fungsi Modulo (MOD)
Digunakan untuk menghitung sisa pembagian dari dua buah operand
Contoh 20 :
X=15 : Y=4
SISA=X MOD Y
PRINT“SISA PEMBAGIAN DARI”;X;”DIBAGI”;Y;”=”;SISA
END
Output :
SISA PEMBAGIAN DARI 15 DIBAGI 4 = 3
- Fungsi Random (RND)
Digunakan untuk memberikan nilai acak. Setiap kali fungsi ini dilaksanakan harga yang diberikan akan berada diantara 0 (nol) dan 1 (satu).
Contoh 21 :
FOR A=1 TO 3
B=RND(A)
PRINT”NILAI RANDOM DARI”;A;”ADALAH”;B
NEXT : END
Output :
NILAI RANDOM DARI 1 ADALAH .1213501
NILAI RANDOM DARI 2 ADALAH .651861
NILAI RANDOM DARI 3 ADALAH .8688611
LATIHAN
- A$ =”MATAHARI PAGI”
B$ = “ YANG INDAH”
C$ = “BERSINAR”
A. Apakah hasil dari PRINT LEFT$(A$,8)+SPACE$(1)+C$
B. Apakah hasil dari PRINT MID$(A$,5,4)+LEFT$(5)
C. Apakah hasil dari PRINT LEN(B$) + LEN (C$)
D. Apakah hasil dari PRINT MID$( A$+C$, LEN(C$)+1,4) +LEFT(B$,5)
JAWAB :
A. MATAHARI BERSINAR
B. HARIBERSIN
C. 18
D. PAGIINDAH
- Apakah output program di bawah ini !
PRINT “X”,”Y”
FOR I = 1 to 4
READ X
Y = -ABS(10*LOG(X)) + 25
IF Y < 0 THEN Y$ =”-“
IF Y > 0 THEN Y$ =”+”
PRINT X, Y$
NEXT I
DATA 1,5,25,50
END
Jawab :
X Y
1 +
5 +
25 -
50 -
TUGAS !!!
1. Apakah output program di bawah ini !
FOR I = 1 TO 26
I$ = STR$(I)
PANJANG = LEN(I$)
ANGKA$ = MID$(I$,2,PANJANG)
BENTUK$ = SPACE$(3-PANJANG)+”X”+ANGKA$+”=”+ANGKA$
PRINT BENTUK$,
IF I/3 = INT (I/3) THEN PRINT
NEXT I
END
2. Apakah output program di bawah ini !
‘**PROGRAM HITUNG FUNGSI COS(X) DERET TAYLOR
SUDUT = 60
X = SUDUT / 57.2958
T = 1: C = 1
S1 = X^2
60 F = F + 2
T = -T * S1 / ((F – 1) * F)
C = C + T
IF ABS(T) < 0.001 THEN 140
GOTO 60
140 PRINT “COS 60 DERAJAD DERET TAYLOR
PRINT “COS 60 DERAJAD DERET TAYLOR
END
Tidak ada komentar:
Posting Komentar