#include <iostream>
#include <conio.h>
#include <process.h>
#define phi 3.14
float V,L;
int r;
void menu()
{
cout<<"Pilih Program"<<endl;
cout<<"1.Hitung Luas Permukaan Bola"<<endl;
cout<<"2.Hitung Volume Bola"<<endl;
cout<<"3.Star"<<endl;
cout<<"4.Keluar"<<endl;
}
void star()
{
clrscr();
int i,j,n;
cout<<"Star"<<endl<<endl;
cout<<"Masukkan nilai N : "; cin>>n;
for (i=1;i<=n;i++)
{
for(j=i;j<=n;j++)
{
cout<<"* ";
}
cout<<endl;
}
}
void Volume_Bola()
{
clrscr();
cout<<"Volume Bola"<<endl<<endl;
cout<<"Masukkan jari-jari : "; cin>>r;
V = 1.33*phi*r*r*r;
cout<<"Volume Bola : "<<V<<endl;
}
void Luas_Permukaan_Bola()
{
clrscr();
cout<<"Luas Permukaan Bola"<<endl<<endl;
cout<<"Masukkan jari-jari : "; cin>>r;
L = 4*phi*r*r;
cout<<"Luas Permukaan Bola : "<<L<<endl;
}
void main()
{
int pilihan;
menu();
cout<<"Masukkan Pilihan Anda : "; cin>>pilihan;
switch(pilihan)
{
case 1 : Luas_Permukaan_Bola(); break;
case 2 : Volume_Bola(); break;
case 3 : star(); break;
case 4 : exit(0);
default : cout<<"Pilihan Tidak Tersedia";
}
getch();
}
c++ Menu Program Hitung Luas dan Volume Bola
Posted by Novia Mardiana On 01.07.00
Related Posts:
Tutorial Transformasi 2D di Delphi 7 Assalamualaikum... kembali lagi untuk berbagi ilmu nih... full code : unit Utama; interface uses Windows, Messages, SysUtils, … Read More
Tutorial Membuat 3D dengan Perspektif dan Paralel di Delphi 7Assalamualaikum... berbagi sedikit ilmu lagi :) full code : unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Gra… Read More
Tutorial Tulisan Berjalan di Delphi 7Assalamualaikum... Saya kembali lagi menulis di blog saya ini, saya ingin berbagi ilmu dengan kalian maupun sedikit namun semoga bermanfaat yah... :) … Read More
Latihan Soal Aljabar Boolean A B C D B’ A.B (A.B)’ B’.C C+D Output = (A.B)’ + (B’.C) + (C+D) 0 0 0 … Read More
Tutorial Membuat Bentuk Bidang Datar dan Garis di Delphi 7Assalamualaikum wr. wb. Kembali lagi dengan saya penulis di blog ini, disini saya ingin membagi ilmu sedikit yang saya dapatkan. Saya sudah lama tidak… Read More
0 komentar:
Posting Komentar