ºÝºÝߣ

ºÝºÝߣShare a Scribd company logo

Soalprogdasx

•
•
Musanif Efendi
Musanif Efendi

Dokumen tersebut berisi soal ujian akhir semester ganjil mata pelajaran Pemrograman Dasar kelas XI TKJ/RPL SMK Negeri 1 Pandeglang tahun pelajaran 2014/2015. Soal terdiri dari 40 pertanyaan pilihan ganda yang meliputi materi operator aritmatika, logika, array, string, konversi tipe data, pointer, dan penalaran logis.

1 of 4
Download to read offline
PEMERINTAH KABUPATEN PANDEGLANG DINAS PENDIDIKAN SMK NEGERI 1 PANDEGLANG Jl. Raya Labuan Km.5 Kadulisung Telp. (0253) 201012 Fax: 203441 Pandeglang Website: www.smkn1pandeglang.sch.id. E-mail: smkn1pandeglang@yahoo.co.id ULANGAN AKHIR SEMESTER GANJIL KELAS : XI TKJ/ RPL MATA PELAJARAN : PEMROGRAMAN DASAR TAHUN PELAJARAN : 2014/2015 Pilihlah satu jawaban yang paling benar! 1. Yang tidak termasuk operator aritmatika pada Delphi adalah… a. * d. - b. / e. ^ c. + 2. Hasil dari 34 / 2 + 3 * 4 ^ 2 adalah... a. 6500 d. 161 b. 6400 e. 65 c. 650 3. Operator logika untuk ‘tidak sama dengan’ pada Delphi adalah... a. > d. > = b. < e. < = c. < > 4. Pernyataan yang benar pada contoh operasi logika berikut adalah... a. 12 * 2 + 5 * 3 > 24 / 2 + 30 / 2 //False b. 5 ^ 2 / 5 + 15 < 8 + 7 * 2 – 5 //True c. 40 * 2 + 5 * 2 ^ 2 = 100 //True d. 25 * 2 / 5 + 4 – 6 > 8 //False e. 16 < 2 + 3 * 4 – 5 //True 5. Kumpulan data bertipe sama yang menggunakan nama yang sama adalah pengertian dari... a. Constanta d. Procedure b. Variable e. Function c. Array 6. Array yang elemennya akan diakses melalui banyak indeks atau subskrip adalah... a. Array 1 dimensi d. Array statis b. Array 2 dimensi e. Array dinamis c. Array multidimensi 7. Model pendeklarasian Array dimana tipe data yang digunakan mempunyai nilai yang tetap adalah... a. Array 1 dimensi d. Array statis b. Array 2 dimensi e. Array dinamis c. Array multidimensi 8. var nilai: array of Real; //adalah contoh deklarasi... a. Array 1 dimensi d. Array statis b. Array 2 dimensi e. Array dinamis c. Array multidimensi 9. Var nama: array[1..3] of string; //adalah contoh deklarasi... a. Array 1 dimensi d. Array statis b. Array 2 dimensi e. Array dinamis c. Array multidimensi 10. Var harga: array[1..5,1..8] of integer; //adalah contoh deklarasi... a. Array 1 dimensi d. Array statis b. Array 2 dimensi e. Array dinamis c. Array multidimensi 11. Tipe data yang menangani semua jenis karakter mulai dari huruf, angka dan tanda baca adalah... a. String d. Boolean b. Integer e. Float c. Real 12. Tipe data yang hanya mengenali nilai True dan False adalah... a. String d. Boolean b. Integer e. Float c. Real
13. Yang tidak termasuk operasi string adalah... a. Contac d. Insert b. Copy e. Length c. Delete 14. Operasistring yang menghasilkan sebuah substring dari suatu string adalah... a. Contac d. Insert b. Copy e. Length c. Delete 15. Operasistring yang menghapus substring dari suatu string adalah... a. Contac d. Insert b. Copy e. Length c. Delete 16. Operasistring yang menghitung jumlah karakter dalam suatu string adalah... a. Contac d. Insert b. Copy e. Length c. Delete 17. Operasistring yang menyisipkan string dalam suatu string yang lain adalah... a. Contac d. Insert b. Copy e. Length c. Delete 18. Hasil dari : edit1.text := concat(‘SMK’,’N’,’1’,’ Pandeglang’); adalah... a. SMKN1 Pandeglang d. SMKN 1Pandeglang b. SMKN 1 Pandeglang e. S M K N 1 Pandeglang c. SMK N 1 Pandeglang 19. Hasil dari potongan program berikut adalah... Var S:string; Begin S:= ‘Hanacaraka Datasawala’; Edit1.text:=copy(S,7,9); End; a. rak data d. Hanacar b. raka data e. Hanacarak c. raka datas 20. Hasil dari potongan program berikut adalah... Var S:string; Begin S:= ‘Hanacaraka Datasawala’; Delete(S,7,9); Edit1.text:=S; End; a. Hanaca sawala d. aka Datasawala b. Hanacasawala e. a Datasawala c. Hanacaawala 21. Hasil dari potongan program berikut adalah... Var S:string; Begin S:= ‘SISTEM INFORMASI’; Insert(‘KOMUNIKASI’,S,7); Edit1.text:=S; End; a. SISTEM KOMUNIKASI INFORMASI b. SISTEMKOMUNIKASI INFORMASI c. SISTEMKOMUNIKASIINFORMASI d. SISTEM KOMUNIKASI DAN INFORMASI e. SISTEM INFORMASI KOMUNIKASI 22. Hasil dari potongan program berikut adalah... Var S:string; T:integer; Begin S:=‘ Kemenkominfo (Kementrian Telekomunikasi dan Informasi).’; T:=Length(S); Edit1.text:=inttostr(T); End; a. 56 d. 49 b. 55 e. 48 c. 51
23. Hasil dari potongan program berikut adalah... Var S:string; Begin S:= ‘SISTEM KOMUNIKASI DAN INFORMASI’; Edit1.text:=Lowercase(S); End; a. SISTEM KOMUNIKASI DAN INFORMASI b. sistem komunikasi dan informasi c. sISTEM kOMUNIKASI dAN iNFORMASI d. Sistem Komunikasi Dan Informasi e. Sistem komunikasi dan informasi 24. Hasil dari potongan program berikut adalah... Var S:string; Begin S:= ‘SISTEM KOMUNIKASI DAN INFORMASI’; Edit1.text:=Uppercase(S); End; a. SISTEM KOMUNIKASI DAN INFORMASI b. sistem komunikasi dan informasi c. sISTEM kOMUNIKASI dAN iNFORMASI d. Sistem Komunikasi Dan Informasi e. Sistem komunikasi dan informasi 25. Jika: Var X:String; dan nilai X diambil dari Edit1 maka penulisan yang tepat adalah... a. X:=Edit1.Text; d. X:=StrToFloat(Edit1.Text); b. X:=StrToStr(Edit1.Text); e. Edit1.Text:=FloatToStr(X); c. X:=StrToInt(Edit1.Text); 26. Jika: Var X:Integer; dan nilai X diambil dari Edit1 maka penulisan yang tepat adalah... a. X:=Edit1.Text; d. X:=StrToFloat(Edit1.Text); b. X:=StrToStr(Edit1.Text); e. Edit1.Text:=FloatToStr(X); c. X:=StrToInt(Edit1.Text); 27. Jika: Var X:Real; dan nilai X diambil dari Edit1 maka penulisan yang tepat adalah... a. X:=Edit1.Text; d. X:=StrToFloat(Edit1.Text); b. X:=StrToStr(Edit1.Text); e. X:=StrToReal(Edit1.Text); c. X:=StrToInt(Edit1.Text); 28. Perhatikan potongan program berikut: Var A,B,X:Real; Begin A:=StrToFloat(Edit1.Text); B:=StrToFloat(Edit2.Text); X:= ( A * B ) / 2 ; .... End; Untuk menampilkan hasil dari X pada Edit3 , koding pada titik-titik di atas yang benar adalah... a. Edit3.Text:=FloatToStr(X); d. Edit3.Text:=IntToStr(X); b. Edit3.Text:=RealToStr(X); e. Edit3.Text:=StrToInt(X); c. Edit3.Text:=StrToFloat(X); 29. Perhatikan potongan program berikut; Var JL,TH:integer; Status:string; begin Status:=combobox1.Text; JL:=strtoint(edit1.Text); if status='Langganan' then begin TH := JL * 75 ; edit2.Text:=inttostr(TH); end else begin if JL > 100 then begin TH := JL * 85 ; edit2.Text:=inttostr(TH); end else begin TH := JL * 100 ; edit2.Text:=inttostr(TH); end; end; end; Jika diinputkan Status: ‘Bukan langganan’ dan Jumlah Lembar (JL) yang difotokopi sebanyak 100 lembar, maka besar output: Jumlah Harga (TH) adalah... a. Rp 7.500 d. Rp 10.000 b. Rp 8.500 e. Rp 11.000 c. Rp 9.000 30. Kesalahan pada potongan program berikut adalah... Var P,L,T,V : Real; begin P := strtofloat(edit1.Text); //a. L := strtofloat(edit2.Text); //b.
t := strtofloat(edit3.Text); //c. v := P * L * t ; //d. edit4.Text := floatostr(V); //e. end; 31. Pada Delphi7, jika saat di-Run muncul pesan kesalahan: [Error] Unit1.pas(50): Missing operator or semicolon kesalahan pada listing code adalah... a. Kurang titik koma [ ; ] b. Kurang titik [ . ] c. Kurang tanda kurung [ ( ) ] d. Nama variabel tidak dikenali e. Tipe data yang di-input-kan pada saat program di-Run tidak sesuaidengan tipe data pada deklarasi variabel 32. Suatu variabel yang berisi alamat memori dari suatu variabel lain disebut... a. Array d. Function b. Pointer e. Atribut c. Procedure 33. Yang tidak termasuk tipe pointer pada Delphi adalah... a. PAnsiChar d. PDateTime b. PAnsiString e. Mouse c. PExtended 34. Pointer yang menunjuk ke alamat data bertipe tanggal dan waktu adalah... a. PAnsiChar d. PDateTime b. PAnsiString e. Mouse c. PExtended 35. Operator pointer yang digunakan untuk memeriksa apakah dua variabel pointer menunjuk alamat yang sama atau tidak adalah... a. ^ c. < > b. = d. @ 36. Perhatikan hitungan berikut : 1 + 5 = 12 a. 40 2 + 10 = 24 b. 45 3 + 15 = 36 c. 50 Maka : d. 55 5 + 25 = ? e. 60 37. Jika : 55 + 11 = 67 a. 65 44 + 22 = 68 b. 67 33 + 33 = 69 c. 69 Maka : d. 71 11 + 55 = ? e. 72 38. Pahami : 1 + 7 = 8 a. 8 2 + 6 = 14 b. 15 3 + 5 = 18 c. 16 4 + 4 = 20 d. 18 5 + 3 = ? e. 20 39. Ada seorang anak kecil yang ingin masuk ke ruang kerja ayahnya, tetapi hanya ayah dan ibunya yang tau password dari pintu otomatis ke ruangan tersebut. Suatu hari ia bersembunyi di balik tirai dan diam-diam memperhatikan ketika ayahnya masuk ke ruang kerja. Di layar pintu terlihat ‘TWELVE’ dan sang ayah menekan angka ‘6’. Pintu pun terbuka. Tidak lama si ibu datang ke ruang kerja ayah. Di layar pintu terlihat ‘SIX’ dan si ibu memasukkan angka ‘3’. Setelah dirasa aman, si anak kemudian menghampiri layar pintu, yang kemudian bertuliskan ‘EIGHT’, si anak memasukkan angka ‘4’ tapi pintu tidak terbuka karena jawabannya salah. Apakah jawaban yang benar? a. 5 b. 6 c. 7 d. 8 e. 9 40. Ingat-ingat : a = 2 e = 10 i = 18 o = 30 u = ? a. 21 b. 28 c. 35 d. 42 e. 49 Selamat mengerjakan...

