Luas Dan Keliling Bidang Datar

  • Uploaded by: budi anton
  • 0
  • 0
  • June 2020
  • PDF

This document was uploaded by user and they confirmed that they have the permission to share it. If you are author or own the copyright of this book, please report to us by using this DMCA report form. Report DMCA


Overview

Download & View Luas Dan Keliling Bidang Datar as PDF for free.

More details

  • Words: 437
  • Pages: 3
Luas Dan Keliling Bidang Datar #include "conio.h" #include "iostream.h" #define phi 3.14 void main() { float tg, al, ss, lb, ls, kll, lj, r; int bgn; do { clrscr (); cout<<"==========================\n" ; cout<<"| MENU |\n"; cout<<"==========================\n" ; cout<<"|1. Segitiga |\n"; cout<<"|2. Persegi |\n"; cout<<"|3. Persegi Panjang |\n"; cout<<"|4. Lingkaran |\n"; cout<<"|5. Jajar Genjang |\n"; cout<<"|6. Belah Ketupat |\n"; cout<<"|7. Trapesium |\n"; cout<<"|8. Keluar . . . |\n"; cout<<"==========================\n" ; cout<<"Masukan Pilihan Anda : "; cin>>bgn; cout<<"==========================\n"; switch(bgn) { case 1 : cout<<"\nMasukan Tinggi Segitiga : "; cin>>tg; cout<<"Masukan Lebar Alas Segitiga : "; cin>>al; cout<<"Masukan Sisi Segitiga : "; cin>>ss; ls = 0.5*tg*al; kll = ss+ss+ss; cout<<"\nLuas Segitiga Adalah "< cout<<"\nKeliling Segitiga Adalah "< cout<<"\n\nAnda ingin melanjutkan proses (ya = 1/ no = 0): "; cin>>lj; break; case 2 : cout<<"\nMasukan Sisi Persegi : "; cin>>ss; kll = 4*ss; ls = ss*ss; cout<<"\nLuas Persegi Adalah "< cout<<"\nKeliling Persegi Adalah "< cout<<"\n\nAnda ingin melanjutkan proses (ya = 1/ no = 0): "; cin>>lj;

break; case 3 : cout<<"\nMasukan Panjang Persegi Panjang : "; cin>>ss; cout<<"Masukan Lebar Persegi Panjang : "; cin>>lb; kll = 2*(ss+lb); ls = ss*lb; cout<<"\nLuas Persegi Panjang Adalah "< cout<<"\nKeliling Persegi Panjang Adalah "< cout<<"\n\nAnda ingin melanjutkan proses (ya = 1/ no = 0): "; cin>>lj; break; case 4 : cout<<"\nMasukan Jari - Jari Lingkaran : "; cin>>r; kll = phi*(r+r); ls = phi * r * r; cout<<"\nLuas Lingkaran Adalah "< cout<<"\nKeliling Lingkaran Adalah "< cout<<"\n\nAnda ingin melanjutkan proses (ya = 1/ no = 0): "; cin>>lj; break; case 5 : cout<<"\nMasukan Panjang Sisi Jajar Genjang : "; cin>>ss; cout<<"Masukan Lebar Sisi Jajar Genjang : "; cin>>lb; cout<<"Masukan Alas Jajar Genjang : "; cin>>al; cout<<"Masukan Tinggi Jajar Genjang : "; cin>>tg; kll = 2*(ss+lb); ls = tg*al; cout<<"\nLuas Jajar Genjang Adalah "< cout<<"\nKeliling Jajar genjang Adalah "< cout<<"\n\nAnda ingin melanjutkan proses (ya = 1/ no = 0): "; cin>>lj; break; case 6 : cout<<"\nMasukan Panjang Sisi Belah Ketupat : "; cin>>ss; cout<<"Masukan Lebar Sisi Belah Ketupat : "; cin>>lb; cout<<"Masukan Panjang Diagonal Belah ketupat : "; cin>>al; cout<<"Masukan Alas belah Ketupat : "; cin>>tg; kll = 2*(ss+lb); ls = (tg*al)/2;

cout<<"\nLuas Belah Ketupat Adalah "< cout<<"\nKeliling Belah Ketupat Adalah "< cout<<"\n\nAnda ingin melanjutkan proses (ya = 1/ no = 0): "; cin>>lj; break; case 7 : cout<<"\nMasukan Panjang Sisi Trapesium : "; cin>>ss; cout<<"Masukan Lebar Sisi Trapesium : "; cin>>lb; cout<<"Masukan Tinggi Trapesium : "; cin>>tg; kll = 2*(ss+lb); ls = (ss+ss*tg)/2; cout<<"\nLuas Trapesium Adalah "< cout<<"\nKeliling Trapesium Adalah "< cout<<"\n\nAnda ingin melanjutkan proses (ya = 1/ no = 0): "; cin>>lj; break; } } while(bgn >=1 && bgn <= 8 ); getch(); }

Related Documents


More Documents from "Mr. Re. D. Lc"