===== PascalABC.NET =====
begin
var ГодовойПроцент := 60.0;
var СрокДепозитаМес := 3;
var СуммаВклада := ReadReal('Сумма вклада, руб:');
var ПроцентПоВкладу := ГодовойПроцент / 12 * СрокДепозитаМес;
var СуммаПроцента := Round(СуммаВклада * ПроцентПоВкладу / 100, 2);
var СуммаПоДепозиту := СуммаВклада + СуммаПроцента;
Writeln('Сумма за ', СрокДепозитаМес, ' мес: ', СуммаПоДепозиту:0:2);
// теперь за 6 мес
СуммаВклада := СуммаПоДепозиту;
СуммаПроцента := Round(СуммаВклада * ПроцентПоВкладу / 100, 2);
СуммаПоДепозиту := СуммаВклада + СуммаПроцента;
// и за 9 мес
Writeln('Сумма за 9 мес: ', СуммаПоДепозиту:0:2);
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
===== PascalABC.NET =====
begin
var ГодовойПроцент := 60.0;
var СрокДепозитаМес := 3;
var СуммаВклада := ReadReal('Сумма вклада, руб:');
var ПроцентПоВкладу := ГодовойПроцент / 12 * СрокДепозитаМес;
var СуммаПроцента := Round(СуммаВклада * ПроцентПоВкладу / 100, 2);
var СуммаПоДепозиту := СуммаВклада + СуммаПроцента;
Writeln('Сумма за ', СрокДепозитаМес, ' мес: ', СуммаПоДепозиту:0:2);
// теперь за 6 мес
СуммаВклада := СуммаПоДепозиту;
СуммаПроцента := Round(СуммаВклада * ПроцентПоВкладу / 100, 2);
СуммаПоДепозиту := СуммаВклада + СуммаПроцента;
// и за 9 мес
СуммаВклада := СуммаПоДепозиту;
СуммаПроцента := Round(СуммаВклада * ПроцентПоВкладу / 100, 2);
СуммаПоДепозиту := СуммаВклада + СуммаПроцента;
Writeln('Сумма за 9 мес: ', СуммаПоДепозиту:0:2);
end.