soal-soal algoritma pemrograman PASCAL (75 soal)

KUMPULAN SOAL-SOAL ALGORITMA PEMROGRAMAN (PASCAL)

1.     Var  I : Integer ;

Begin

For   I := 1  To  2  Do  Write(‘ Uas ’);

Writeln(‘Oke‘);  End.

Output dari program diatas adalah .....

A. Uas             B.   Uas Oke          C. Uas  Uas            D. Uas Uas Oke Ö

    Uas                    Uas Oke              Oke            

    Oke            

   

2.    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));

Jika X = 5 Dan Y = 4 Maka Hasil = ..... A.  0            C.  5 Ö B.  4            D.  semua salah

End.

                

3.    Kal1 := ‘ ujian ’;

Kal2 :=’ akhir ’;

Hasil dari CONCAT(Kal2,Kal1, “Pascal”) adalah :

A.  ujian akhir B.  akhir ujian        C.   ujian akhir Pascal     D.   akhir ujian Pascal  Ö

                      

4.    Manakah pendeklasian tipe record yang benar dibawah ini :

A. Type                                                            C.   Type

RecDosen = Record;                                                RecPegawai : Record

              NIP : longint; nama : string [15]; End;                           Begin

             RecMhs = Record;                                               nopeg = integer; nama = string [20]; End;

                   NPM : integer; Nama : string [15]; End;                                    

B. Type                                                            D.   semua salah

Nilaiujian = Record                       

              UTS,UAS : real; End;                                   

DataMhs = Record                        

              NPM : integer; Nama : string [15]; Nilai : Nilaiujian; End;      Ö

5.    Yang termasuk user defined data type/tipe data didefinikan pemakai adalah :

A.   Array, record, subrange type              C.  Integer, real, string 

B.    Enumerated, subrange type Ö             D. Enumerated, real, string

6.    Prosedur standar Clrscr adalah untuk menghapus layar namun untuk menggunakannya unit yang harus disebutkan dalam program adalah :

A.  CRT Ö                   B.  User Screen               C.  CTR                  D.  Graph

7.    Dibawah ini semua benar tentang identifier, kecuali :

A.   Tidak boleh mengandung blank

B.    Tidak boleh mengandung simbol-simbol khusus, kecuali garis bawah

C.    Panjangnya bebas, tetapi hanya 63 karakter pertama yang dianggap signifikan

D.   Terdiri dari gabungan huruf dan angka, karakter pertama harus berupa huruf, huruf besar dan kecil dianggap berbeda  Ö

8.    Baris komentar pada Pascal harus diletakkan diantara tanda .....

A.   { } atau (  )     B.  ‘ ‘ atau { }      C.  ( ) atau ‘ ‘          D. (*  *) atau { }        Ö

9.    Looping pada WHILE DO dikerjakan minimal ... kali, sedangkan pada REPEAT...UNTIL dikerjakan minimal  .... kali.

A.  1      0                  B.  1    1                 C.   0      1   Ö                  D.   0    0

10.

Output dari program disamping adalah ..... A.  2.00             B.  0.85             1.00                   2.00                  3                 4.00                          C.  2.00   Ö                   D.  2.00      0.35                  1.00      3                      4.00

Var   a,b : real; c:integer;

Begin

          A := Trunc(2.85);  

B := Frac(1.35);

          C := Round(3.45);  

Writeln(a:5:2);

writeln(b:5:2);      

writeln(c);End.

11.  Beda Procedure dengan Function adalah ...

A.  Procedure mengembalikan suatu nilai, sedangkan function tidak

B.  Procedure tidak mengembalikan suatu nilai, function mengembalikan suatu nilai  Ö

C.  Procedure dan function mengembalikan suatu nilai

D.  Procedure dan function tidak mengembalikan suatu nilai

12. Apakah output program dibawah ini, jika a = 39 dan b = 18 ......

Var            a,b,c : integer;

Begin     Readln(a,b);

          If  a >= b then c:= a div b

              Else  c:= a mod b;writeln(c); End.

A.  1                 B.  2   Ö                 C.  3                      D.  16

13. IF (a>5) AND (b<=3) THEN Writeln(‘UJIAN’) ELSE Writeln(‘PASCAL’);

Jika a=7 dan b=7maka hasil yang akan dicetak adalah :

A.  UJIAN                B.  PASCAL  Ö                 C.  ujian                 D. pascal

14. Suatu program terpisah dalam blok sendiri yang berfungsi sebagai subprogram disebut:

A.  fungsi                   B. prosedur  Ö                  C. blok statemen             D.  looping

15. Program untuk menghasilkan output : 5 4 3 2 1 adalah.....

A.  var  i: byte;                        C.  var  i: integer;

begin                                        begin

   For i:= 5 to 1 Do Write(i);end.            For i:= 5 downto 1 Do Writeln(i);end.

