Постройте компьютерную модель в системе программирования Pascal ABC для решения следующей задачи.
Население некоторой страны - 81351097 человек .Естественный прирост за год - 200800 человек (смертность превышает рождаемость ).Миграционный прирост за год - 252000 человек .Какова будет приблизительная численность населения страны через 50 лет если динамика изменения численности населения сохраниться?
Ответы
Ответ дал:
8
Если не вводить данные с клавиатуры, а задать их в программе, то можно как то так сделать:
var
n, e, m, t, i, k: integer;
begin
n := 81351097; // начальное население страны
e := -200800; // естественный прирост населения за год
m := 252000; // миграционный прирост населения за год
t := 50; // срок для расчёта (лет)
k := n + t * (e + m); // конечное население страны
Writeln('население будет равно ', k, ' (человек)');
end.
Ziorar:
Ну и результат, выведенный программой- "население будет равно 83911097 (человек)".
Вас заинтересует
1 год назад
1 год назад
1 год назад
1 год назад
6 лет назад
6 лет назад
8 лет назад