
Jajar Genjang --- Menghitung jajar genjang menggunakan pemrograman Pascal, dalam melakukan pengkodingan menghitung nilai jajar genjang, yang pertama kita perlu ketahui yaitu rumus dari mencari nilai jajar genjang, karena ini akan dimasukan kedalam koding program. Melakukan pengkodingan dalam mencari nilai jajar genjang seperti dalam contoh sebelumnya tentang kalkulator, yang membedakan yaitu bagian deklarasi prosesnya. kemarin dalam program kalkulator prosesnya berisi tentang matematika dasar yaitu penjumlahan. Dalam jajar genjang berisi rumus mencari jajar genjang.
aplikasi compiler yang kita gunakan dalam praktek kali ini yaitu Turbo Pascal for Windows (TPW 1.5). bagi yang belum punya aplikasinya, silahkan klik link berikut.
Baca juga : https://tekprogapp.blogspot.co.id/2017/10/turbo-pascal-for-windows-tpw-15.htmlKoding menghitung nilai jajar genjang sebagai berikut:
Program luas_jajaran_genjang;
uses wincrt
uses wincrt
var
alas,tinggi,L;real;
begin
write('Program menghitung jajaran genjang');
writeln('===============================');
write('masukkan alas;');readln(alas);
write('masukkan tinggi;');readln(tinggi);
L:=alas*tinggi;
writeln('luas jajaran genjang :',L);
End.
Terdapat perbedaan script dalam menggunakan aplikasi compiler pascal, seperti dalam TPW 1.5 menggunakan uses wincrt; berbeda dengan freepascal yang menggunakan uses crt; kedua aplikasi ini menggunakan bahasa pemrograman yang sama yaitu pascal namun dalam penggunaan aplikasinya menjadi sedikit berbeda dikarenakan perbedaan penggunaan dan model system operasi yang digunakan. makanya untuk membedakan system yang digunakan ditambah kode uses . yang merupakan kode pengenal system.begin
write('Program menghitung jajaran genjang');
writeln('===============================');
write('masukkan alas;');readln(alas);
write('masukkan tinggi;');readln(tinggi);
L:=alas*tinggi;
writeln('luas jajaran genjang :',L);
End.
Baca juga : Mengenal bahasa pemrograman PascalUntuk penjelasan mengenai pascal bisa klik link diatas. Demikian contoh program kali ini tentang Menghitung nilai jajar genjang dengan TPW 1.5. semoga bermanfaat. Wassalam..
- Pascal : Cara membuat Program Generator Tulisan Terbalik
- Aplikasi Free Pascal Download Gratis disertai Cara Download dan Cara Instal Lengkap
- Program Pascal : Cara Membuat Program Mencari Nilai Luas Trapesium
- Program Pascal : Contoh penggunaan PROCEDURE dan perulangan IF ELSE membuat piramid Bilangan
- Program Pascal : Contoh program pascal menggunakan Array
- Mempelajari Array Penyimpanan data dalam Pemrograman dunia IT
- Program Pascal : Membuat program untuk menghitung Nilai berpangkat dengan Procedure
- Pascal : Contoh Program menggunakan Perulangan For To Do, DIV dan MOD
- Program Pascal : Kalkulator Mencari Nilai rata-rata contoh kode Procedure dan Array
- Pascal : Menentukan Tahun Kabisat yang mengirimkan sebuah Boolean dengan Function
- Pemrograman Pascal : Mengenal Nilai Genap dengan Array
- Pascal : Membuat Perhitungan Gaji dengan Turbo Pascal
- Pemrograman Pascal : Contoh Array 1 dimensi
- Pascal : Menghitung nilai Jajar Genjang dengan Turbo Pascal For Windows (TPW 1.5)
- Pascal : Penggunaan script Repeat Until dan Case Break
- Pascal : Membuat Program Menghitung detik menggunakan DIV MOD
- Pascal : Program Konversi Suhu menggunakan Case
- Mempelajari Algoritma Pemrograman Berorientasi Objek dikenal OOP
- Web : Cara mengatur Paragraf html code menjadi lebih teratur
- HTML : Belajar HTML Memasukkan link Bahasa Pemrograman WEB
No comments:
Post a Comment
Silahkan isi komentar, jika ada yang ingin ditanyakan...