Program Hitung Luas Lingkaran di Pascal

Salam Pascal Mania !

Kali ini mimin mau nge-share bagaimana script menghitung luas lingkaran.

Mau belajar lengkap pemrogramaan klik DISINI banyak PDF Lengkap seputar pemrogramman

Lingkaran mempunyai tiga variabel dalam bahasa pemrograman pascal yang saya gunakan, pertama deklarasi variabel phi yang bernilai 3.14 atau 22/7. Kedua, deklarasi variabel jari-jari (r) dan terakhir adalah luas.

Sehingga rumus matematis yang kita dapatkan adalah luas = Π x r².

Adapun skrip nya sebagai berikut, monggo di copas mawon yo :

var
    phi  : real;
    r    : real;
    luas : real;
begin
    write('Masukan jari-jari : ');
    readln(r);
    phi:=3.14;
    luas:=phi * r * r;
writeln('Luasnya : ',luas:2:2);
    readln;
end.

Untuk lebih memahami skrip di atas, bolehlah mimin kasih tau perbarisnya :

1. Baris pertama menjelaskan pemanggilan fungsi variabel
2. Deklarasi variabel phi bertipe data real (desimal)
3. Deklarasi variabel r sebagai jari-jari yang bertipe data real
4. Deklarasi variabel luas sebagai tipe data real (wajib real karena pecahan)
5. Mulai 
6. Inputan jari-jari 
7. Disimpan inputan tadi di variabel r
8. Menentukan bahwa nilai phi adalah 3.14
9. Ini menjelaskan tentang proses perhitungan
10. Mencetak nilai luas
11. Dibaca
12. Selesai

Kalau sudah memahami semua, apabila program tersebut di compile hasilnya kek gini :

Demikian hasilnya, semoga bermanfaat. Makasih telah berkunjung

Salam Pascal Mania !

Mau belajar lengkap pemrogramaan klik DISINI banyak PDF Lengkap seputar pemrogramman

Program Pascal Hitung Luas Persegi Panjang

Salam Pascal Mania !

Kali ini admin mau kasih source kode mengenai bagaimana cara menghitung luas bangun datar seperti persegi panjang. Kita semua tau persegi panjang mempunyai rumus yang bagus yakni Panjang dikali Lebar atau yang kita tau L=PxL. Dari bagian-bagian rumus tadi dalam pemrograman pascal kita anggap variabel.

Mau belajar lengkap pemrogramaan klik DISINI banyak PDF Lengkap seputar pemrogramman

Var
p,l : integer;
luas : integer;
begin
write('Masukan panjang : ');
readln(p);
write('Masukan lebar : ');
readln(l);
luas:= p * l;
writeln('Luasnya adalah : ',luas);
readln;
end.

Adapun penjelasan Sintax (Perbaris) nya sebagai berikut :

1. Memanggil Fungsi Variabel
2. Deklarasi variabel panjang dan lebar
3. Deklarasi variabrl luas
4. Mulai coding
5. Inputan panjang
6. Disimpan di variabel p
7. Inputan lebar
8. Disimpan di variabel l
9. Rumus/proses perhitungan
10. Menampilkan hasil perhitungan
11. Dibaca
12. Selesai

Setelah script tadi dibuat, maka outputnya sebagai berikut :

Demikian program pascal persegi panjang yang sudah admin rangkum semoga bermanfaat untuk semuanya. 

Salam Pascal Mania ! 😂😂

Mau belajar lengkap pemrogramaan klik DISINI banyak PDF Lengkap seputar pemrogramman

Program Pascal Hitung Luas Persegi

Salam Pascal Mania ! 

Oh iya mimin kali ini mau kasih source kode pascal untuk menghitung luas persegi. 

Mau belajar lengkap pemrogramaan klik DISINI banyak PDF Lengkap seputar pemrogramman

Kita pasti udah hafal bener dikepala rumus matematis menghitung luas bangun datar layaknya persegi. Bahkan saking hafalnya kita semua sampe lupa hehehe 😁😁

Kita wajib sepakat kalo rumus matematisnya itu adalah luas(L) = Sisi x Sisi (S²) maka untuk dipascalnya misalkan kita gunakan Variable 'Luas' untuk menngidentifikasikan Luas dan 'Sisi' untuk mengidentifikasikan Sisi. Biar agan gak keliru maksudnya begitu. 

Source Kodenya sebagai berikut gan :

Var
Sisi, Luas : integer;
begin
write('Masukan Sisi : ');
readln(Sisi);
Luas:= Sisi * Sisi;
writeln('Luasnya adalah = ', Luas);
readln;
end.

Penjelasannya (Perbaris) :

BARIS1 Karena kita membuat program yang berupa perhitungan matematis, otomatis akan ada penyimpan nilai sementara atau yang kita sebut dengan Variable ya gan, nah untuk itu 'Var' pada baris pertama berguna untuk memanggil fungsi Variabel yang ada di pascal.

BARIS2 itu kita tulis apa saja variablenya, kalau hitung persegi kan cuma dua (Luas dan Sisi) maka deklarasi variablenya kita tulis (langsung) bertipe data Integer. Maka menjadi Sisi, Luas : Integer;

BARIS3 Mulai penulisa program

BARIS4 Ini perintah untuk inputan Sisi

BARIS5 Nanti nilai inputan nya disimpan di baris ini

BARIS6 Kalau sudah disimpan maka nanti diproses/dihitung pada rumus ini

BARIS7 Kemudian hasilnya ditampilkan disini

BARIS8 Dibaca

BARIS9 Selesai

Dan, berikut hasil Screenshoot untuk outputnya setelah di Compile jadi kek gini 

• Outputan

Semoga bisa membantu untuk Sobat Pascal Mania 😂 Salam Pascal Mania !

Mau belajar lengkap pemrogramaan klik DISINI banyak PDF Lengkap seputar pemrogramman.