Monday, 9 December 2013

program menghitung geometri borland C++

program untuk menghitung geometri...ok langsung aj ...mari belajar..



#include <iostream.h>
#include <conio.h>
#include <math.h>

struct geo

{
float luas;
float panjang;
float lebar;
float sisi;
float alas;
float tinggi;
float jari;
};

geo persegi;
geo segipanjang;
geo segitiga;
geo lingkaran;
geo tabung;

void main()

{
{
cout<<"\n\n PERSEGI  \n\n";
cout<<" Masukkan sisi persegi            = ";cin>>persegi.sisi;
persegi.luas=persegi.sisi*persegi.sisi;
cout<<endl;
cout<<"===================================";
cout<<"\n\n PERSEGI PANJANG  \n\n";
cout<<" Masukkan panjang persegi panjang = ";cin>>segipanjang.panjang;
cout<<" Masukkan lebar persegi panjang   = ";cin>>segipanjang.lebar;
segipanjang.luas=segipanjang.panjang*segipanjang.lebar;
cout<<endl;
cout<<"====================================";
cout<<"\n\n SEGITIGA  \n\n";
cout<<" Masukkan alas segitiga           = ";cin>>segitiga.alas;
cout<<" Masukkan tinggi segitiga         = ";cin>>segitiga.tinggi;
segitiga.luas=0.5*segitiga.alas*segitiga.tinggi;
cout<<endl;
cout<<"====================================";
cout<<"\n\n LINGKARAN  \n\n";
cout<<" Masukkan jari-jari lingkaran     = ";cin>>lingkaran.jari;
lingkaran.luas=3.14*(lingkaran.jari*lingkaran.jari);
cout<<endl;
cout<<"====================================";
cout<<"\n\n TABUNG \n\n";
cout<<" Masukkan jari-jari tabung        = ";cin>>tabung.jari;
cout<<" Masukkan tinggi tabung           = ";cin>>tabung.tinggi;
tabung.luas=(2*(3.14*(tabung.jari*tabung.jari)))+(2*(3.14*tabung.jari)*(tabung.jari+tabung.tinggi));
cout<<endl;
cout<<"====================================\n\n";

cout<<" Luas Persegi                     = "<<persegi.luas<<endl;
cout<<" Luas Persegi Panjang             = "<<segipanjang.luas<<endl;
cout<<" Luas Segitiga                    = "<<segitiga.luas<<endl;
cout<<" Luas Lingkaran                   = "<<lingkaran.luas<<endl;
cout<<" Luas Tabung                      = "<<tabung.luas<<endl;

}
getch();
}

No comments:

T
I
I
G
O
L
O
N
K
E
T
K
I
R
T
-
K
I
R
T