Home » Umum » LATIHAN SOAL PASCAL TERBARU

LATIHAN SOAL PASCAL TERBARU

Posted at July 17th, 2013
Product Description : LATIHAN SOAL PASCAL TERBARU

1.      Var
A,B : Integer;
Procedure Uji(A : Integer);
Begin
A := A + 1; Write(A:3);
End;
Begin
A := 2; Write(A:3); Uji(A); Write(A:3); End.

2.    Jika pada SOAL no. 2 statemen Procedure Uji(A : integer) diganti dengan statemen Procedure(var A : integer) maka outputnya menjadi
A.   2   3   3         B.   2   3   2        C.   3   2   3         D.   1   2   3

3.    Type
Bahasa = (Pascal, BASIC, COBOL, Rakitan);
Hasil dari : Ord(Succ(Pred(Pred(COBOL)))) = …..
A.   0        B.   1          C.   Pascal    D.   BASIC

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

5.    Agar keluarannya menjadi 4 5 6 maka programnya adalah :
A.    Var   K : Integer;                 C.    Var   K : Integer;
Begin                    Begin
K := 3;                    K := 3;
Repeat                    Repeat
Write(K);    Inc(K);                    Inc(K); Write(K);
Until K > 5; End.                Until K > 5; End.

B.    Var   K : Integer;                 D.    Var   K : Integer;
Begin                    Begin
K := 3;                    K := 3;
Repeat                    Repeat
Write(K);    Inc(K);              Inc(K); Write(K);
Until K < 5; End.                Until K < 5; End.

6.    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); End.

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

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;

8.    Jika diketahui :    Himp_A := [1,2,3,4,6..8,10]; Himp_B :=  [4..7,10,13]; Himp_C := [2..4,7..9];
Maka hasil dari (A*B)-C adalah :
A.  [6,10]        B.  [ ]        C.   [6,7,9,10]        D.   [4..7,8..9]

9.    Prof. Niklaus Wirth memperkenalkan kompiler bahasa Pascal pertamakali untuk komputer …..
A.  CDC 5000     b.   CCD 5000        c.   CCD 6000        d.   CDC 6000

10.    Yang termasuk user defined data type/tipe data didefinikan pemakai adalah :
A.    Array, record, subrange type    B.  Integer, real, string     C. Enumerated, subrange type    D. Enumerated, real, string

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

12.    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  

13.    Baris komentar pada Pascal harus diletakkan diantara tanda …..
A.   { } atau (  )        B.  ‘ ‘ atau { }      C.  ( ) atau ‘ ‘        D. (*  *) atau { }

14.

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

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

17.    Pernyataan dibawah ini semua benar kecuali :
A.    Prosedur Val mengubah sebuah string menjadi nilai numerik
B.  Prosedur STR mengubah sebuah nilai numerik menjadi string
C.  Fungsi POS untuk mengambil sebagian string dari suatu string
D. Fungsi POS untuk menentukan letak sebuah string pada string lain

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

19.    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
20.    Perhatikan program dibawah ini, outputnya adalah …..
Var         i,tot : integer;
Begin
i := 1;tot :=0;
Repeat
tot := tot + i;inc(i);
Until i >5;
Writeln(tot); End.
21.    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

22.    Suatu program terpisah dalam blok sendiri yang berfungsi sebagai subprogram disebut :
A.  fungsi        B. prosedur          C. blok statemen        D.  looping

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

24.    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
———–          ————                     ————               ————

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

26.    Deklarasi label digunakan jika pada penulisan program akan menggunakan statemen…..
A.   Writeln         B.  Readln    C. Goto          D.  If Then

27.    Type   Abjad = ‘A’…’Z’  trmasuk ke dalam tipe data …..
A.    Enumerated type         B. Subrange atau subjangkauan           C. A dan B  benar        D.  semua salah

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

29.    Perhatikan program dibawah ini, apakah outputnya ?
Type
Kota = (Bogor,Depok,Jakarta,Bandung,subang,cirebon,tasikmalaya);
Var         i : integer;
Begin
For i := ord(depok) to ord(tasikmalaya) Do
If Odd(i) Then Write(i);
End.
A.   123456         B. 125            C.   135            D.   246

