Program Mencari Luas Permukaan tabung & Luas permukaan kerucut menggunakan Prosedur & Function

#include <cstdlib>
#include <iostream>

using namespace std;

void prosedur ()
{
     double r,t,phi;
     phi=3.14;
     cout<<" Jari-jari: ";
     cin>>r;
     cout<<"  Tinggi: ";
     cin>>t;
     cout<<"   Luas permukaan: "<<2*phi*r*r+2*phi*r*t<<endl;
     cout<<endl;
}
   
double nama()
{
      double r,s,phi;
     cout<<" Jari-jari: ";
     cin>>r;
     cout<<"  Sisi miring: ";
     cin>>s;
     phi=3.14;
     cout<<"   Luas permukaan kerucut: ";
      return phi*r*r+phi*r*s;
}
   
int main ()
{
    system ("color f0");
    prosedur();
    cout<<nama();
    cout<<endl;
 
    cout<<endl;
    system("PAUSE");
    return EXIT_SUCCESS;
}

| Free Bussines? |