|
Q.1)
|
Instruksi yang diberikan kepada
Komputer agar komputer dapat melaksanakan tugas-tugas tertentu adalah …
|
|
A.
|
A. Data
|
|
B.
|
B. Informasi
|
|
C.
|
C. Program
|
|
D.
|
D. Netter
|
|
E.
|
E. Programer
|
|
Q.2)
|
Dibawah ini yang bukan merupakan
bahasa pemrograman adalah ...
|
|
A.
|
A. Basic
|
|
B.
|
B. C++
|
|
C.
|
C. Fortran
|
|
D.
|
D. Pascal
|
|
E.
|
E. Ms. Word
|
|
Q.3)
|
Cara membuka menu File pada
program Pascal dapat dilakukan dengan menekan tombol keyboard ...
|
|
A.
|
A. Alt + F
|
|
B.
|
B. Alt + M
|
|
C.
|
C. Ctrl + F
|
|
D.
|
D. Ctrl + F9
|
|
E.
|
E. Alt + F9
|
|
Q.4)
|
Cara penulisan judul program pada
pascal yang benar adalah ...
|
|
A.
|
A. Program Volume Balok;
|
|
B.
|
B. Program Volume_Balok;
|
|
C.
|
C. Program_Volume_Balok;
|
|
D.
|
D. ProgramVolumeBalok;
|
|
E.
|
E. Prgram 1VolumeBalok;
|
|
Q.5)
|
Nilai X dalam rumus X:= 45-2*10;
|
|
A.
|
A. 430
|
|
B.
|
B. 340
|
|
C.
|
C. 52
|
|
D.
|
D. 25
|
|
E.
|
E. 23
|
|
Q.6)
|
Yang termasuk tipe data Numeric
adalah ..
|
|
A.
|
A. Integer
|
|
B.
|
B. Real
|
|
C.
|
C. String
|
|
D.
|
D. Jawaban A, B benar
|
|
E.
|
E. Semua jawaban salah
|
|
Q.7)
|
Dalam Pascal perintah untuk
melihat hasil program adalah
|
|
A.
|
A. Ctrl + F5
|
|
B.
|
B. Ctrl + F9
|
|
C.
|
C. Alt + F9
|
|
D.
|
D. Alt + F5
|
|
E.
|
E. Alt + D
|
|
Q.8)
|
Perintah untuk menjalankan program
dalam Pascal adalah …
|
|
A.
|
A. Ctrl + F5
|
|
B.
|
B. Ctrl + F9
|
|
C.
|
C. Alt + F9
|
|
D.
|
D. Alt + F5
|
|
E.
|
E. Alt + D
|
|
Q.9)
|
Bahasa Pascal termasuk
bahasa pemrograman tingkat …
|
|
A.
|
A. Rendah
|
|
B.
|
B. Menengah
|
|
C.
|
C. Tinggi
|
|
D.
|
D. Medium
|
|
E.
|
E.Expert
|
|
Q.10)
|
Untuk mendeklarasikan variabel
dalam bahasa Pascal digunakan kata ...
|
|
A.
|
A. Const
|
|
B.
|
B. Use
|
|
C.
|
C. Label
|
|
D.
|
D. Identifier
|
|
E.
|
E. Var
|
|
Q.11)
|
Prosedur atau formula untuk
menyelesaikan masalah yang berhubungan dengan pemrograman Komputer secara
umum dikenal dengan istilah ...
|
|
A.
|
A. Psedocode
|
|
B.
|
B. Algoritma
|
|
C.
|
C. Kiat
|
|
D.
|
D. Fundamental Step
|
|
E.
|
E. Taktik
|
|
Q.12)
|
Perintah yang digunakan untuk
mengawali blok program Pascal adalah …
|
|
A.
|
A. START
|
|
B.
|
B. MULAI
|
|
C.
|
C. BEGIN
|
|
D.
|
D. END.
|
|
E.
|
E. STOP
|
|
Q.13)
|
Perintah yang digunakan untuk
mengakhiri blok program Pascal adalah …
|
|
A.
|
A. START
|
|
B.
|
B. AKHIR
|
|
C.
|
C. BEGIN
|
|
D.
|
D. END;
|
|
E.
|
E. END.
|
|
Q.14)
|
Yang bukan termasuk Identifier
dibawah ini adalah ..
|
|
A.
|
A. Label
|
|
B.
|
B. Konstanta
|
|
C.
|
C. Type
|
|
D.
|
D. Deklarasi
|
|
E.
|
E. Var
|
|
Q.15)
|
Tipe bilangan bulat dalam bahasa
pemrograman Pascal dikenal sebagai ….
|
|
A.
|
A. Real
|
|
B.
|
B. Boolean
|
|
C.
|
C. Integer
|
|
D.
|
D. String
|
|
E.
|
E. Char
|
|
Q.16)
|
Bagian Input Output bila dipakai
setelah membaca data kursor akan tetap berada di samping data tersebut adalah
…
|
|
A.
|
A. Write
|
|
B.
|
B. Read
|
|
C.
|
C. ReadLn
|
|
D.
|
D. WriteLn
|
|
E.
|
E. Variabel
|
|
Q.17)
|
Bagian Input Output bila dipakai
setelah menulis data kursor akan pindah ke kolom 1 dari baris berikutnya
adalah …
|
|
A.
|
A. Write
|
|
B.
|
B. Read
|
|
C.
|
C. ReadLn
|
|
D.
|
D. WriteLn
|
|
E.
|
E. Varlabel
|
|
Q.18)
|
Perhatikan program dibawah
Program Menghitung_VolumeBalok;
Var
P,L,T,ISI,VOL : Integer; Begin
P:=35;
L:=20;
T:=15;
VOL:=P*L*T;
Writeln(ISI:8,VOL:8); End.
Bila program diatas dijalankan
hasilnya adalah ...
|
|
A.
|
A. 10500
|
|
B.
|
B. 0
|
|
C.
|
C. 0 , 10500
|
|
D.
|
D. 10500 , 0
|
|
E.
|
E. 15000 , 0
|
|
Q.19)
|
Program Hitung_1; Var
R,P:real;
Begin
Write(‘Masukkan
Jari-jari (cm):’);Readlan(R);
P:=pi*SQR(R);
Writeln(‘Hasil Program Adalah :’,P:10:2);
End. Program diatas adalah program
untuk menghitung…..
|
|
A.
|
A. Luas Tabung
|
|
B.
|
B. Volume Tabung
|
|
C.
|
C. Luas Lingkaran
|
|
D.
|
D. Keliling Lingkaran
|
|
E.
|
E. Keliling Persegi Panjang
|
|
Q.20)
|
Pada soal nomor 19, jika
dimasukkan jari-jari : 9 maka hasilnya adalah …..
|
|
A.
|
A. 9.42
|
|
B.
|
B. 28.27
|
|
C.
|
C. 78.54
|
|
D.
|
D. 254.34
|
|
E.
|
E . 425.43
|
|
Q.21)
|
Simbol dari assignment operator
adalah :
|
|
A.
|
A. ;
|
|
B.
|
B. :=
|
|
C.
|
C. :
|
|
D.
|
D. =
|
|
E.
|
E. { }
|
|
Q.22)
|
Manakah yang bukan merupakan
reserved word dalam Free Pascal ?
|
|
A.
|
A. Record
|
|
B.
|
B. Program
|
|
C.
|
C. In
C. In |
|
D.
|
D. Boolean
|
|
E.
|
E. And
|
|
Q.23)
|
Perhatikan potongan program
dibawah : write
(‘Selamat Belajar’); writeln (‘Pascal’);
write (‘Semoga Sukses’);
Dalam layar akan tampil :
|
|
A.
|
A. Selamat Belajar
Pascal Semoga Sukses |
|
B.
|
B. Selamat Belajar
Pascal Semoga Sukses |
|
C.
|
C. Selamat Belajar Pascal Semoga
Sukses
|
|
D.
|
D. Selamat Belajar
Pascal
Semoga Sukses |
|
E.
|
E. Selamat
Belajar Pascal Semoga Sukses |
|
Q.24)
|
Diantara ekspresi berikut yang
tidak menghasilkan nilai 5 adalah :
|
|
A.
|
A. 2 + 3/1
|
|
B.
|
B. 3 mod 2 +4
|
|
C.
|
C. 20*3 / 12
|
|
D.
|
D. 5/1 + 1
|
|
E.
|
E. 15/5 + 2
|
|
Q.25)
|
Cara anda mengetikkan input untuk
program berikut ini adalah ....
Var Umur, Tinggi, Berat : Real;
Begin Write(‘Masukkan umur,
tinggi, dan berat badan Anda: ‘);
Readln (Umur, Tinggi, Berat);
End.
|
|
A.
|
A. 16, 170, 61.5
|
|
B.
|
B. 16; 170; 61.5
|
|
C.
|
C. 16 170 61.5
|
|
D.
|
D. 16, 170; 61.5
|
|
E.
|
D. 16; 170; 16,5
|
|
Q.26)
|
Deklarasi konstanta berikut yang
salah adalah ....
|
|
A.
|
A. const rata-rata=10;
|
|
B.
|
B. const pi=22/7;
|
|
C.
|
C. const duaxtiga=8;
|
|
D.
|
D. const suhu=20000;
|
|
E.
|
E. const tinggibadan=150;
|
|
Q.27)
|
Dibawah ini yang tidak dapat
melakukan operasi aritmetika adalah.....
|
|
A.
|
A. Integer
|
|
B.
|
B. Byte
|
|
C.
|
C. Real
|
|
D.
|
D. Boolean
|
|
E.
|
E. Word
|
|
Q.28)
|
Var r ; real;
Begin
r:=147.0;
writeLn (
r:0:5 ); End.
Tampilan program di atas adalah
...
|
|
A.
|
A. 00147
|
|
B.
|
B. 0147.0
|
|
C.
|
C. 147.000
|
|
D.
|
D. 147.0000
|
|
E.
|
E. 147.00000
|
|
Q.29)
|
Var i, j;byte;
begin i:=100; j:=200; writeLn ( i*j ); End. Tampilan program di atas adalah ... |
|
A.
|
A. 100
|
|
B.
|
B. 20000
|
|
C.
|
C. 300
|
|
D.
|
E. 30000
|
|
E.
|
D. 200
|
|
Q.30)
|
Deklarasi konstanta yang tidak
dapat diterima adalah ....
|
|
A.
|
x1=2.7182818
|
|
B.
|
a=2
|
|
C.
|
c='4'
|
|
D.
|
s='konstanta string'
|
|
E.
|
ls=sizeof(longint)
|
Petunjuk Umum:
1. Kerjakan soal pilihan ganda di lembar jawab ujian (LJU) pilihan ganda.
2. Nilai yang kurang dari 70 dianggap Herr.
3. Bagi yang Herr, dapat mengulang Minggu depan.
Soal Pilihan Ganda
Pilihlah salah satu jawaban yang paling tepat dengan memberi tanda silang (A/B/C/D/E) pada lembar jawab yang telah disediakan ! Skor masksimal pilihan ganda = 50.
1. Berikut ini merupakan penulisan kepala program yang benar ....
A. Program UAS-TIK;
B. Program UAS_TIK
C. Program 2UAS_TIK;
D. Program UAS_TIK;
E. Program UAS TIK;
2. Berikut ini penulisan deklarasi variabel yang benar, kecuali ....
A. var alas, tinggi: real;
B. Var uang, upah, total: integer
C. Var uang, upah: integer;
total: real; i: integer;
D. Var Alas, Tinggi: real;
E. Var uang, upah: integer;
Var total: real;
3. Hasil ekspresi 6*5/10*2+10 adalah ....
A. 16
B. 17
C. 14
D. 15
E. 15.5
4. Berikut ini yang bukan merupakan tipe integer ....
A. Word
B. Byte
C. Shortint
D. Real
E. Longint
5. Jika x = 4, y = 6, w = 8, z = 10, maka ekspresi (x*y+w)/z+x akan menghasilkan nilai ....
A. 7.2
B. 8.8
C. 5.2
D. 9.2
E. 8.2
6. Interval tipe data byte adalah ....
A. 0 s.d. 256
B. -255 s.d 255
C. 0 s.d. 32.767
D. 0 s.d. 32.768
E. 0 s.d 255
7. Berapakah jangkauan tipe data word.....
A. 0...65536
B. 0...255
C. 0...25535
D. -32768...32767
E. Salah semua
8. Nilai dari 1000 MOD 360 adalah ... .
A. 250
B. 260
C. 270
D. 280
E. 290
9. Operator dalam bahasa pemrograman Pascal yang digunakan untuk mendapatkan hasil bagi sebuah bilangan bulat oleh bilangan bulat lain adalah ...
A. MODULUS
B. DIV
C. DIVIDE
D. MOD
E. REST
10. Jika program dianggap benar dan lengkap, maka output dari pernyataan:
Writeln(‘Ujian Akhir TIK’);
Write(‘Kelas X’);Write(‘Semester I’);
Writeln(‘Mudah dan Menyenangkan’);
adalah ....
A. Ujian Akhir TIK Kelas X
Semester I
Mudah dan Menyenangkan
B. Ujian Akhir TIK
Kelas XSemester I
Mudah dan Menyenangkan
C. Ujian Akhir TIK
Kelas X Semester I
Mudah dan Menyenangkan
D. Ujian Akhir TIK
Kelas X Semester IMudah dan Menyenangkan
E. Ujian Akhir TIK
Kelas XSemester IMudah dan Menyenangkan
11. Hasil dari (17 DIV 3) * (28 MOD 3) adalah ....
A. 0
B. 1
C. 5
D. 6
E. 18
12. Berikut ini adalah konstanta integer ....
A. -32768
B. 32768
C. 255
D. -32769
E. 256
13. Gambar belah ketupat dalam flow chart digunakan untuk ....
A. Keputusan
B. Selesai
C. Input
D. Output
E. Mulai
14. Tipe data manakah yang dapat memuat bilangan pecahan :
A. Bolean
B. Integer
C. Real
D. LongInt
E. Byte
15. Berikut ini yang termasuk pernyataan perulangan dalam Pascal ....
A. if dan case
B. repeat, for
C. while
D. for
E. for, while dan repeat
16. Berikut ini merupakan potongan dari suatu program Pascal:
x:=2; y:=6; z:=10;
if z > y then
if y > x then
if x < z then
writeln(x)
else writeln(y)
else writeln(z);
Jika x, y dan z bertipe integer dan program dianggap benar, maka output dari potongan program di atas adalah ....
A. 2
B. 6
C. 10
D. 120
E. Tidak ada output
17. Berikut ini penulisan pernyataan if yang benar, kecuali ... .
A. if nilai < 70 then;
writeln(‘Tidak Tuntas’);
B. if nilai < 70 then
writeln(‘Tidak Tuntas’)
else writeln(‘Tuntas’);
C. if nilai < 70 then
begin
writeln(‘Tidak Tuntas’)
end;
D. if nilai < 70 then
begin
writeln(‘Tidak Tuntas’);
end.
E. if nilai < 70 then;
writeln(‘Tidak Tuntas’);
else writeln(‘Tuntas’);
18. Berikut ini potongan program dalam Pascal yang akan menghasilkan output: 4 3 2 1
A. for i:=4 to 1 do writeln(‘i’,’ ‘);
B. for i:=4 to 1 do writeln(i, ‘ ‘);
C. for i:=4 to downto 1 writeln(i,’ ‘);
D. for i:=4 to 1 down to 1 write(‘i’,’ ‘);
E. for i:=4 to 1 down to 1 write(i,’ ‘);
19. Diantara ekspresi berikut, yang tidak akan menghasilkan nilai 5 adalah ....
A. 2+3/1
B. 3 mod 2 + 4
C. 20*3/12
D. 15/5+2
E. 5/1+1
20. Variabel x=‘KARIMUN’, dalam Pascal dimasukkan dalam tipe data .... .
A. Char
B. Longint
C. Integer
D. String
E. Real
21. Berikut ini merupakan potongan dari suatu program Pascal:
x:=4; y:=5; z:=6;
if z > y then
if y > x then
if x > z then
writeln(z)
else writeln(y)
else writeln(x);
Jika x, y dan z bertipe integer dan program dianggap benar, maka output dari potongan program di atasadalah ....
A. 4
B. 5
C. 6
D. 20
E. Tidak ada output
22. Perintah gotoxy(14,15) artinya kursor akan menuju ke .....
A. baris 14 kolom 15
B. kolom 15 baris 18
C. baris 13 kolom 16
D. kolom 16 baris 13
E. kolom 12 baris 14
23. 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 ....
A. 1 2 3 4 5
B. 2 3 4
C. i i i i
D. i i i i i
E. Tidak ada output
24. 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 ....
A. 4 3 2
B. 3
C. 2 3 4
D. i i i
E. Tidak ada output
25. Berikut ini merupakan potongan dari suatu program Pascal:
for i:=3 to 9 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 ....
A. 3
B. 6
C. 3 6 9
D. 3 6
E. 9 6 3
26. Berikut ini merupakan potongan dari suatu program Pascal:
i:=4;
while i < 0 do
begin
write(i,’ ‘);
i:=i-1;
end;
Jika i bertipe integer dan program dianggap benar, maka output dari potongan program di atas adalah ....
A. 4 3 2 1
B. 1 2 3 4
C. 3 2
D. Tidak ada output
E. Terjadi perulangan terus menerus
27. Berikut ini merupakan potongan dari suatu program Pascal:
i:=6;
repeat
write(i,’ ‘);
i:=i-1;
until i<2;
Jika i bertipe integer dan program dianggap benar, maka output dari potongan program di atas adalah ....
A. 1 2 3 4 5 6
B. 2 3 4 5 6
C. 6 5 4 3 2 1
D. 6 5 4 3 2
E. i i i i i i
28. Berikut ini merupakan potongan dari suatu program Pascal:
for i:=1 to 3 do
begin
for j:=1 to 5 do
write(‘*’);
writeln;
end;
Jika i dan j bertipe integer dan program dianggap benar, maka output dari potongan program di atas adalah ....
A. * * *
B. * * * * *
C. * * *
* * * * *
D. * * *
* * *
* * *
* * *
* * *
E. * * * * *
* * * * *
* * * * *
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 ....
A. 1 2 3 4
B. i i i i i
C. i i i i D. 1 2 3 4 5
E. Tidak ada output
30. Berikut ini merupakan potongan dari suatu program Pascal:
i:=4;
repeat
write(i,’ ‘);
i:=i-1;
until i < 4;
Jika i bertipe integer dan program dianggap benar, maka output dari potongan program di atas adalah ....
A. 4
B. 1 2
C. 4 3 2 1
D. Tidak ada output
E. Terjadi perulangan terus menerus
Untuk soal 31 – 32
FUNCTION fak (x, y: integer) : Integer;
BEGIN
if y:= 0 then fak := 1
else
fak := x * fak (x, y-1);
END;
Writeln (fak(5, 3));
31. Apa hasil dari program di atas!
A. 36
B. 125
C. 128
D. 360
E. 512
32. Jika writeln (fak(5,3)) diganti menjadi writeln (fak(4,5)), hasil dimunculkan adalah…
A. 360
B. 512
C. 180
D. 64
E. 1024
33. Manakah yang salah dari deklarasi dibawah ini
A. Function info(a:byte):real;
B. Function info:byte;
C. Function info(a,b:byte) : real;
D. Function info(a: real; b:integer):real;
E. Function info(a:real);
Potongan program dibawah untuk soal 34 - 35
c := 0
d := 0
while (a>b) do
begin
a := a – b;
c := c + 1;
d := d + b;
end;
write(c,’,',d);
34. Jika nilai a = 15, b = 4 maka keluaran dari program diatas adalah..
A. 3 , 12
B. 1 , 4
C. 0 , 0
D. 6 , 23
E. 2 , 8
35. Jika nilai a = 34, b = 11 maka keluaran dari program diatas adalah..
A. 13 , 12
B. 21 , 4
C. 0 , 0
D. 3 , 33
E. 2 , 2
Untuk soal 36 - 37
y := 10;
x := 0;
for i := 0 to y-1 do
begin
x:=x+ 2 * i;
end;
Writeln (x);
36. Berapakah output dari program diatas?
A. 112
B. 110
C. 90
D. 72
E. 45
37. Jika baris kelima (x :=x + 2 * i) diganti dengan x := x + i Berapakah output program tersebut?
A. 54
B. 64
C. 752
D. 172
E. 45
Ada 5 rumah dalam 1 baris dari timur ke barat. Tiap rumah berbeda warnanya, di huni 5 orang yang berbeda dengan peliharaan, makanan favorit, dan minuman favorit yang berbeda.
• Yang tinggal di rumah kuning suka mie ayam.
• Susu diminum di rumah tengah.
• Nami tinggal di rumah paling barat.
• Yang suka soto tinggal di samping rumah yang memelihara rubah.
• Yang makan nasi padang suka minum jus jeruk.
• Joni suka makan tongseng.
• Nami tinggal di sebelah rumah warna biru.
• Ekas tinggal di rumah merah.
• Mie ayam dimakan dirumah yang memelihara kuda.
• Udin sedang minum teh.
• Rumah hijau berada di timur dan di samping rumah ungu.
• Yeng suka nasi goreng memelihara siput.
• Sandi memelihara anjing.
• Kopi di minum dirumah hijau.
38. Siapa yang suka minum air mineral ?
A. Udin
B. Joni
C. Nami
D. Sandi
E. Ekas
39. Siapa yang senang minum jus jeruk?
A. Udin
B. Joni
C. Nami
D. Sandi
E. Ekas
40. Siapa yang memelihara Zebra ?
A. Udin
B. Sandi
C. Nami
D. Joni
E. Ekas
1. Kerjakan soal pilihan ganda di lembar jawab ujian (LJU) pilihan ganda.
2. Nilai yang kurang dari 70 dianggap Herr.
3. Bagi yang Herr, dapat mengulang Minggu depan.
Soal Pilihan Ganda
Pilihlah salah satu jawaban yang paling tepat dengan memberi tanda silang (A/B/C/D/E) pada lembar jawab yang telah disediakan ! Skor masksimal pilihan ganda = 50.
1. Berikut ini merupakan penulisan kepala program yang benar ....
A. Program UAS-TIK;
B. Program UAS_TIK
C. Program 2UAS_TIK;
D. Program UAS_TIK;
E. Program UAS TIK;
2. Berikut ini penulisan deklarasi variabel yang benar, kecuali ....
A. var alas, tinggi: real;
B. Var uang, upah, total: integer
C. Var uang, upah: integer;
total: real; i: integer;
D. Var Alas, Tinggi: real;
E. Var uang, upah: integer;
Var total: real;
3. Hasil ekspresi 6*5/10*2+10 adalah ....
A. 16
B. 17
C. 14
D. 15
E. 15.5
4. Berikut ini yang bukan merupakan tipe integer ....
A. Word
B. Byte
C. Shortint
D. Real
E. Longint
5. Jika x = 4, y = 6, w = 8, z = 10, maka ekspresi (x*y+w)/z+x akan menghasilkan nilai ....
A. 7.2
B. 8.8
C. 5.2
D. 9.2
E. 8.2
6. Interval tipe data byte adalah ....
A. 0 s.d. 256
B. -255 s.d 255
C. 0 s.d. 32.767
D. 0 s.d. 32.768
E. 0 s.d 255
7. Berapakah jangkauan tipe data word.....
A. 0...65536
B. 0...255
C. 0...25535
D. -32768...32767
E. Salah semua
8. Nilai dari 1000 MOD 360 adalah ... .
A. 250
B. 260
C. 270
D. 280
E. 290
9. Operator dalam bahasa pemrograman Pascal yang digunakan untuk mendapatkan hasil bagi sebuah bilangan bulat oleh bilangan bulat lain adalah ...
A. MODULUS
B. DIV
C. DIVIDE
D. MOD
E. REST
10. Jika program dianggap benar dan lengkap, maka output dari pernyataan:
Writeln(‘Ujian Akhir TIK’);
Write(‘Kelas X’);Write(‘Semester I’);
Writeln(‘Mudah dan Menyenangkan’);
adalah ....
A. Ujian Akhir TIK Kelas X
Semester I
Mudah dan Menyenangkan
B. Ujian Akhir TIK
Kelas XSemester I
Mudah dan Menyenangkan
C. Ujian Akhir TIK
Kelas X Semester I
Mudah dan Menyenangkan
D. Ujian Akhir TIK
Kelas X Semester IMudah dan Menyenangkan
E. Ujian Akhir TIK
Kelas XSemester IMudah dan Menyenangkan
11. Hasil dari (17 DIV 3) * (28 MOD 3) adalah ....
A. 0
B. 1
C. 5
D. 6
E. 18
12. Berikut ini adalah konstanta integer ....
A. -32768
B. 32768
C. 255
D. -32769
E. 256
13. Gambar belah ketupat dalam flow chart digunakan untuk ....
A. Keputusan
B. Selesai
C. Input
D. Output
E. Mulai
14. Tipe data manakah yang dapat memuat bilangan pecahan :
A. Bolean
B. Integer
C. Real
D. LongInt
E. Byte
15. Berikut ini yang termasuk pernyataan perulangan dalam Pascal ....
A. if dan case
B. repeat, for
C. while
D. for
E. for, while dan repeat
16. Berikut ini merupakan potongan dari suatu program Pascal:
x:=2; y:=6; z:=10;
if z > y then
if y > x then
if x < z then
writeln(x)
else writeln(y)
else writeln(z);
Jika x, y dan z bertipe integer dan program dianggap benar, maka output dari potongan program di atas adalah ....
A. 2
B. 6
C. 10
D. 120
E. Tidak ada output
17. Berikut ini penulisan pernyataan if yang benar, kecuali ... .
A. if nilai < 70 then;
writeln(‘Tidak Tuntas’);
B. if nilai < 70 then
writeln(‘Tidak Tuntas’)
else writeln(‘Tuntas’);
C. if nilai < 70 then
begin
writeln(‘Tidak Tuntas’)
end;
D. if nilai < 70 then
begin
writeln(‘Tidak Tuntas’);
end.
E. if nilai < 70 then;
writeln(‘Tidak Tuntas’);
else writeln(‘Tuntas’);
18. Berikut ini potongan program dalam Pascal yang akan menghasilkan output: 4 3 2 1
A. for i:=4 to 1 do writeln(‘i’,’ ‘);
B. for i:=4 to 1 do writeln(i, ‘ ‘);
C. for i:=4 to downto 1 writeln(i,’ ‘);
D. for i:=4 to 1 down to 1 write(‘i’,’ ‘);
E. for i:=4 to 1 down to 1 write(i,’ ‘);
19. Diantara ekspresi berikut, yang tidak akan menghasilkan nilai 5 adalah ....
A. 2+3/1
B. 3 mod 2 + 4
C. 20*3/12
D. 15/5+2
E. 5/1+1
20. Variabel x=‘KARIMUN’, dalam Pascal dimasukkan dalam tipe data .... .
A. Char
B. Longint
C. Integer
D. String
E. Real
21. Berikut ini merupakan potongan dari suatu program Pascal:
x:=4; y:=5; z:=6;
if z > y then
if y > x then
if x > z then
writeln(z)
else writeln(y)
else writeln(x);
Jika x, y dan z bertipe integer dan program dianggap benar, maka output dari potongan program di atasadalah ....
A. 4
B. 5
C. 6
D. 20
E. Tidak ada output
22. Perintah gotoxy(14,15) artinya kursor akan menuju ke .....
A. baris 14 kolom 15
B. kolom 15 baris 18
C. baris 13 kolom 16
D. kolom 16 baris 13
E. kolom 12 baris 14
23. 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 ....
A. 1 2 3 4 5
B. 2 3 4
C. i i i i
D. i i i i i
E. Tidak ada output
24. 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 ....
A. 4 3 2
B. 3
C. 2 3 4
D. i i i
E. Tidak ada output
25. Berikut ini merupakan potongan dari suatu program Pascal:
for i:=3 to 9 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 ....
A. 3
B. 6
C. 3 6 9
D. 3 6
E. 9 6 3
26. Berikut ini merupakan potongan dari suatu program Pascal:
i:=4;
while i < 0 do
begin
write(i,’ ‘);
i:=i-1;
end;
Jika i bertipe integer dan program dianggap benar, maka output dari potongan program di atas adalah ....
A. 4 3 2 1
B. 1 2 3 4
C. 3 2
D. Tidak ada output
E. Terjadi perulangan terus menerus
27. Berikut ini merupakan potongan dari suatu program Pascal:
i:=6;
repeat
write(i,’ ‘);
i:=i-1;
until i<2;
Jika i bertipe integer dan program dianggap benar, maka output dari potongan program di atas adalah ....
A. 1 2 3 4 5 6
B. 2 3 4 5 6
C. 6 5 4 3 2 1
D. 6 5 4 3 2
E. i i i i i i
28. Berikut ini merupakan potongan dari suatu program Pascal:
for i:=1 to 3 do
begin
for j:=1 to 5 do
write(‘*’);
writeln;
end;
Jika i dan j bertipe integer dan program dianggap benar, maka output dari potongan program di atas adalah ....
A. * * *
B. * * * * *
C. * * *
* * * * *
D. * * *
* * *
* * *
* * *
* * *
E. * * * * *
* * * * *
* * * * *
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 ....
A. 1 2 3 4
B. i i i i i
C. i i i i D. 1 2 3 4 5
E. Tidak ada output
30. Berikut ini merupakan potongan dari suatu program Pascal:
i:=4;
repeat
write(i,’ ‘);
i:=i-1;
until i < 4;
Jika i bertipe integer dan program dianggap benar, maka output dari potongan program di atas adalah ....
A. 4
B. 1 2
C. 4 3 2 1
D. Tidak ada output
E. Terjadi perulangan terus menerus
Untuk soal 31 – 32
FUNCTION fak (x, y: integer) : Integer;
BEGIN
if y:= 0 then fak := 1
else
fak := x * fak (x, y-1);
END;
Writeln (fak(5, 3));
31. Apa hasil dari program di atas!
A. 36
B. 125
C. 128
D. 360
E. 512
32. Jika writeln (fak(5,3)) diganti menjadi writeln (fak(4,5)), hasil dimunculkan adalah…
A. 360
B. 512
C. 180
D. 64
E. 1024
33. Manakah yang salah dari deklarasi dibawah ini
A. Function info(a:byte):real;
B. Function info:byte;
C. Function info(a,b:byte) : real;
D. Function info(a: real; b:integer):real;
E. Function info(a:real);
Potongan program dibawah untuk soal 34 - 35
c := 0
d := 0
while (a>b) do
begin
a := a – b;
c := c + 1;
d := d + b;
end;
write(c,’,',d);
34. Jika nilai a = 15, b = 4 maka keluaran dari program diatas adalah..
A. 3 , 12
B. 1 , 4
C. 0 , 0
D. 6 , 23
E. 2 , 8
35. Jika nilai a = 34, b = 11 maka keluaran dari program diatas adalah..
A. 13 , 12
B. 21 , 4
C. 0 , 0
D. 3 , 33
E. 2 , 2
Untuk soal 36 - 37
y := 10;
x := 0;
for i := 0 to y-1 do
begin
x:=x+ 2 * i;
end;
Writeln (x);
36. Berapakah output dari program diatas?
A. 112
B. 110
C. 90
D. 72
E. 45
37. Jika baris kelima (x :=x + 2 * i) diganti dengan x := x + i Berapakah output program tersebut?
A. 54
B. 64
C. 752
D. 172
E. 45
Ada 5 rumah dalam 1 baris dari timur ke barat. Tiap rumah berbeda warnanya, di huni 5 orang yang berbeda dengan peliharaan, makanan favorit, dan minuman favorit yang berbeda.
• Yang tinggal di rumah kuning suka mie ayam.
• Susu diminum di rumah tengah.
• Nami tinggal di rumah paling barat.
• Yang suka soto tinggal di samping rumah yang memelihara rubah.
• Yang makan nasi padang suka minum jus jeruk.
• Joni suka makan tongseng.
• Nami tinggal di sebelah rumah warna biru.
• Ekas tinggal di rumah merah.
• Mie ayam dimakan dirumah yang memelihara kuda.
• Udin sedang minum teh.
• Rumah hijau berada di timur dan di samping rumah ungu.
• Yeng suka nasi goreng memelihara siput.
• Sandi memelihara anjing.
• Kopi di minum dirumah hijau.
38. Siapa yang suka minum air mineral ?
A. Udin
B. Joni
C. Nami
D. Sandi
E. Ekas
39. Siapa yang senang minum jus jeruk?
A. Udin
B. Joni
C. Nami
D. Sandi
E. Ekas
40. Siapa yang memelihara Zebra ?
A. Udin
B. Sandi
C. Nami
D. Joni
E. Ekas
jawaban mana eee
BalasHapus