написать программу вычисления дохода по вкладу

Ответ от Александр Мурыгин[гуру]
Uses CRT;
var summa,proc,time: longint;
itog: real;
begin
clrscr;
write('Procent summa stavka i vrejma hranenia (den): ');
read(summa,proc,time);
itog:=((summa/12)/30)+((summa*((proc/100)/12))/30);
itog:=itog*time;
write(itog:4:2,' rub');
readln;
end.
Источник: Через пробел вводи сумму, ставку годовых в процентах и сколько дней, если что не понятно будет напиши мне на почту объясню построчно