Паскаль
Рассчитайте плотность популяции белок за 1, 2, 3, …, 12 лет, если их первоначальная численность составила 552 особи на 1400 км2, ежегодный прирост составляет 20%
в паскале,используя FOR
Ответы
Ответ дал:
0
var
n, i, P: integer;
begin
P := 552;
for i := 0 to 12 do
begin
writeln(String.Format('{0} лет - {1} бел. / 1400 км2', i, P));
P += trunc(P * 0.2);
end;
end.
n, i, P: integer;
begin
P := 552;
for i := 0 to 12 do
begin
writeln(String.Format('{0} лет - {1} бел. / 1400 км2', i, P));
P += trunc(P * 0.2);
end;
end.
Ответ дал:
0
спасибо огромное!)
Ответ дал:
0
Обращайся)
Похожие вопросы
2 года назад
2 года назад
7 лет назад
7 лет назад
10 лет назад
10 лет назад
10 лет назад