Omonot bo`yicha foizni va omonot muddati oxiridagi summani hisoblovchi dastur tuzing. Boshlang`ich ma`lumotlar sifatida omonot summasi, muddati va foizi berilgan.
Dastur listingi.
Program omonot;
var sum, foiz, yil, Oxirgisumma:real;
begin
writeln(`Omonot summasini kiriting `);
read(sum);
Writeln(`Omonot muddati yani necha yilga qo`yilganini kiriting `);
read(yil);
Writeln(`Necha foizga qo`yilganini kiriting `);
read(foiz);
Oxirgisumma:=sum*power(1+foiz/100,yil);
writeln(`Omonot oxirgi summasi:`,Oxirgisumma);