Unit Crt yang digunakan untuk memberi background warna pada tulisan

SOAL DAN JAWABAN PROGRAM PASCAL 1. Struktur pertama dalam Pascal adalah.....A. Char; B. String C. End. D. Writeln E. Uses Crt; Jawaban : EAlasan : Setiap program Pascal diawali "Uses Crt;" untuk mengenali sistem operasi yang digunakan2. Untuk melihat hasil dari program yang di kerjakan tekan tombol....A. Ctrl+F5 B. Ctrl+F9 C. Ctrl+F2 D. Ctrl+F12 E. Ctrl+F4 Jawaban : BAlasan : Untuk menjalankan listing kode Pascal pada menggunakan keyboard yaitu menggunakantombol "Ctrl+F9")3. Berapa kode yang digunakan untuk membuat tulisan berwarna “CYAN”....A. 4B. 2C. 128D. 7E. 3Jawaban : EAlasan : Ada beberapa kode angka untuk mengubah warna teks, salah satunya "3" yaitu untukmembuat teks berwarna CYAN4. Perintah dasar sederhana dalam program Pascal adalah.....A. Readln B. End C. Write D. Writeln E. Uses crt;Jawaban : CAlasan : Perintah dasar untuk menampilkan nilai dilayar dalam bahasa Pascal adalah "Write"5. Tipe data bahasa Pascal untuk TRUE FALSE adalah....A. String B. Char C. Boolean D. Byte E. Real Jawaban : CAlasan : Type data yang mempunyai dua nilai yaitu benar atau salah (true or false) disebut dengantipe data boolean.

6. Siapakah penemu program Pascal....Jawaban : BAlasan : Menurut sejarah bahasa pemrograman Pascal menyebutkan bahwa penemu bahasa Pascalyaitu Prof. Niklaus Wirth 7. Struktur bahasa pemrograman Pascal paling pertama adalah....A. Var; B. Begin C. End; D. Uses crt; E. Writeln; Jawaban : DAlasan : Setiap program Pascal diawali "Uses Crt;" atau “Win cat;” untuk mengenali sistem operasiyang digunakan apakah dos atau window. 8. Tipe data Pascal untuk karakter adalah....A. Char B. Boolean C. Integer D. Real E. Byte Jawaban : AAlasan : Dalam bahasa Pascal dikenal beberapa tipe data, salah satunya "Char" yaitu tipe data untukmemasukan sebuah karakter 9. Kapan terbentuknya Pascal....Jawaban : BAlasan : Menururt sejarah bahasa Pascal ditemukan pada tahun "1971" 10. Apa kepanjangan dari USES....Jawaban : CAlasan : USES kepanjangannya “Unit System” adalah untuk pengenalan sistem operasi yangdigunakan11. Berikut ini adalah penulisan identifier yang benar dalam pemrograman Pascal adalah....A. 9Program_SatuB. Program_Satu

C. Program Satu D. BeginE. ArrayJawaban : BAlasan : Penulisan identifier dalam bahasa Pascal tidak boleh memakai spasi, simbol lain atauangka di depan identifier

Upload your study docs or become a

Course Hero member to access this document

Upload your study docs or become a

Course Hero member to access this document

End of preview. Want to read all 48 pages?

Upload your study docs or become a

Course Hero member to access this document

Hmm... pernah merasa bosan dengan tampilan program pascal yang warna latar nya (background) hitam polos ketika di-compile?
Kalau iya, ayo ikuti tutorial di bawah ini

Persiapan :

Salin semua file yang ada di folder BGI dan UNITS ke folder dimana Anda menaruh file TPX.EXE
Tekan Alt+Enter untuk berubah ke layar fullscreen

Terus?

Jangan lupa menggunakan unit graph. Unit graph digunakan dengan menambahkan 'uses graph' (tanpa tanda petik) di awal program/di bawah 'program nama_program', sebaiknya gunakan unit crt juga: uses crt,graph
Jangan lupa untuk mendeklarasikan variabel yang berupa integer untuk digunakan dengan initgraph, contoh : var gp,gm:integer;
Selanjutnya, di bagian program utama tambahkan 3 baris program sebagai berikut (contohnya dengan menggunakan variabel di atas) : gp:=detect; initgraph(gp,gm,''); setbkcolor(warna);

Keterangan warna :

Pada tahap 3 di atas sudah ada
setbkcolor(warna)Nah kita bisa mengganti warna nya dengan ketentuan sebagai berikut :

0 = Black
1 = Blue
2 = Green
3 = Cyan
4 = Red
5 = Magenta
6 = Brown
7 = LightGray
8 = DarkGray
9 = LightBlue
10= LightGreen
11 = LightCyan
12 = LightRed
13 = LightMagenta
14 = Yellow
15 = White

Anda boleh menuliskan nomor nya maupun warna nya langsung

Membuat TulisanUntuk membuat tulisan pada mode grafik tidak bisa dengan menggunakan perintah write atau writeln ada perintah khusus, yaitu outtext atau outtextXY, lihat contoh program.
program warna_latar; uses crt,graph; {atau uses wincrt,graph;} var gp,gm : integer; nama : string; begin gp:=detect; initgraph(gp,gm,''); setbkcolor(green); outtextXY(250,250'Nama Anda?'); readln(nama); moveto(260,270); outtext('Hi, '+nama); readkey; end. Yang di atas itu kalau kita tambahkan unit graph baru bisa jalan, tapi ada beberapa perintah sejenis yang hanya bisa digunakan dengan unit crt, yaitu :

Untuk mengubah warna text :

textcolor(warna)

Untuk mengubah latar text :

textbackground(warna) Gimana, sudah paham? atau kurang jelas? Silahkan berkomentar

Akan saya jawab sebisanya

Oh, ya... tunggu dulu, ada beberapa kekurangan jika kita menggunakan unit graph, salah satu nya karakter-karakter seperti titik(.), koma(,), tanda tanya(?), dan sejenisnya tidak muncul dengan baik di layar.

*Artikel ini di-posting atas permintaan saudara Opik. Terima kasih