Які оператори можна застосовувати для складання запитів при формуванні сповіщень

решаем относительно a: a=(-6*x2-c)/x4=-6*x2/x4-c/x4

конечно .pas! простой вопрос!

var a: array [1..16] of integer;

i,s,c,d: integer;

begin

  randomize;

  read(c,d);

  for i : = 1 to 16 do begin

      a[i]: = random(d+c) - c;

      if a[i]> 0 then s: = s + a[i];

  end;

  writeln(s);

end.

16-битной кодировке unicode.

один символ  s  =16 бит

количество бит  текстового файла    к= 128000 бит/с * 60 с=  7680000

количество символов к/s=7680000/16  =480000