One dimentional pre-consolidation settlement, under compacted fill [CSVTU 8th sem Civil, unit-3 Geotech]

/* determination of one dimentional pre-consolidation
settlement, under compacted fill
*/
#include
#include
#include

void main()
{
//H = thikness of soil
//Pi= initial overburden pressure
//Pp = preconsolidation pressure
//Ip= increase in pressure
//Cs= swelling Index
//Cc = Compression Index
//e = Void Ratio
//Pf= Pre- Consolidation Settlement
float H, Pi, Pp, Ip, Pf;
float Cs, Cc, e;
float p;
clrscr();
cout<<"Entre thikness of soil (metre):";
cin>>H;
cout<<"\nEntre initial overburden pressure, pre-consolidation pressure and increase in pressure (KN/sqm): \n ";
cin>>Pi>>Pp>>Ip;
cout<<"\nEntre Swelling index, Compression Index and Void Ratio:\n";
cin>>Cs>>Cc>>e;

p= Pi + Ip;

//Calculation of Pre- Consolidation Settlement
if(Pi > Pp)
{
Pf= ((Cs * H * log10(p/Pi))/(1+e));
}
else
Pf= ((Cs * H * log10(Pp/Pi))/(1+e)) + ((Cc * H * log10(p/Pp))/(1+e));

cout<<"Pre-Consolidation settlement is="< getch();
}