Menghitung Keuntungan dari Pendapatan dan Pengeluaran Secara Sederhana
Menggunakan Pascal
Disini yang saya menggunakan free pascal.
Yang perlu kita perhatikan disini yaitu :
- uses crt
- pendapatan,pengeluaran,keuntungan kita defenisikan variabelnya real
- sebelum kita memulai pendiskripsian setelah begin jangan lupa mengetik clscr; untuk membersihkan layar biar output yang kita hasilkan biar kita masukan lagi dan kita run lagi menghasilkan layar yang bersih.
- nilai pendapatan dan pengeluaran kita input sendiri untuk itu pendeskripsian perlu kita deskripsikan untuk memasukan nilai pendapatan dan pengeluaran.
- keuntungan kita deskripsian sebagai hasil pengurangan pendapatan dengan pengeluaran (keuntungan = pendapatan - pengeluaran.
- setelah selesai pendeskripsian jangan lupa end. untuk mengakhiri pendeskripsian.
uses crt;
var pendapatan,pengeluaran,keuntungan : real;
begin;
clrscr;
write ('masukan pendapatan = ');
readln (pendapatan);
write ('masukan pengeluaran = ' );
readln (pengeluaran);
keuntungan := pendapatan-pengeluaran;
writeln ('keuntungan =' , keuntungan 0:2);
end;
Output setelah program dijalankan :
Demikianlah posting dari saya.Semoga posting ini bemanfaat untuk anda.Terima Kasih.
No comments:
Post a Comment