Новые сообщения · Правила  
  • Страница 1 из 1
  • 1
Модератор форума: Berestovskiy  
паскаль срочно
Составьте программу для решения следующей задачи,
используя цикл while или repeat:

Сумма в R рублей положена в банк. При этом прирост составляет Р%
ежегодно. Через какой промежуток времени сумма достигнет М рублей.
(M>R)?
1 | Автор: Demanovich | 2012-03-09, 22:48   |  Репутация: [ + 0 ]
var
i,r,p,m:integer;
begin
read(r,p,m);
while r<>m do begin
i:=i+1;
r:=r+p;
end;
writeln(i);
end.


Нужна помощь? Сюда: vkontakte.ru/berestovskiy
2 | Автор: Berestovskiy | 2012-03-10, 16:28   |  Репутация: [ + 211 ]
  • Страница 1 из 1
  • 1
Поиск: