Free Printable UTS Algoritma dan Pemrograman

1.

Tampilan output program di atas adalah

a)

Nama saya Mukidi

Saya ganteng

sekali

b)

Nama saya Mukidi

Saya gantengsekali

c)

Nama saya Mukidisekali

Saya ganteng

d)

Nama saya MukidiSaya ganteng

sekali

e)

Nama saya Mukidi

sekali

Saya ganteng

2.

Kemampuan program ini adalah ....

a)

Meminta masukan nama dan usia sekarang

b)

Menebak usia user sekarang

c)

Menampilkan nama dan usia user ketika lulus

d)

Menampilkan tanggal lahir user

e)

Menghitung usia user 3 tahun lagi

3.

Kesalahan-kesalahan yang mengakibatkan program berikut gagal dicompile adalah ....

a)

variabel K belum didefinisikan

b)

variabel L seharusnya bertipe integer

c)

nilai pi yang diberikan salah seharusnya 3.14

d)

cara assignment yang salah

e)

cara penulisan formula yang salah

4.

Istilah” perulangan “ dalam pemograman pascal dikenal dengan ...

a)

Repeating

b)

Again

c)

Funtion

d)

Replay

e)

Looping

5.

berikut ini yang bukan keuntungan modularisasi yaitu ...

a)

Menghindari penulisan teks program yang sama secara berulang-ulang.

b)

Kemudahan dalam menulis dan menemukan kesalahan program.

c)

Mudah dimengerti

d)

semua salah

6.

Bagian pada baris 1 adalah

a)

Judul program

b)

Alur program

c)

Badan program

d)

Deklarasi program

7.

Pemberian nama variabel yang benar adalah …

a)

%nilai

b)

nilai_mahasiswa

c)

nama mahasiswa

d)

&panjang

e)

alamat!

8.

statment yang digunakan untuk kontrol percabangan 1 kondisi adalah..

a)

If...else If..else

b)

If ...Else

c)

Case

d)

If...Then

e)

If... Else Bersarang

9.

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.

Jika X = 5 Dan Y = 4 Maka Hasil = .....

a)

0

b)

4

c)

5

d)

Semua Salah

10.

Manakah pendeklasian tipe record yang benar dibawah ini :

a)

Type

RecDosen = Record;

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

RecMhs = Record;

string [20]; End;

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

b)

Type

Nilaiujian = Record

UTS,UAS : real; End;

DataMhs = Record

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

c)

Type

RecPegawai : Record

Begin

nopeg = integer; nama =

d)

semua salah

11.

program Hello;

var a : integer;

b : string;

begin

a := '10';

b := '12';

writeln(a + b);

end.

Apa hasil dari program diatas?

a)

22

b)

10

c)

Error

d)

'22'

UTS Algoritma dan Pemrograman

Total questions: 11

Worksheet time: 6mins

Similar Resources on Wayground