KONVERSI SUHU DALAM PASCAL

Ini Adalah Coding Program Konversi Suhu untuk mengetahui pengkonversian dari suhu derajat ke suhu lainnya

Program KonversiSuhu;

uses crt;

var

     celcius, reamur, fahrenheit, kelvin : real;

begin

clrscr;

     write(’Masukan besarnya suhu dalam derajat : ‘);readln(celcius);

     reamur:=((4/5)*celcius);

     fahrenheit:=(32+(9/5)*celcius);

     kelvin:=(celcius+273);

Read More

MERUBAH WARNA LATAR PASCAL

MENGATUR WARNA LATAR
ARTIKEL INI DARI SUMBER LAINNYA
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);

Read More

Contoh Sederhana Program Pascal

Read More