More Related Content

Soalprogdasx

  • 1. PEMERINTAH KABUPATEN PANDEGLANG DINAS PENDIDIKAN SMK NEGERI 1 PANDEGLANG Jl. Raya Labuan Km.5 Kadulisung Telp. (0253) 201012 Fax: 203441 Pandeglang Website: www.smkn1pandeglang.sch.id. E-mail: smkn1pandeglang@yahoo.co.id ULANGAN AKHIR SEMESTER GANJIL KELAS : XI TKJ/ RPL MATA PELAJARAN : PEMROGRAMAN DASAR TAHUN PELAJARAN : 2014/2015 Pilihlah satu jawaban yang paling benar! 1. Yang tidak termasuk operator aritmatika pada Delphi adalah… a. * d. - b. / e. ^ c. + 2. Hasil dari 34 / 2 + 3 * 4 ^ 2 adalah... a. 6500 d. 161 b. 6400 e. 65 c. 650 3. Operator logika untuk ‘tidak sama dengan’ pada Delphi adalah... a. > d. > = b. < e. < = c. < > 4. Pernyataan yang benar pada contoh operasi logika berikut adalah... a. 12 * 2 + 5 * 3 > 24 / 2 + 30 / 2 //False b. 5 ^ 2 / 5 + 15 < 8 + 7 * 2 – 5 //True c. 40 * 2 + 5 * 2 ^ 2 = 100 //True d. 25 * 2 / 5 + 4 – 6 > 8 //False e. 16 < 2 + 3 * 4 – 5 //True 5. Kumpulan data bertipe sama yang menggunakan nama yang sama adalah pengertian dari... a. Constanta d. Procedure b. Variable e. Function c. Array 6. Array yang elemennya akan diakses melalui banyak indeks atau subskrip adalah... a. Array 1 dimensi d. Array statis b. Array 2 dimensi e. Array dinamis c. Array multidimensi 7. Model pendeklarasian Array dimana tipe data yang digunakan mempunyai nilai yang tetap adalah... a. Array 1 dimensi d. Array statis b. Array 2 dimensi e. Array dinamis c. Array multidimensi 8. var nilai: array of Real; //adalah contoh deklarasi... a. Array 1 dimensi d. Array statis b. Array 2 dimensi e. Array dinamis c. Array multidimensi 9. Var nama: array[1..3] of string; //adalah contoh deklarasi... a. Array 1 dimensi d. Array statis b. Array 2 dimensi e. Array dinamis c. Array multidimensi 10. Var harga: array[1..5,1..8] of integer; //adalah contoh deklarasi... a. Array 1 dimensi d. Array statis b. Array 2 dimensi e. Array dinamis c. Array multidimensi 11. Tipe data yang menangani semua jenis karakter mulai dari huruf, angka dan tanda baca adalah... a. String d. Boolean b. Integer e. Float c. Real 12. Tipe data yang hanya mengenali nilai True dan False adalah... a. String d. Boolean b. Integer e. Float c. Real
  • 2. 13. Yang tidak termasuk operasi string adalah... a. Contac d. Insert b. Copy e. Length c. Delete 14. Operasistring yang menghasilkan sebuah substring dari suatu string adalah... a. Contac d. Insert b. Copy e. Length c. Delete 15. Operasistring yang menghapus substring dari suatu string adalah... a. Contac d. Insert b. Copy e. Length c. Delete 16. Operasistring yang menghitung jumlah karakter dalam suatu string adalah... a. Contac d. Insert b. Copy e. Length c. Delete 17. Operasistring yang menyisipkan string dalam suatu string yang lain adalah... a. Contac d. Insert b. Copy e. Length c. Delete 18. Hasil dari : edit1.text := concat(‘SMK’,’N’,’1’,’ Pandeglang’); adalah... a. SMKN1 Pandeglang d. SMKN 1Pandeglang b. SMKN 1 Pandeglang e. S M K N 1 Pandeglang c. SMK N 1 Pandeglang 19. Hasil dari potongan program berikut adalah... Var S:string; Begin S:= ‘Hanacaraka Datasawala’; Edit1.text:=copy(S,7,9); End; a. rak data d. Hanacar b. raka data e. Hanacarak c. raka datas 20. Hasil dari potongan program berikut adalah... Var S:string; Begin S:= ‘Hanacaraka Datasawala’; Delete(S,7,9); Edit1.text:=S; End; a. Hanaca sawala d. aka Datasawala b. Hanacasawala e. a Datasawala c. Hanacaawala 21. Hasil dari potongan program berikut adalah... Var S:string; Begin S:= ‘SISTEM INFORMASI’; Insert(‘KOMUNIKASI’,S,7); Edit1.text:=S; End; a. SISTEM KOMUNIKASI INFORMASI b. SISTEMKOMUNIKASI INFORMASI c. SISTEMKOMUNIKASIINFORMASI d. SISTEM KOMUNIKASI DAN INFORMASI e. SISTEM INFORMASI KOMUNIKASI 22. Hasil dari potongan program berikut adalah... Var S:string; T:integer; Begin S:=‘ Kemenkominfo (Kementrian Telekomunikasi dan Informasi).’; T:=Length(S); Edit1.text:=inttostr(T); End; a. 56 d. 49 b. 55 e. 48 c. 51
  • 3. 23. Hasil dari potongan program berikut adalah... Var S:string; Begin S:= ‘SISTEM KOMUNIKASI DAN INFORMASI’; Edit1.text:=Lowercase(S); End; a. SISTEM KOMUNIKASI DAN INFORMASI b. sistem komunikasi dan informasi c. sISTEM kOMUNIKASI dAN iNFORMASI d. Sistem Komunikasi Dan Informasi e. Sistem komunikasi dan informasi 24. Hasil dari potongan program berikut adalah... Var S:string; Begin S:= ‘SISTEM KOMUNIKASI DAN INFORMASI’; Edit1.text:=Uppercase(S); End; a. SISTEM KOMUNIKASI DAN INFORMASI b. sistem komunikasi dan informasi c. sISTEM kOMUNIKASI dAN iNFORMASI d. Sistem Komunikasi Dan Informasi e. Sistem komunikasi dan informasi 25. Jika: Var X:String; dan nilai X diambil dari Edit1 maka penulisan yang tepat adalah... a. X:=Edit1.Text; d. X:=StrToFloat(Edit1.Text); b. X:=StrToStr(Edit1.Text); e. Edit1.Text:=FloatToStr(X); c. X:=StrToInt(Edit1.Text); 26. Jika: Var X:Integer; dan nilai X diambil dari Edit1 maka penulisan yang tepat adalah... a. X:=Edit1.Text; d. X:=StrToFloat(Edit1.Text); b. X:=StrToStr(Edit1.Text); e. Edit1.Text:=FloatToStr(X); c. X:=StrToInt(Edit1.Text); 27. Jika: Var X:Real; dan nilai X diambil dari Edit1 maka penulisan yang tepat adalah... a. X:=Edit1.Text; d. X:=StrToFloat(Edit1.Text); b. X:=StrToStr(Edit1.Text); e. X:=StrToReal(Edit1.Text); c. X:=StrToInt(Edit1.Text); 28. Perhatikan potongan program berikut: Var A,B,X:Real; Begin A:=StrToFloat(Edit1.Text); B:=StrToFloat(Edit2.Text); X:= ( A * B ) / 2 ; .... End; Untuk menampilkan hasil dari X pada Edit3 , koding pada titik-titik di atas yang benar adalah... a. Edit3.Text:=FloatToStr(X); d. Edit3.Text:=IntToStr(X); b. Edit3.Text:=RealToStr(X); e. Edit3.Text:=StrToInt(X); c. Edit3.Text:=StrToFloat(X); 29. Perhatikan potongan program berikut; Var JL,TH:integer; Status:string; begin Status:=combobox1.Text; JL:=strtoint(edit1.Text); if status='Langganan' then begin TH := JL * 75 ; edit2.Text:=inttostr(TH); end else begin if JL > 100 then begin TH := JL * 85 ; edit2.Text:=inttostr(TH); end else begin TH := JL * 100 ; edit2.Text:=inttostr(TH); end; end; end; Jika diinputkan Status: ‘Bukan langganan’ dan Jumlah Lembar (JL) yang difotokopi sebanyak 100 lembar, maka besar output: Jumlah Harga (TH) adalah... a. Rp 7.500 d. Rp 10.000 b. Rp 8.500 e. Rp 11.000 c. Rp 9.000 30. Kesalahan pada potongan program berikut adalah... Var P,L,T,V : Real; begin P := strtofloat(edit1.Text); //a. L := strtofloat(edit2.Text); //b.
  • 4. t := strtofloat(edit3.Text); //c. v := P * L * t ; //d. edit4.Text := floatostr(V); //e. end; 31. Pada Delphi7, jika saat di-Run muncul pesan kesalahan: [Error] Unit1.pas(50): Missing operator or semicolon kesalahan pada listing code adalah... a. Kurang titik koma [ ; ] b. Kurang titik [ . ] c. Kurang tanda kurung [ ( ) ] d. Nama variabel tidak dikenali e. Tipe data yang di-input-kan pada saat program di-Run tidak sesuaidengan tipe data pada deklarasi variabel 32. Suatu variabel yang berisi alamat memori dari suatu variabel lain disebut... a. Array d. Function b. Pointer e. Atribut c. Procedure 33. Yang tidak termasuk tipe pointer pada Delphi adalah... a. PAnsiChar d. PDateTime b. PAnsiString e. Mouse c. PExtended 34. Pointer yang menunjuk ke alamat data bertipe tanggal dan waktu adalah... a. PAnsiChar d. PDateTime b. PAnsiString e. Mouse c. PExtended 35. Operator pointer yang digunakan untuk memeriksa apakah dua variabel pointer menunjuk alamat yang sama atau tidak adalah... a. ^ c. < > b. = d. @ 36. Perhatikan hitungan berikut : 1 + 5 = 12 a. 40 2 + 10 = 24 b. 45 3 + 15 = 36 c. 50 Maka : d. 55 5 + 25 = ? e. 60 37. Jika : 55 + 11 = 67 a. 65 44 + 22 = 68 b. 67 33 + 33 = 69 c. 69 Maka : d. 71 11 + 55 = ? e. 72 38. Pahami : 1 + 7 = 8 a. 8 2 + 6 = 14 b. 15 3 + 5 = 18 c. 16 4 + 4 = 20 d. 18 5 + 3 = ? e. 20 39. Ada seorang anak kecil yang ingin masuk ke ruang kerja ayahnya, tetapi hanya ayah dan ibunya yang tau password dari pintu otomatis ke ruangan tersebut. Suatu hari ia bersembunyi di balik tirai dan diam-diam memperhatikan ketika ayahnya masuk ke ruang kerja. Di layar pintu terlihat ‘TWELVE’ dan sang ayah menekan angka ‘6’. Pintu pun terbuka. Tidak lama si ibu datang ke ruang kerja ayah. Di layar pintu terlihat ‘SIX’ dan si ibu memasukkan angka ‘3’. Setelah dirasa aman, si anak kemudian menghampiri layar pintu, yang kemudian bertuliskan ‘EIGHT’, si anak memasukkan angka ‘4’ tapi pintu tidak terbuka karena jawabannya salah. Apakah jawaban yang benar? a. 5 b. 6 c. 7 d. 8 e. 9 40. Ingat-ingat : a = 2 e = 10 i = 18 o = 30 u = ? a. 21 b. 28 c. 35 d. 42 e. 49 Selamat mengerjakan...