30.    Yang tidak termasuk dalam Blok Deklarasi adalah :
A.    Count          B.  Procedure        C.   function    D.   Type
31.    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

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

33.    Prosedur dan fungsi didefinisikan pada pascal didefinisikan pada bagian …
A.    Header(judul)     B.  Blok            C.    Deklarasi                      D.    Sub program

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

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

36.    Perhatikan program dibawah ini, apakah outputnya ?
Var         a : real; b,c : integer;
Begin
B:=4;   For c := 1 to 3 Do   While b < 5 Do
Begin  Write(b); Write(Succ(b)); Inc(b); End; End.
A.   345          B. 344534453445        C.   345345345        D.   3445

37.    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
38.    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.

39.    Dibawah ini yang bukan merupakan reserved word Bahasa Pascal adalah :
A.    Interface    B.  Image        C.  Implementation        D.  Packed

40.    Dibawah ini manakah yang merupakan salah satu reserved word Pascal :
A.    System        B.  Clrscr        C.  External          D. DOS

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

42.    Tipe data/jenis data sederhana dapat digolongkan menjadi tipe data :
A.    Standar & Terstruktur    B. Standar & User Defined             C.   Pointer & user Defined        D.   Record & Array

43.    String, Char, integer, real dan boolean termasuk ke dalam tipe data :
A.    User defined    B. Petunjuk    C.   Standar         D. sederhana

44.    Array dan record merupakan tipe data ….
A.    Terstruktur          B. Standar    C.   User Defined          D. Enumerated

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

46.    Jika diberikan deklarasi sebagai berikut :
Const  a = 4; Var b,c : integer;
Maka statemen berikut akan menghasilkan output yang sama, kecuali:
A.    B :=0;    C := 2 *b+1;                C.   B := 5; C := 0;
Case C of                                        if C < B then write(b)
0    : write(B);
1     : write(a+1);
2     : write(c); End;                D.    B := 0;C :=6;
Repeat
B.    For B := 1 to A do                                             b := b + 1;
If B =  A then write(b);                                Until B := pred(c);
write(b);
47.    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

48.    Perhatikan program dibawah ini
Var x,y : integer;
Begin  For x := 1 to 2 do
Begin     For y := 1 to 2  do   Write (y);
Write (‘oke’);   End;End.
A.    1        B.     1        C.    12oke12 oke          D.   12oke12oke
2                      2
oke              oke
1     1
oke                      2
oke

49.    Apakah output program berikut :
procedure satu;
Begin   Writeln(‘Procedure satu‘);     End;
procedure dua; Begin  Writeln(‘Procedure dua‘);     End;
Begin  Writeln(‘Program utama‘);    Dua; satu; End.
A.    Prosedur satu            B. Prosedur dua          C.    Program utama         D.    Program utama  (*)
Prosedur dua                  Prosedur satu                  Prosedur satu                Prosedur dua
Prosedur utama            Prosedur utama                      Prosedur dua               Prosedur satu

50.    Output program berikut :
procedure dua(var g,h : integer; i : integer);
Begin Inc(g); Dec(h); End;
procedure satu(var d,e,f : integer);
Begin  Inc (d,f); dua(d,e,f); End;
Begin  A :=1; B := 3; C := 5;Writeln(A:2),B:2,C:2);
Satu(A,B,C); Writeln(A:2),B:2,C:2); End.

A.    1 3 5            B. 1 3 5          C.    1 3 5   (*)         D.    1 3 5
1 3 5            2 4 5               7 2 5        7 3 6

51.    Type data yang memungkinkan untuk diurutkan secara diskrit, disebut sebagai tipe data yang …
A.  Predecessor    B. Ordinal (*)        C. Successor        D. Pointer

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

53.    Output program berikut :
Type coolor = (merah,hijau,kuning,ungu,jingga,pink);
Var   a : byte;warna,col,c : coolor;
Begin
Col := kuning; c := pred(col); a := 3;
While a <= 5 do
Begin
If c = ungu then
Begin
Write (a); C := pred(warna); Dec(a); End
Else
Begin
C  := succ(warna);write (a); inc(a);    End;       End;  End.

