Найдите такое минимальное целое число А, чтобы выражение xy < A \/ x < y \/ 13 ≤ x

было истинно при любых неотрицательных x и y.

Мне кажется, в этом здании необходимо в 1 из выражений выразить x или у, а затем подставить во 2

var

  x: array[1..15]of integer;

  i,min,z: integer;

begin

  min: =32000;

  z: =0;

  for i: =1 to 15 do

  begin

  readln(x[i]);

  if x[i]> 0 then if x[i]< min then min: =x[i];

  if x[i]=0 then inc(z);

  end;

  writeln(min);

  writeln(z);

end.

языки программированияязык программирования - это система обозначений, служащая для точного описания программ или алгоритмов для эвм. языки программирования являются искусственными языками. от естественных языков они отличаются ограниченным числом “слов” и строгими правилами записи команд (операторов). поэтому при применении их по назначению они не допускают свободного толкования выражений, характерного для естественного языка.можно сформулировать ряд требований к языкам программирования и классифицировать языки по их особенностям.основные требования, предъявляемые к языкам программирования: наглядность - использование в языке по возможности уже существующих символов, хорошо известных и понятных как программистам, так и пользователям эвм; единство - использование одних и тех же символов для обозначения одних и тех же или родственных понятий в разных частях алгоритма. количество этих символов должно быть по возможности минимальным; гибкость - возможность относительно удобного, несложного описания распространенных приемов вычислений с имеющегося в языке ограниченного набора изобразительных средств; модульность - возможность описания сложных алгоритмов в виде совокупности простых модулей, которые могут быть составлены отдельно и использованы в различных сложных алгоритмах; однозначность - недвусмысленность записи любого алгоритма. отсутствие ее могло бы к неправильным ответам при решении [].в настоящее время в мире существует несколько сотен реально используемых языков программирования. для каждого есть своя область применения.