Предмет: Информатика,
автор: krusher77
Составить программу в Паскале
Вклад в банке пролежал N лет. Процентная ставка составляет 10% в год с ежегодной капитализацией. Насколько % увеличится вклад?
Ответы
Автор ответа:
0
Вроде бы но я не силен в банках.
program n_1;
var
a,X,e,f:real; N,b:integer;
begin
Writeln('ВВедите количество лет');
read(N);
Writeln('ВВедите сумму которую положите');
read(b);
X:=1+0.1;
a:=b*exp(ln(X) * N);
e:=b/100;
f:=a/e;
writeln(f,' ','процентов');
end.
program n_1;
var
a,X,e,f:real; N,b:integer;
begin
Writeln('ВВедите количество лет');
read(N);
Writeln('ВВедите сумму которую положите');
read(b);
X:=1+0.1;
a:=b*exp(ln(X) * N);
e:=b/100;
f:=a/e;
writeln(f,' ','процентов');
end.
Интересные вопросы
Предмет: Другие предметы,
автор: sofiselina2010
Предмет: История,
автор: madinabakbolsunova4
Предмет: Литература,
автор: hasanovaaleksandra12
Предмет: Физика,
автор: marinagon1
Предмет: Литература,
автор: всемhi