Ruby/Kiek pinigų turėsime padėję pinigus į banką
Iš Wikibooks.
< Ruby
Pateiksime programą, kuri apskaičiuoja, kiek pinigų turėsite banke po periodas_menesiais mėnesių, jeigu dabar padėjote terminuotą pradine_suma Lt indėlį, o bankas moka metine_palukanu_norma procentų metinių palūkanų ir apskaičiuoja jas laikydamas, kad visi mėnesiai lygūs, t.y. kiekvienas jų sudaro 1/12 metų dalį.
[redaguoti] Paskalio variantas
program pinigai;
var pradine_suma, metine_palukanu_norma, galutine_suma: real;
periodas_menesiais: integer;
begin
write('Kokia suma padejote i banka? ');
read(pradine_suma);
write('Kokias metines palukanas moka bankas (procentais)? ');
read(metine_palukanu_norma);
write('Kiek menesiu laikysite pinigus banke? ');
read(periodas_menesiais);
galutine_suma := pradine_suma + pradine_suma * (metine_palukanu_norma / 100 * periodas_menesiais / 12);
writeln('Pasibaigus terminui turesite ', galutine_suma, ' Lt');
end.
[redaguoti] Ruby variantas
print 'Kokia suma padejote i banka? '
pradine_suma = gets.to_f # slankaus kablelio skaičius (float)
print 'Kokias metines palukanas moka bankas (procentais)? '
metiniu_palukanu_norma = gets.to_f
print 'Kiek menesiu laikysite pinigus banke? '
periodas_menesiais = gets.to_i # sveikasis skaičius (int)
galutine_suma = pradine_suma + pradine_suma * (metiniu_palukanu_norma / 100 * periodas_menesiais / 12)
print 'Pasibaigus terminui turesite ', galutine_suma, " Lt\n" # tarp kabučių (") esančiame tekste \n reiškia naują eilutę

