минимального более чем в два раза?
type diapazon=-20..60;
var a: array [1..15] of diapazon;
i,max,min: integer;
begin
max:=1;
min:=1;
for i:=1 to 15 do
readln(a[i]);
if a[i]>max then max:=a[i];
if a[i]<min then min:=a[i];
end;
if (max/min) > 2 then writeln('Верно') else writeln('Неверно');
end.
Ответ:
Справочник это книжка сосправками
а в чем таблица дана?
например в Excel можно поставить фильтр.
а в СУБД так же можно отфильтровать либо прото фильтром, дибо запросом через фильтр.