A simple loan interest solver that I wrote using Pascal as my programming language that will solve for the interest rate of the loan of a person. I am using Turbo Pascal 5.5 For DOS as my Pascal compiler.
If you have some questions please send me an email at jake.r.pomperada@gmail.com and jakerpomperada@yahoo.com.
My mobile number here in the Philippines is 09173084360.
Sample Program Listing
Program Listing
Program Simple_Interest_Solver;
Uses Crt;
Var p,r,t,solve_interest : Real;
Begin
p:=0.00;
r:=0.00;
t:=0;
solve_interest := 0.00;
clrscr;
write('Simple Interest Solver');
writeln; writeln;
write('Enter the Principle Amount : Php ');
readln(p);
write('Enter the Rate of Interest : ');
readln(r);
write('Enter the Time Period : ');
readln(t);
solve_interest:=(p*r*t)/100;
writeln; writeln;
write('The simple interest is Php ',solve_interest:5:2,'.');
writeln; writeln;
write('End of Program');
readln;
End.