A.    3         B.   345     (*)    C.    354          D.    34
4                           5
5

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

55.    Dari SOAL no. 56 yang merupakan pengiriman parameter secara acuan(by reference) :
A.  variabel A    B. variabel B        C. variabel C (*)        D. variabel A dan B

56.    Procedure hitung;
Var x,y : real;
Begin
X:=4;  Y := Sqr(x);Write(Y:6:2);
End;
Begin
Hitung; End.
Output program diatas adalah :
A. 16        B.  2        C.  16.00  (*)        D. 2.00

57.    Function fungsi2(y:integer):integer;
Begin
Fungsi2 := Y * 2; End;
Function fungsi1(x : integer):integer;
Begin
Fungsi1 := fungsi2(x) + 5; End;
Writeln(fungsi1(3)); End.
Output yang dihasilkan :
A. 15    B. 6        C. 11    (*)    D. 9

58.    Prosedur standar pada operasi string yang berfungsi digunakan untuk mengubah nilai string menjadi nilai numerik :
A. VAL    B. STR        C. POS        D. INT

59.    Prosedur standar pada operasi string yang berfungsi digunakan untuk mengubah nilai numerik menjadi nilai String :
A. VAL    B. STR        C. POS        D. INT
60.    Fungsi standar yang dapat digunakan untuk membulatkan nilai dari real x ke nilai longInt terdekat adalah :
A. Int        B.  Concat        C. Trunc        D. Round

82.  Procedure HITUNG(Var    E,F : Integer);
Begin
F := SQR(E) + 1; Write(F:3);
End;
Var    C,D : Integer;
Begin
D:= 4; C := 9; Write(C:3); HITUNG(C,D);
Write(D:3); End.

61.    Var  I : Integer ;
Begin
For   I := 1  To  2  Do  Writeln(‘UJIAN ’); Writeln(‘UTAMA;‘)
End.
Output dari program diatas adalah …..
A.   UJIAN        B.   UJIAN        C. UJIAN UJIAN        D. UJIAN
UTAMA              UTAMA                  UTAMA                 UJIAN
UJIAN                         UTAMA
UTAMA
83.  Var   K : Integer;
Begin
K := 3;
Repeat
Inc(K); Write(K);
Until K > 5; End.

Output dari program diatas adalah …..

A.   345        B.   3456        C.. 456        D.  445566

62.    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); End.

63.    Yang termasuk user defined data type/tipe data didefinikan pemakai adalah :
A.Enumerated, subrange type           C. Array, record, subrange type
B.    Integer, real, string              D. Enumerated, real, string

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

65.    Jenis-jenis tipe file pada Pascal adalah………
A.  Text, bertipe, random                     C.   Bertipe, tidak bertipe, random
B.  Text, tidak bertipe, berurutan                 D.   Text, bertipe, tidak bertipe

66.    Program Uji;
Var    cetak : Text;
Begin
Assign (cetak, ‘contoh.txt’);
Rewrite(cetak);
Writeln(cetak, ’UJIAN UTAMA’);
Writeln(cetak, ‘PEMROGRAMAN PASCAL’);
Close(cetak); End.

Yang merupakan nama variabel file text pada program diatas adalah
A.  cetak                   B.  contoh.txt            C.  Uji            D.  Writeln

67.    Type   Abjad = (senin,selasa,rabu,kamis)  termasuk ke dalam tipe data …..
A.    Enumerated type     B. Subrange atau subjangkauan            C. A dan B  benar        D.  semua salah

68.    Perhatikan program dibawah ini, apakah outputnya ?
Type
Kota = (Bogor,Depok,Jakarta,Bandung,Subang,Cirebon,Tasikmalaya,Ciamis,Garut);
Var         i : integer;
Begin
For i := ord(Jakarta) to ord(Tasikmalaya) Do
If Odd(i) Then Write(i);
End.
A.   35         B. 357            C.  135               D.   1357

69.    Blok /body program  pada struktur program Pascal terdiri dari dua bagian, yaitu :
A.Deklarasi dan Variabel    C. Deklarasi dan Pernyataan
B.Judul dan Deklarasi         D.Variabel dan Pernyataan

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

