begin
k1:=0
k2:=0
writeln (' Введите три числа');
if x<0 then k1:=k1+1;
if x<0 then k2:=k2+1;(ЕЩЕ " ЧИСЛА)
intil x=0;
writeln ('k1=',k1,'',k2=',k2)
end
я думаю наверно так
Модель Мальтуса Править
Согласно модели, предложенной Мальтусом, скорость роста пропорциональна текущему размеру популяции, то есть описывается дифференциальным уравнением:
{\displaystyle {\dot {x}}=\alpha x}{\dot x}=\alpha x,
где {\displaystyle \alpha }\alpha — некоторый параметр, определяемый разностью между рождаемостью и смертностью. Решением этого уравнения является экспоненциальная функция {\displaystyle x(t)=x_{0}e^{\alpha t}}x(t)=x_{0}e^{{\alpha t}}. Если рождаемость превосходит смертность ({\displaystyle \alpha >0}\alpha >0), размер популяции неограниченно и очень быстро возрастает. В действительности этого не может происходить из-за ограниченности ресурсов. При достижении некоторого критического объёма популяции модель перестаёт быть адекватной, поскольку не учитывает ограниченность ресурсов. Уточнением модели Мальтуса может служить логистическая модель, которая описывается дифференциальным уравнением Ферхюльста:
{\displaystyle {\dot {x}}=\alpha \left(1-{\frac {x}{x_{s}}}\right)x}{\dot x}=\alpha \left(1-{\frac {x}{x_{{s\right)x,
где {\displaystyle x_{s}}x_{s} — «равновесный» размер популяции, при котором рождаемость в точности компенсируется смертностью. Размер популяции в такой модели стремится к равновесному значению {\displaystyle x_{s}}x_{s}, причём такое поведение структурно устойчиво.
Модель Мальтуса Править
Согласно модели, предложенной Мальтусом, скорость роста пропорциональна текущему размеру популяции, то есть описывается дифференциальным уравнением:
{\displaystyle {\dot {x}}=\alpha x}{\dot x}=\alpha x,
где {\displaystyle \alpha }\alpha — некоторый параметр, определяемый разностью между рождаемостью и смертностью. Решением этого уравнения является экспоненциальная функция {\displaystyle x(t)=x_{0}e^{\alpha t}}x(t)=x_{0}e^{{\alpha t}}. Если рождаемость превосходит смертность ({\displaystyle \alpha >0}\alpha >0), размер популяции неограниченно и очень быстро возрастает. В действительности этого не может происходить из-за ограниченности ресурсов. При достижении некоторого критического объёма популяции модель перестаёт быть адекватной, поскольку не учитывает ограниченность ресурсов. Уточнением модели Мальтуса может служить логистическая модель, которая описывается дифференциальным уравнением Ферхюльста:
{\displaystyle {\dot {x}}=\alpha \left(1-{\frac {x}{x_{s}}}\right)x}{\dot x}=\alpha \left(1-{\frac {x}{x_{{s\right)x,
где {\displaystyle x_{s}}x_{s} — «равновесный» размер популяции, при котором рождаемость в точности компенсируется смертностью. Размер популяции в такой модели стремится к равновесному значению {\displaystyle x_{s}}x_{s}, причём такое поведение структурно устойчиво.
у тебя программа неправильная. Не до конца понял, почему у тебя с какого-то бока стоит там какой-то intil x=0, если у тебя цикл, то должен был быть repeat сначала, потом уже Until.
проверь программу, паскаль ответ тебе не выдаст.
а блок-схема вот.