Question

Write a program ( visual basic)

to calculate simple interest as SI = (P*R*T)/100

Answer 1

//c++programme to cal......
#include<iostream.h>
#include<conio.h>
void main()
{
int P,R,T,SI;
coun<<"enter the value of P ,R,T::";
cin>>P>>R>>T;
SI=(P×R×T)/100;
count<<SI;
getch();
}

Answer 2

Public Class Form1    Private Sub btnCalculate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCalculate.Click        Dim principal, years As Integer        Dim rate, interest, amount As Single
        principal = txtPrincipal.Text        years = txtYears.Text        rate = txtRate.Text
        If rbSimpleInterest.Checked = True Then            interest = (principal * years * rate) / 100        Else            amount = principal * Math.Pow((1 + rate / 100), years)            interest = amount - principal        End If        txtInterest.Text = interest    End Sub
    Private Sub btnClear_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnClear.Click        txtPrincipal.Text = " "        txtYears.Text = " "        txtRate.Text = " "        txtInterest.Text = " "    End Sub
    Private Sub btnExit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnExit.Click        End    End SubEnd Class