B.  var  i: integer;                              D. var  i: byte; 

begin                                                  begin

   For i:= 1 to 5 Do Write(i);end.            For i:= 5 downto 1 Do Write(i);end.   Ö

                                          

16. Ouput program di bawah ini adalah :

Procedure satu;

Begin Writeln(‘PASCAL’);writeln(‘------------‘);end;

        Procedure dua;

          Begin Writeln(‘BAHASA’);end;

        Begin

          dua;Writeln(‘------------’);satu;Writeln(‘------------‘); END.

A. PASCAL       B.  BAHASA Ö                 C.  PASCAL            D.  BAHASA

    ------------       ------------                    ------------               ------------

    ------------       PASCAL                          BAHASA                ------------

    BAHASA          ------------                      ------------             PASCAL

    -----------         ------------                     ------------                ------------

                            

17. Perhatikan program dibawah ini, jika n=5 maka outputnya adalah .....

Var              i,n,bil : integer;

Begin

          Readln(n);bil:=1; For i := 1 To n  Do

              bil := bil * i; Writeln(bil); End.

A.  120    Ö                      B.  24                        C.  16                     D.  5

18. Deklarasi label digunakan jika pada penulisan program akan menggunakan statemen.....

A.   Writeln              B.  Readln     C. Goto  Ö              D.  If Then

19. Type   Abjad = ‘A’...’Z’  trmasuk ke dalam tipe data .....

A.   Enumerated type            B. Subrange atau subjangkauan  Ö                

C. A dan B  benar                 D.  semua salah

20.Perhatikan program dibawah ini, outputnya adalah .....

Var              i,j : byte;

Begin

           For i := 1 To 3  Do

           Begin

               For j := 3 DownTo i  Do

                    Write(j);

writeln; End; End.

A.  123                   B. 321  Ö          C.  1                       D.  3

     12                         32                              12                         32

     1                           3                                123                                 321        

         

21. Yang tidak termasuk dalam Blok Deklarasi adalah :

A.   Count  Ö                B.  Procedure                   C.   function         D.   Type    

22.Output dari program berikut :

Var              a,b : integer;

Begin

For a := 1 to 5 Do

For b:= 1 to a Do

Write(b);     

End.

A.  1                 B. 12345                C.   12345              D.   112123123412345  Ö

12                    1234

123                  123         

1234                12

          12345              1

23.Statemen Readln tanpa argumen berfungsi untuk... :

A.  menunda eksekusi program sampai tombol enter ditekan

B.  menampilkan output pada layar sampai tombol Enter ditekan

C.  jawaban A dan B benar Ö            D. Jawaban A dan B salah

24.Prosedur dan fungsi didefinisikan pada pascal didefinisikan pada bagian ...

A.   Header(judul)        B.  Blok                     C.    Deklarasi Ö                           D.    Sub program

25.Jenis data yang termasuk “Standard Data Type” dalam pascal adalah

A.   Integer, real, char                   B. Integer, real, char, boolean   Ö   

C.  Integer, boolean, string           D.  Integer, real, char, string

26.Blok /body program  pada struktur program Pascal terdiri dari dua bagian, yaitu :

A.   Deklarasi dan Variabel              B. Judul dan Deklarasi    

C. Deklarasi dan Pernyataan Ö        D.Variabel dan Pernyataan

27.Output dari program berikut :

Var              i : integer;

Begin  

I :=1; While i <= 5 Do

Begin

If 10 Mod I = 0 Then Writeln(10 Div I);

I := I + 1;

End;

End.

A.   1 2 5                   B. 10   Ö                 C.   5           D.   2 5 10

                            5

                            2  

             

28.Suatu program pascal yang paling sederhana adalah program yang terdiri dari :

A.   Var             B.   Program Contoh;                  C.  Procedure Contoh;      D.  Begin    Ö

Begin                 Begin                                        begin                              End.

End.                   End.                                          End.

29.Tipe data/jenis data dalam Pascal terbagi tiga kelompok yaitu :

A.   Terstruktur, Konstan, Pointer    B.  Integer, Real, Boolean  

C.   Buatan, bulat, integer               D.   Sederhana, terstruktur, pointer Ö

30.Tipe data/jenis data sederhana dapat digolongkan menjadi tipe data :

A.   Standar & Terstruktur             B. Standar & User Defined        Ö        

C.   Pointer & user Defined            D.   Record & Array

31. String, Char, integer, real dan boolean termasuk ke dalam tipe data :

A.   User defined        B. Petunjuk   C.   Standar Ö             D. sederhana

32.Array dan record merupakan tipe data ....

A.   Terstruktur  Ö      B. Standar   C.   User Defined         D. Enumerated

33.Struktur program Pascal terdiri dua bagian utama yaitu :

