Berilah
Tanda Silang pada jawaban yang benar!
1. Perusahaan
pembuat sistem operasi windows adalah…
- Linux c. Aple e. Blank On
- Macintos d. Microsoft
2. Bahasa
Pemrograman Pascal merupakan bahasa pemrograman berbasis…
- windows c. Linux e. Macinthos
- Dos d. Unix
3. Siapa pencipta
program pascal…
- Tomas c. Aristoteles e. Pascal
- Blaise d. Niclaus wirth
4. Dos
Kepanjangan dari…
a.
Disk
Operasi System
b.
Disk
Operation System
c.
Disk
Operating System
d.
Diskette
Operation System
e.
Diskette
Operating System
5. Tipe bilangan
bulat dalam bahasa pemrograman Pascal dikenal sebagai tipe …
- Boolean c. Integer e. Char
- String d. Real
6. Tipe variabel
logika yang memiliki nilai true (benar) atau false (salah) saja adalah ….
a. Boolean c. Integer e. Char
b. String d. Real
7. Tahun berapa
pascal diciptakan…
a. 1951 c. 1971 e. 1991
b. 1961 d. 1981
8. Instruksi
untuk melakukan RUN dalam program pascal…
- F1 c. Alt+F4 e. Ctrl+F9
- Ctrl+F5 d. Alt+F9
9. Prosedure
Standar Clrscr adalah untuk menghapus layar namun untuk menggunakannya unit yang
harus disebutkan dalam program adalah….
- CTR c. Screen e. Dos
- RCT d. CRT
10. Sebuah blok
percabangan dalam kode program dapat diketahui dengan adanya keyword tertentu,
misalnya ….
a. Start c. Turn e. If
b. Choose d. End
11. Nilai dari 60
MOD 36 adalah…
- 1 c. 2 e. 3
- 24 d. 96
12. Interval tipe
data byte adalah…
- 0 sd. 255 c. -255
sd. 255 e. -128 sd. 127
- 0 sd. 65535 d. -32768
sd. 32767
13. Berikut ini
yang bukan termasuk tipe data integer…
- word c. integer e. byte
- longint d. real
14. Nilai dari (5
shl 2) + (20 shr 2)adalah…
- 12 c. 29 e. 25
- 1 d. 21
15. Pernyataan BEGIN dalam pemrograman pascal selalu
berpasangan dengan pernyataan ….
a. Do c. End e. Until
b. Then d. Repeat
16. Dalam Pascal
rumus: round(sqrt(sqr(5)/sqrt(4))
Akan
menghasilkan…
a. 5 c. 4 e. 3
b. 2 d. 1
17. perintah gotoxy(3,2) kursor akan menuju ke…
- baris 2 kolom 2 d. baris
3 kolom 2
- kolom 3 baris 2 e. baris
2 kolom 3
- kolom 3 baris 3
18. Variabel x=‘Turbo’,
dalam Pascal dimasukkan dalam tipe data…
- Char c. Sortint e. String
- Integer d. Longint
19. Berikut ini
merupakan potongan dari suatu program Pascal:
for
i:=1 to 5 do
write(’i
‘);
Jika i bertipe integer dan
program dianggap benar, maka output dari potongan program di atas adalah…
- 2 3 4 c. i i i i e. 0
- i i i i i d. 1 2 3 4 5
20. Jika program
dianggap benar dan lengkap, maka output dari pernyataan :
Writeln(‘Ujian
Kenaikan Kelas’);
Write(‘Kelas
X’);Write(‘Semester II’);
Writeln(‘Mudah
dan Menyenangkan’);
adalah ....
- Ujian Kenaikan Kelas Kelas
X
Semester
II
Mudah
dan Menyenangkan
- Ujian Kenaikan Kelas
Kelas
X Semester II
Mudah
dan Menyenangkan
- Ujian Kenaikan Kelas
Kelas
XSemester II Mudah dan Menyenangkan
- Ujian Kenaikan Kelas
Kelas
XSemester IIMudah dan Menyenangkan
- Ujian Kenaikan Kelas
Kelas
X Semester IIMudah dan Menyenangkan
21. Berikut ini
yang bukan penulisan pernyataan if yang benar…
- if nilai < 75 then;
writeln(‘Tidak
Tuntas’);
- if nilai < 75 then
begin
writeln(‘Tidak
Tuntas’);
end.
- if nilai < 75 then
Begin
writeln(‘Tidak
Tuntas’)
end;
- if nilai < 76 then
writeln(‘Tidak
Tuntas’)
else
writeln(‘Tuntas’);
- if nilai < 76 then;
writeln(‘Tidak
Tuntas’);
else
writeln(‘Tuntas’);
22. Pernyataan WHILE dalam pemrograman pascal selalu
berpasangan dengan pernyataan ….
- Then c. End e. Repeat
- Do d. Until
23. interval tipe
data integer adalah…
- 0 sd. 2147483 d. -2147483
sd, 2147483
- 0 sd. 255 e. 2,9x10-39 sd. 1,7x1038
- -32678 sd.32678
24. Looping While
Do dikerjakan minimal…kali, sedangkan pada Repeat Until dikerjakan minimal…kali
a. 0 0 c. 1 0 e. Tidak
ada
b. 0 1 d. 1 1 jawaban
25. Yang tidak
termasuk blok Deklarasi adalah…
- Type c. Procedure e. Tidak ada
- Var d. Function jawaban
26. Berikut ini
potongan program dalam pascal yang akan menghasilkan output : 5 4 3 2
- For i:=5 to 2 do
writeln(i,’ ’);
- For i:=2 to 5 do
writeln(i,’ ’);
- For i:=5 to 2 downto 2 do
writeln(i,’ ’);
- For i:=5 downto 2 do
writeln(i,’ ’);
- For i:=5 downto 2 to 2 do
writeln(i,’ ’);
27. Berikut ini
merupakan potongan dari suatu program pascal :
For
i:= 4 to 2 do
Write(i,’
‘);
Jika i bertipe integer dan program
dianggap benar, maka output dari potongan program di atas adalah…
- 4 3 2 c. 2 3 4 e. Tidak ada
- 3 d. i i i output
28. Berikut ini merupakan
potongan dari suatu program pascal :
For
i:= 2 to 8 do
If
(I mod 3 = 0) then
Write(i,’
‘);
Jika i bertipe integer dan program
dianggap benar, maka output dari potongan program di atas adalah…
- 3 6 c. 3 e. 2 4 6
- 2 d. 2 4 6
8
29. Berikut ini
merupakan potongan dari suatu program pascal :
i:=
1
while
i<5 do
begin
Write(i,’ ‘);
i:=i+1;
end;
Jika i bertipe integer dan program
dianggap benar, maka output dari potongan program di atas adalah…
- 1 2 3 4 c. i
i i i i e. Tidak ada
- 1 2 3 4 5 d. i
i i i output
30. Jika x=8, y=2,
z=10, maka ekspresi (x shl y)*z adalah…
- 20 c. 2 e. salah semua
- 320 d. 320
31. Suatu program
pascal dalam penulisannya setiap baris selalu diakhiri dengan tanda ….
a. . (titik) c. ,
(koma) e. : (titik dua)
b. ; (titik koma) d. “
(petik ganda)
32. Program latray;
Uses
crt;
Var
Hs,qty,hrg:array[1..5] of integer;
X,jd : integer;
Begin
Write(‘Jumlah Data = ‘);readln(jd);
For
x:=1 to jd do
Begin
Write(‘Harga Satuan =
‘);readln(hs[x]);
Write(‘Jumlah = ‘);readln(qty[x]);
Hrg[x]:=hs[x]*qty[x];
End;
Write(x,’ ‘,hs[x],qty[x],’
‘,hrg[x];readln;End.
Jika jd=3 berapa data yang akan
dicetak…
- 1 c. 3 e. Tidak ada
- 5 d. 4 output
33. Berikut ini
merupakan potongan dari suatu program pascal :
For
i:= ‘a’ to b do
Begin
For j:=’a’ to ’c’ do
Write(i,’ ‘);
Writeln;
end;
Jika i bertipe integer dan program
dianggap benar, maka output dari potongan program di atas adalah…
- a b c d. a a e. a a a
- a b b
b b
b b
- a b c
c
a b c
34. berikut ini
merupakan penulisan kepala judul yang benar…
- Program uastik2; d. Program
uas2tik
- Program 2uastik; e. salah
semua
- Program uas tik2;
35. Function
hasil(var A,B:integer):integer;
Begin
A:=A+B;
hasil:=A-B;
end;
var x,y : integer;
begin
readln(x);readln(y);writeln(hasil(x,y));
end.
Jika x=5 dan y=4, maka hasil = …
- 0 c. 4 e. salah semua
- 1 d. 5
36. Yang bukan
rumus y = a5 dalam Pascal
dapat diekspresikan sebagai berikut…
- y := sqr(a)*sqr(a)*a;
- y := sqr(a)*a*sqr(a);
- y := (a*a *a * a*a);
- y := a *a *a *sqr(a);
- y := sqr(a) * sqr(a);
37. Operator dalam
bahasa pemrograman Pascal yang digunakan untuk mendapatkan hasil bagi sebuah
bilangan bulat oleh bilangan bulat lain adalah …
- divide c. modulus e. salah semua
- div d. mod
38. Komentar
program akan diapit oleh…
- {… c. {…} e. (…)
- …} d. /…/
39. Function hasil(var A,B:integer):integer;
Begin
A:=A*B; hasil:=A+B;
end;
var
x,y : integer;=
begin
writeln(hasil(4,8));readln;
end.
Berapakah nilai hasil dari program
diatas…
- 12 c. 32 e. salah semua
- 35 d. 40
40. Nilai dari
trunc(sqrt(5 shl 2)/3) adalah …
a. 6 c. 4 e. 10
b. 7 d. 3
 |
 |
Selamat Mengerjakan
0 comments:
Post a Comment