Предмет: Информатика,
автор: 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.
Похожие вопросы
Предмет: Геометрия,
автор: uvalap
Предмет: История,
автор: hfguepso
Предмет: Русский язык,
автор: katyajjjj34
Предмет: Математика,
автор: MrAnastasia
Предмет: География,
автор: лсвр