Об игре
Новости
Войти
Регистрация
Рейтинг
Форум
19:25
3632
 online
Требуется авторизация
Вы не авторизованы
   Форумы-->Форум для внеигровых тем-->

АвторПомогите решить задачи на Паскале!!
Ощадбанк нараховує вкладникам 5% річеих.За формулою B=A*1,05х (х - єто степінь).знайти розмір рахунку через х років, якщо початковий внесок становить А гривень


Пожалуйста помогите задачу на Паскале решить буду очень благодарен и очень благодарен материально...
а можно по-русски... =)
var a,b:real;
i,x:integer;
begin
write('A=');
readln(a);
write('x=');
readln(x);
i:=1;
b:=a;
while true do
begin
if (x>=i) then b:=b*1.05
else break;
i:=i+1;
end;
writeln('B=',b:0:2);
readln;
end.

P.S. TP 7.0
К списку тем
2007-2025, онлайн игры HeroesWM