# Calculate Compound Interest ## Write a program to calculate compound interest Compound interest = principal amount \* (1 + rate of interest) ^ time ```txt Principal : 1000 Rate : 10 Time : 5 Compound interest : 1610.51 ``` --- ```c #include #include int main() { float CI, rate, PA, time; printf("Enter principal amount :"); scanf("%f", &PA); printf("Enter the rate :"); scanf("%f", &rate); printf("Enter time :"); scanf("%f", &time); // formula to calculate compound interest CI = PA * (pow((1 + rate / 100), time)); printf("Compound interest : %0.2f\n", CI); return 0; } ``` ```cpp #include using namespace std; int main() { // declaring variables // p=Principal amount // r=Rate of interest // t=time // ci=compound interest long double p,r,t,ci; // take input cout<<"Enter Principal amount : "; cin>>p; cout<<"\n"; cout<<"Enter Rate of interest : "; cin>>r; cout<<"\n"; cout<<"Enter time : "; cin>>t; cout<<"\n"; // Compound interest = principal amount * (1 + rate of interest) ^ time ci= p * pow((1+(r/100)),t); cout<<"Compound Interest = "; cout< ``` ```perl #!/usr/bin/perl use warnings; use strict; print "Enter the principal amount : "; my $principal = ; print "Enter the rate of interest : "; my $interest = ; print "Enter the time : "; my $time = ; my $compoundInterest = $principal * ((1 + $interest) ** $time); print "Compound Interest :".$compoundInterest, "\n"; ``` ```python principal = int(input()) rate = int(input()) time = int(input()) print(round(principal * ((1 + rate / 100) ** time), 2)) # Contributed by Raghav Garg ``` ```r # Function to calculate compound interest calculate_compound_interest <- function(principal, rate, time) { compound_interest <- principal * (1 + rate*0.01)^time return(compound_interest) } # Take user input for principal amount, rate of interest, and time principal <- as.numeric(readline("Principal: ")) rate <- as.numeric(readline("Rate : ")) time <- as.numeric(readline("Time : ")) # Validate input if (!is.numeric(principal) || !is.numeric(rate) || !is.numeric(time)) { cat("Invalid input. Please enter valid numeric values.") } else { # Calculate compound interest using the function compound_interest <- calculate_compound_interest(principal, rate, time) # Print the result cat("Compound Interest:", compound_interest, "\n") } ```

Calculate Compound Interest

Write a program to calculate compound interest

Contributors

Become a Sponsor