Реферат: Определение стратегии руководства перерабатывающего предприятия по сезонному набору силы с учетом различного объема перерабатывающего сырья

WRITE('B',I,'=');

READLN(b[I]);

END;

writeln('Введите число нанимаемых рабочих при j-ом уровне производства');

FOR j:=1 TO n DO

BEGIN

WRITE('A',j,'=');

READLN(c[j]);

END;

write('Зарплата вне сезона: ');

readln(d);

FOR I:=1 TO n DO

BEGIN

FOR j:=1 TO n DO

BEGIN

if c[i]

else a[i,j]:=-(d*c[i]-(c[i]-c[j])*d*0.7);

END

END;

for i:=1 to n do

begin

for j:=1 to n do

write(' ',a[i,j]:5:1);

writeln(' ');

end;

for i:=1 to n do begin

min[i]:=a[i,1];

for j:=1 to n do if min[i]>a[i,j] then min[i]:=a[i,j];

if i=1 then max:=min[1];