71.    Perhatikan program dibawah ini, apakah outputnya ?
Var         a : real; b,c : integer;
Begin
B:=3;   For c := 1 to 3 Do   While b < 5 Do
Begin  Write(b); Write(Succ(b)); Inc(b); End; End.
A.   345          B. 344534453445        C.   345345345        D.   3445

72.    Tipe data/jenis data dalam Pascal terbagi tiga kelompok yaitu :
A.Terstruktur, Konstan, Pointer        C.   Buatan, bulat, integer
B.    Sederhana, terstruktur, pointer           D.   Integer, Real, Boolean

73.    Jenis data terstruktur yang dibuat sebagai suatu variabel yang menyimpan alamat dari suatu obyek ( dapat berupa variabel, konstanta bertipe atau subprogram ) adalah….
B.    Array        B. Record                  C.   Pointer        D.   File

74.    Var A,B : string; E : integer;
Begin A :=  ‘PUTIH’; B :=’MERAH’;
For E := Length (A) Downto 1 Do
Write(Copy(B, E, 1));
End.
Output dari program diatas adalah:
A.    HAREM        B. HITUP                  C.   PUTIH        D.   MERAH

75.    Prosedur standar pada operasi string yang berfungsi digunakan untuk mengubah nilai string menjadi nilai numerik :
A. VAL        B. STR        C. POS        D. INT

76.    Deklarasi Label harus dituliskan bila pada program digunakan statemen…..
A. BEGIN        B. READ        C. WRITE        D. GOTO

77.    Procedure hitung(A,B : integer, Var C : integer);
Begin
C := A + B;
End;
Var x,y,z : integer;
Begin
X :=2;  Y := 3; Z := 8;
Hitung(X,Y,Z); Write(Z); End.

Hasil yang diperoleh adalah :
A. 8        B. 5            C.  3        D. 2

78.    Function fungsi2(y:integer):integer;
Begin
Fungsi2 := Y * 2; End;
Function fungsi1(x : integer):integer;
Begin
Fungsi1 := fungsi2(x) + 5; End;
Writeln(fungsi1(3)); End.
Output yang dihasilkan :
A. 11        B. 6        C. 9         D. 15

79.    Apakah output dari program berikut  :
Var       A : Array [1..4] of integer;   B,C : integer; D : real;
Begin
C := 0; A[1] := 20; A[2] := 10; A[3] := 2; A[4] := 8;
For B : = 1 to 4 DO
C := C + A[B];
D := C/4; Write(D:3:1); End.
A . 10.5              B.   10.00        C.  10            D.   10.0

80.    Apakah output dari program berikut  :
Var       A,B,C : String[30];
Begin
A:= ‘BAHASA’; B := ‘PEMROGRAMAN’;
Delete(A,3,2); Writeln(A); Insert(’ASAM’,A,5); writeln(B); End.

A . BASA           B.   BASA                       C.  HA                D. BASA
BASAASAM             ASAMBASA                              HAASAM                  PEMROGRAMAN

81.    Apakah output dari program berikut  :
Var       A,B,C : Array [1..2,1..2] of integer;   M,N : integer;
Begin
A[1,1] := 1;  A[2,1] := 0;  B[1,1] := 1;  B[2,1] := 0
A[1,2] := 2;   A[2,2] := 1;   B[1,2] := 4;  B[2,2] := 6;
For M : = 1 to 2 DO
Begin
For N := 1 to 2 Do
Begin
C[M,N] := A[M,N] + B[M,N]; Write(C[M,N],’   ‘);
End;
Writeln; End; End.
A . 2     6              B.   2    0        C.  2    0            D.   2    7
0     7                    6    7             7    6                  6    0

82.    Type
Bahasa = (Pascal, BASIC, COBOL, Rakitan);
Hasil dari : Ord(Succ(Pred(Pred(COBOL)))) = …..
A.   Pascal        B.   BASIC           C.   0        D.   1

83.    Prosedur Standar Assign pada tipe file digunakan untuk :

84.    Prosedur standar Rewrite pada tipe file digunakan untuk : ……………………

