Pascal

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

• { } atau ( )

• ‘ ‘ atau { }

• ( ) atau ‘ ‘

• (* *) atau { }

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

• 1 0

• 1 1

• 0 1

• 0 0

3. 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.

• PASCAL

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

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

  BAHASA

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

• BAHASA

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

  PASCAL

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

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

• PASCAL

  ----------

  BAHASA

  ----------

  ----------

• BAHASA

  -----------

  -----------

  PASCAL

  ----------

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

• Writeln

• Readln

• Goto

• If Then

5. Output dari program berikut :

Var a,b : integer;

Begin

For a := 1 to 5 Do

For b:= 1 to a Do

Write(b);

End.

• 1

  12

  123

  1234

  12345

• 12345

  1234

  123

  12

  1

• 12345

• 112123123412345

6.Suatu program pascal yang paling sederhana adalah program yang terdiri dari

• VAR

  BEGIN

  END.

• PROGRAM CONTOH;

  VAR

  END.

• PROSEDUR CONTOH;

  BEGIN

  END.

• BEGIN

  END.

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

• User defined

• Petunjuk

• Standar

• Sederhana

8.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.

• 1

  1

  2

  OKE

• 1

  OKE

  1

  OKE

  2

  OKE

• 1

  OKE

  1

  2

  OKE

• 1

  1

  OKE

  2

  OKE

9.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 :

• 352

• 235

• 523

• 325

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

• Write

• Writeln

• Readln

• Read