UJIAN SEMESTER 2

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