85.    Prosedur Reset pada tipe file digunakan untuk : ……………………..

86.    Prosedur standar yang dapat digunakan untuk membuka file baru atau yang belum pernah ada di disk, adalah : …………..

87.    Prosedur standar yang dapat digunakan untuk membuka file yang sudah ada di disk : …………….

88.    Untuk mengetahui posisi direktori yang aktif pada suatu drive digunakan prosedur standar: …………………..

89.    Prosedur standar yang digunakan untuk membuka file yang telah ada untuk keperluan menambah data ke dalam file adalah : ………………..

90.    Tanda =, <,  >,  <>, <=, >= termasuk dalam operator ……….

91.    Fungsi standar yang dapat digunakan untuk membulatkan nilai dari real x ke nilai longInt terdekat adalah :  …………………..

92.    Tipe data pada program pascal yang bersifat statis adalah tipe data …………………  dan  ……………………

93.    Tipe data pada program pascal yang bersifat dinamis adalah tipe data …………………

94.    Type Hari = (minggu,senin,selasa,rabu,kamis,jum’at,sabtu); deklarasi tersebut termasuk kedalam tipe data  : …………..

95.    Didalam pascal dikenal 3 macam tipe dari file, yaitu :……………………………

96.    Prosedur standar yang digunakan untuk segera merekamkan data yang ada di buffer ke file dengan sintak :…………………

97.    Prosedur standar yang digunakan untuk membuka file yang telah ada untuk keperluan menambah data ke dalam file adalah :…………………

98.    Prosedur Standar Release digunakan untuk……………………….

99.    Prosedur standar Flush digunakan untuk :

100.    Prosedur standar Assign pada tipe file digunakan untuk :

101.    Prosedur standar Rewrite pada tipe file digunakan untuk :

102.    Prosedur Reset pada tipe file digunakan untuk :

jual-buku-stan-2014

Untuk membeli buku ini kamu bisa langsung buka web www.bukustan.com

atau klik Gambar dibawah ini

bukustanOK
Tags »

Write your comment about LATIHAN SOAL PASCAL TERBARU


Related post to LATIHAN SOAL PASCAL TERBARU

Asyik, Pelamar CPNS Bisa Langsung Tahu Hasilnya Lho

Asyik, Pelamar CPNS Bisa Langsung Tahu Hasilnya Lho

1.      Var A,B : Integer; Procedure Uji(A : Integer); Begin A := A + 1; Write(A:3); End; Begin A := 2; Write(A:3); Uji(A); Write(A:3); End. 2.    Jika pada SOAL... more detail
Daftar Jadi CPNS di Kemenperin Mulai Hari Ini Yuk

Daftar Jadi CPNS di Kemenperin Mulai Hari Ini Yuk

1.      Var A,B : Integer; Procedure Uji(A : Integer); Begin A := A + 1; Write(A:3); End; Begin A := 2; Write(A:3); Uji(A); Write(A:3); End. 2.    Jika pada SOAL... more detail
Kementerian Agama Cari CPNS untuk Jadi Dosen

Kementerian Agama Cari CPNS untuk Jadi Dosen

1.      Var A,B : Integer; Procedure Uji(A : Integer); Begin A := A + 1; Write(A:3); End; Begin A := 2; Write(A:3); Uji(A); Write(A:3); End. 2.    Jika pada SOAL... more detail
Kuota CPNS Bidang Kesehatan & Pendidikan Diprioritaskan

Kuota CPNS Bidang Kesehatan & Pendidikan Diprioritaskan

1.      Var A,B : Integer; Procedure Uji(A : Integer); Begin A := A + 1; Write(A:3); End; Begin A := 2; Write(A:3); Uji(A); Write(A:3); End. 2.    Jika pada SOAL... more detail
Rebut 595 Kursi CPNS di BPN!

Rebut 595 Kursi CPNS di BPN!

1.      Var A,B : Integer; Procedure Uji(A : Integer); Begin A := A + 1; Write(A:3); End; Begin A := 2; Write(A:3); Uji(A); Write(A:3); End. 2.    Jika pada SOAL... more detail