Vypocet doby splatok pozicky

12. 05. 2008 | † 17. 08. 2013 | kód autora: Aj0

Program Vpozicky;

{Vypocet doby splatok pozicky, posledny rok a mesiac pri znamej dobe pozicky}

var Pozicka,Splatka,mesiac,rok,pocetmesiacov: integer;

begin

Writeln('Zadaj pozicku v SK, mesacnu splatku, mesiac a rok zacatia splacania');

readln(Pozicka,splatka,mesiac, rok);

pocetmesiacov:=pozicka div splatka;

Writeln('Doba splatnosti je: ',pocetmesiacov, 'mesiace.');

pocetmesiacov:=pocetmesiacov+mesiac-1;

writeln('Ukoncenie platby bude v ',pocetmesiacov mod 12+1,'.mesiaci ',pocetmesiacov div 12+rok,' roku');

readln;

end.


Zobrazit další články tohoto autora

Související články

Copyright © 2008-2018 Hups.cz. Všechna práva vyhrazena.