Реферат: Изучение взаимно влияющих друг на друга математических параметров

I – переменная-счётчик , осуществляющая остановку выполнения

программы.

4.Листинг программы.

'IMITATION OF <WHEAT-MICE-CATS> ECOSYSTEM

DEFDBL G-H, S

CLS

INPUT "Год начала наблюдений-"; by

INPUT "Количество лет наблюдений-"; f

INPUT "Начальная масса пшеницы в кг-"; bw

INPUT "Урожай пшеницы в кг-"; h

PRINT "Сколько кг зерна в месяц забирать?"

IF bw < h THEN j = bw / 8 ELSE j = h / 12

PRINT "(Желательно не брать больше"; INT(j); " кг)"

INPUT t

INPUT "Цена одной кошки в $-"; pc

INPUT "Минимально допустимое количество кошек"; mnc

INPUT "Предельно допустимое количество мышей-"; mn

PRINT

PRINT "(Все данные приводятся на конец текущего месяца)."

PRINT "YEAR=,MONTH=,WHEAT=,MICE=,CATS=,DWHEAT=,DMICE=,DCATS="

PRINT "********************************************************"

st = 0: w = bw: m = INT(RND(1) * 20 + 1): y = 0: mt = 0: c = mnc

50 RANDOMIZE TIMER

mt = mt + 1

IF mt > 12 THEN s = 0 AND ws = 0

ds = 0

IF mt > 12 THEN y = y + 1

IF y > f THEN END

'ПРЕРЫВАНИЕ ПРОГРАММЫ

К-во Просмотров: 285
Бесплатно скачать Реферат: Изучение взаимно влияющих друг на друга математических параметров