Question

Тема компьютерное моделирование. предложите этапы построения компьютерной модели для решения одной из следующих . решается в pascal abc 1.в искусственный водоём запустили 100000 рыб. ежегодно из водоёма забирают 12%
рыб.естественный прирост составляет 20%.какое кол-во рыб будет в водоёме через 8 лет? ?

Answer 1

1) найти убыль как к-во * 12%

2) найти прирост как к-во * 20%

3) к-во = к-во-убыль+прирост

выполнить 8 раз

var

x,a,b:real;

i:integer;

begin

x:=100000;

for i:=1 to 8 do

begin

a:=x*0.12;

b:=x*0.20;

x:=x+b-a;

end;

writeln(x);

end.