A.   Judul Program, Blok Program  Ö                     C.   Judul program, Blok deklarasi

B.    Blok deklarasi, Pernyataan                            D.   Judul program, Blok pernyataan

                                                                                                                                   

34. Output dari program berikut :

Var x,y : integer;

Begin  For x := 1 to 2 do

Begin     

For y := 1 to x do Writeln(y);

Writeln(‘oke’); 

End;

End.

A.   1                  B.   1            C.    1   Ö                      D.         1

1                        oke               oke                                     1

2                        1                   1                                        oke   

oke                    oke               2                                       2

                          2                  oke                                    oke

                          oke

35. Type data yang memungkinkan untuk diurutkan secara diskrit, disebut sebagai tipe data yang ...

A.  Predecessor B. Ordinal (*)                   C. Successor          D. Pointer

36.Var     e,f,g,h : integer;

Begin    

For e := 1 to 2 do

Begin    

For f := 2 downto e do

Begin  

Write (e); writeln(f);     

End;

End;

End.

Maka output program diatas adalah :

A.   12  (*)                   B. 21            C.    12                        D. 12

11                              11                   22                           11

22                             22                  21                            23

                

37.Procedure hitung(a,b : integer, var c : integer);

Begin

C := a+ b;

End;

Var x,y,z : integer;

Begin

X :=2;  Y := 3;

Hitung(x,y,z); Write(x,y,z); End.

Hasil yang diperoleh adalah :

A. 352    B. 235   (*)  C.  523                  D. 325

38.Untuk memasukkan data per baris, setelah menekan  tombol enter, maka akan ganti baris merupakan perintah dari ………

A.   Write

B.    Writeln

C.    Readln

D.   Read

39.Bagian yang menunjuk ke komponen file yang akan diakses (dibaca atau direkam) untuk keperluan pengaksesan file (akan dibahas kemudian) disebut ……

A.   File

B.    Pointer

C.    Linked List

D.   Array

40.Dibawah ini merupakan jenis FILE pada PASCAL kecuali ..........

A.   File Teks

B.    File Bertipe

C.    File Berurut

D.   File Tak Bertipe

41. Menghubungkan variabel file dengan nama file merupakan fungsi dari perintah …..

A.   Write

B.   Re write

C.   Assign

D.   Read

42.Membuat file teks aktif dalam sebuah file menggunakan perintah ……

A.   Append

B.   Write

C.   Close

D.   Re write

43.Suatu node (simpul) yang menunjuk ke node (simpul) berikutnya dalam suatu urutan disebut ….

A.   Array

B.    Record

C.    Double linked list

D.   Linked List

44.Kumpulan dari nilai-nilai yang memiliki kesamaan sifat, yaitu tipe data yang sama dan urutan penulisannya tidak diperhatikan disebut …….

A.   Operator

B.    Himpunan

C.    Array

D.   Record

45.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. * * * * *

    * * * * *

    * * * * *

46.Struktur pertama dalam pascal adalah .....

a. Char;
b. String
c. End.
d. Writeln
e. Uses crt;
Jawaban : E. Uses crt;

47.Untuk melihat hasil dari program yang dikerjakan tekan tombol .....

a. Crtl+f5
b. Ctrl+f9
c. Ctrl+f2
d. Ctrl+f12
e. Ctrl+f4

Jawaban : B. Ctrl+f9

48. Berapa kode yang digunakan untuk membuat tulisan berwarna “CYAN” .....

a. 4
b. 2
c. 128
d. 7
e. 3

Jawaban : D. 128

49. Perintah dasar sederhana dalam program pascal adalah .....

a. Readln
b. End
c. Write
d. Writeln
e. Uses crt;

Jawaban: D. Writelen

50.Tipe data bahasa pascal untuk TRUE FALSE adalah .....

a. String
b. Char
c. Boolean
d. Byte
e. Real

Jawaban : C. Boolean

51.  Siapakah penemu program pascal .....

a. Greyson change
b. Prof. Niklaus Wirth
c. Kondrazuse
d. Prof. Niklaus Smirth
e. Dr. Hercules

Jawaban : B. Prof. Niklaus Wirth

52. Struktur bahasa pemrograman pascal paling pertama adalah .....

a. Var;
b. Begin
c. End;
d. Uses crt;
e. Writeln;

Jawaban : D. Uses crt;

53.Tipe data pascal untuk karakter adalah .....

a. Char
b. Boolean
c. Integer
d. Real
e. Byte

Jawaban : A. Char

54.Kapan terbentuknya pascal .....

a. 1981
b. 1971
c. 1961
d. 1991
e. 1987

Jawaban : B. 1971

55.Apakah kepanjangan dari USES .....

a. Unit secure
b. Unit syntax
c. Unit system
d. Up software
e. Unit semiconductor

Jawaban : C. Unit System

