Помогите решить задачу на паскале. Количество граждан некоторого города увеличивается ежегодно на В%. Через сколько лет население города возрастет в m раз, если вначале было А человек.

Ответы 2

//Pascal ABC.NET 3.1 сборка 1256Var b,a,m,ar:real; i:integer;beginreadln(b,m,a);i:=0;ar:=a*m;while ar>a do begin inc(i); a:=a*(b/100+1); end;writeln(i);end.Пример ввода:332100Пример вывода:3
- Автор:
  sam67
- 6 лет назад
- 0
Для таких задач используется формула, называемая "сложный процент" $\displaystyle x=A\left(1+ \frac{B}{100}ight)^n$ Здесь А - начальное значение, В - ежегодный процент, n - количество лет, х - результирующее значение.По условию x=A×m, откуда можно найти n, затем округлив его до ближайшего большего целого. $\displaystyle Am=A\left(1+ \frac{B}{100}ight)^n; \quad m=\left(1+ \frac{B}{100}ight)^n; \\ \\ \ln(m)=n\ln\left(1+ \frac{B}{100}ight) \to n= \frac{\ln(m)}{\ln\left(1+ \displaystyle \frac{B}{100}ight)}$ Получается, что значение А в условии является лишним.// PascalABC.NET 3.1, сборка 1256 от 21.06.2016begin var m:=ReadReal('m='); var B:=ReadReal('B%='); Writeln('Кол-во лет равно ',Ceil(Ln(m)/Ln(1+B/100)))end.Тестовые решенияm= 2B%= 33Кол-во лет равно 3m= 3.5B%= 18Кол-во лет равно 8
- Автор:
  beautyow9p
- 6 лет назад
- 0
Добавить свой ответ