Ads 468x60px

Labels

Senin, 21 Oktober 2013

BANGUN RUANG dengan C++

Listing Program

#include <vcl.h>
#include <stdio.h>
#include <conio.h>

int pilih,p=0;
kubus(){
int l,v,s;
printf("\nMasukan Panjang Rusuk : ");scanf("%d",&s);
l=6*s*s;
v=s*s*s;
printf("\nLuas Kubus\nRumus=luas=6*s*s\nluas=6*%d*%d = %d",s,s,l);
printf("\nVolume Kubus\nVolume=s*s*s\nvolume=%d*%d*%d = %d",s,s,s,v);}

balok(){
int p,l,t,ls,v;
printf("\nPanjang Balok = ");scanf("%d",&p);
printf("\nLebar Balok = ");scanf("%d",&l);
printf("\nTinggi Balok = ");scanf("%d",&t);
ls=2*((p*l)+(p*t)+(l*t));
v=p*l*t;
printf("\nLuas Balok\nRumus=2*((p*l)+(p*t)+(l*t))\n2*((%d*%d)+(%d*%d)+(%d*%d)) = %d",p,l,p,t,l,t,ls);
printf("\nVolume Balok\nRumus=p*l*t\n%d*%d*%d = %d",p,l,t,v);}

tabung(){
float r,t,l,v;
printf("\nMasukan Jari-Jari\t= ");scanf("%f",&r);
printf("\nMasukan Tinggi\t= ");scanf("%f",&t);
l=2*3.14*r*(r+t);
v=3.14*r*r*t;
printf("\nLuas Tabung\nRumus=2*3.14*r*(r+t)\n2*3.14*%2.0f*(%2.0f+%2.0f) = %2.2f",r,r,t,l);
printf("\nVolume Tabung\nRumus=3.14*r*r*t\n3.14*%2.0f*%2.0f*%2.0f = %2.2f",r,r,t,v);}

bola(){
float r,l,v;
printf("\nMasukan Jari-Jari Bola\t=");scanf("%f",&r);
l=4*3.14*r*r;
v=1.333333*3.14*r*r*r;
printf("\nLuas Bola\n Rumus=4*3.14*r*r\n4*3.14*%2.0f*%2.0f = %2.2f",r,r,l);
printf("\nVolume Bola\n Rumus=1.333333*3.14*r*r*r\n1.333333*3.14*%2.0f*%2.0f*%2.0f = %2.2f",r,r,r,v);}

main()
{
do{
clrscr();
printf(" MENU UTAMA BANGUN RUANG\n\n\r");
printf("Silahkan Memilih Menu\n\r");
printf("1.Kubus\n\r");
printf("2.Balok\n\r");
printf("3.Tabung\n\r");
printf("4.Bola\n\r");
printf("5.Selesai\n\r");
printf("Masukan Pilihan : ");scanf("%d",&pilih);
switch(pilih){
case 1:{
clrscr();
printf("LUAS DAN VOLUME KUBUS");
kubus();
getch();
break;}

case 2:{
clrscr();
printf("LUAS DAN VOLUME BALOK");
balok();
getch();
break;}

case 3:{
clrscr();
printf("LUAS DAN VOLUME TABUNG");
tabung();
getch();
break;}

case 4:{
clrscr();
printf("LUAS DAN VOLUME BOLA");
bola();
getch();
break;}

case 6:{
exit(p);
break;}
default:{
break;}

}}
while(pilih!=5);
}

0 komentar:

Posting Komentar

"Qul Khairan Aw Liyasmut"

 

Sample text

IMAN

Sample Text

ISLAM

Sample Text

IHSAN