56.Berikut ini adalah penulisan identifier yang benar dalam pemrogramnan pascal adalah .....

a. 9program_satu
b. Program_satu
c. Program satu
d. Begin
e. Array

Jawaban : B. Program_satu

57.Tipe bilangan bulat dalam bahasa pascal dikenal dengan .....

a. Byte
b. Integer
c. Char
d. String
e. Boolean

Jawaban : B. Integer

58.Istilah “perulangan” dalam pemrograman pascal dikenal sebagai .....

a. Repeating
b. Again
c. Function
d. Replay
e. Looping

Jawaban : E. Looping

59.Perintah untuk menutup program pada Pascal adalah .....

a. END.

b. Program

c. Uses crt;

d. Finish

e. END;

Jawaban : A. END.

60.Menggambarkan program secara logika merupakan fungsi dari .....

a. flowchart

b. DxDiag

c. Begin

d. SI

e. Sistem Operasi

Jawaban : A. flowchart

61.  Deklarasi yang digunakan untuk mengidentifikasi data yang nilainya sudah ditentukan dan pasti, tidak dirubah dalam program disebut deklarasi .....

a. Deklarasi label

b. Deklarasi Konstanta

c. Deklarasi tipe

d. Deklarasi Variabel

e. Deklarasi Prosedur

Jawaban : B. Deklarasi Konstanta

62. Dibawah ini termasuk dalam Deklarasi dalam Pascal kecuali .....

a. Deklarasi perubah

b. Deklarasi proses

c. Deklarasi konstanta

d. Deklarasi tipe

e. Deklarasi prosedure

Jawaban : B. Deklarasi proses

63.Bilangan yang mengandung pecahan, paling sedikit harus ada satu digit sebelum dan sesudah titik desimal termasuk dalam tipe data .....

a. Real

b. Boolean

c. Integer

d. Longint

e. Byte

Jawaban : A. Real

64.Prosedur yang digunakan untuk membersihkan layar saat program dijalankan adalah .....

a. Writeln

b. Readln

c. Begin

d. Write

e. Clrscr

Jawaban : E. Clrscr

65. Bentuk dari suatu statement IF berada didalam lingkungan statement IF yang lainnya, disebut IF dalam kondisi .....

a. IF bersarang

b. IF bercabang

c. IF tunggal

d. IF-THEN

e. IF do while-until

Jawaban : A. IF bersarang

66. Tipe data terstruktur yang terdiri dari sejumlah komponen-komponen yang mempunyai tipe sama, disebut tipe data .....

a. Array

b. Byte

c. Longint

d. Integer

e. Boolean

Jawaban : A. Array

67. Perintah untuk menampilkan atau cetak dilayar monitor tanpa pindah baris, disebut .....

a. Writeln

b. Write

c. Readln

d. Read

e. Begin

Jawaban : B. Write

68. Perintah untuk menampilkan atau cetak dilayar monitor lalu pindah baris kebawah, disebut .....

a. Writeln

b. Write

c. Readln

d. Read

e. Begin

Jawaban : A. Writeln

69. Suatu identifier non-standar yang nilainya tidak tetap atau nilainya merupakan hasil dari suatu proses, disebut .....

a. Variabel

b. Tipe Data

c. Prosedur

d. Deklarasi

e. Array

Jawaban : A. Variabel

70.Suatu program terpisah dalam blok sendiri yang berfungsi sebagai subprogram (bagian program), disebut .....

a. Variabel

b. Tipe Data

c. Prosedur

d. Deklarasi

e. Array

Jawaban : C. Prosedur

71. Menggunakan simbol apa jika ingin memulai dengan garis baru....

a. writeln

b. write

c. enter

d. space

Jawaban : A. Writeln

72.Suatu program pascal yang paling sederhana adalah program yang terdiri dari :

A.   Var                  B.   Program Contoh;                  C.  Procedure Contoh;      D.  Begin   

Begin                     Begin                                        begin                              End.

End.                       End.                                          End.

Jawaban : D. Begin

      end.

73.Tipe data/jenis data dalam Pascal terbagi tiga kelompok yaitu :

A.   Terstruktur, Konstan, Pointer    B.  Integer, Real, Boolean  

C.   Buatan, bulat, integer               D.   Sederhana, terstruktur, pointer

Jawaban : D. Sederhana, terstruktur, pointer

74.Tipe data/jenis data sederhana dapat digolongkan menjadi tipe data :

A.   Standar & Terstruktur            B. Standar & User Defined     

C.   Pointer & user Defined            D.   Record & Array

Jawaban : B.standart & user defined

75.String, Char, integer, real dan boolean termasuk ke dalam tipe data :

A.  User defined         B. Petunjuk   C.   Standar      D. sederhana

Jawaban : C. Standart

atau mau download filenya langsung klik CAPCUS.