Задание 3 Вариант 1 Самостоятельная работа 2 ГДЗ Рабочая тетрадь Босова 11 класс (Информатика)

Запишите полученный результат:……………………
program S2_v1_3;
var
a, i: integer;
s, p: real;
begin
s := 40000;
p := 0.03;
for i := 1 to 5 do
s := s * p + s;
Writeln(trunc(s))
end.

Ежегодно население увеличивается на $$3\%$$, значит каждый год оно становится равным $$s \cdot 1{,}03$$.

Начальное значение: $$40000$$ человек.

Выполним расчёт на 5 лет:

• 1-й год: $$40000 \cdot 1{,}03 = 41200$$
• 2-й год: $$41200 \cdot 1{,}03 = 42436$$
• 3-й год: $$42436 \cdot 1{,}03 = 43709{,}08$$
• 4-й год: $$43709{,}08 \cdot 1{,}03 = 45020{,}3524$$
• 5-й год: $$45020{,}3524 \cdot 1{,}03 = 46371{,}963972$$

В программе используется trunc(s), поэтому берётся целая часть числа.

program S2_v1_3;
var
  a, i: integer;
  s, p: real;
begin
  s := 40000;
  p := 0.03;
  for i := 1 to 5 do
    s := s * p + s;
  Writeln(trunc(s))
end.

После 5 лет получаем $$46371{,}963972$$, целая часть — $$46371$$.

Ответ

46371