PROGRAM MENENTUKAN BILANGAN GENAP ATAU GANJIL DENGAN PASCAL

program Menentukan_Bilangan_Genap_atau_Ganjil; uses crt; var angka : integer; begin clrscr; writeln('MENENTUKAN BILANGAN GENAP ATAU GANJIL'); writeln; write('Masukkan angka: '); readln(angka); writeln; if (angka mod 2 = 0) then writeln(angka,' adalah Bilangan Genap') else writeln(angka,' adalah Bilangan Ganjil'); readln; end. mod digunakan...

Read More

PROGRAM MENGHITUNG LUAS DAN KELILING SEGITIGA DENGAN PASCAL

program Menghitung_Luas_dan_Keliling_Segitiga; uses crt; var  luas, alas, tinggi, sisimiring, keliling : real; begin clrscr; writeln('MENGHITUNG LUAS DAN KELILING SEGITIGA'); writeln; write('Masukkan alas : '); readln(alas); write('Masukkan tinggi : '); readln(tinggi); luas:= 0.5*alas*tinggi; sisimiring:=sqrt(sqr(alas)+sqr(tinggi)); keliling:=...

Read More

LOOPING DAN ARRAY PADA PASCAL

Di dalam Pascal terdapat beberapa perintah pengulangan (Looping), salah satunya adalah REPEAT….UNTIL…. dan FOR…DO atau FOR….DOWNTO…DO… . Contoh program dengan perintah...

Read More

KONDISI PADA PASCAL

KONDISI PADA PASCAL Di dalam Pascal terdapat beberapa perintah kondisi, salah satunya adalah IF…THEN… dan Case….Of….. . Contoh program dengan perintah IF THEN : Ketikkan syntax...

Read More

PROGRAM SEDERHANA PASCAL

BAHASA PEMROGRAMAN PASCAL Pascal adalah salah satu bahasa pemrograman tingkat tinggi. Sebelum menuliskan statement  pada Pascal, harus mendeklarasikan terlebih dahulu...

Read More