Три друга влад, егор и митя купили в спортивном магазине три разных мяча белого, красного и голубого цвета. владу достался не белый мяч, а егору не голубой. белый мяч был не футбольный, а голубой мяч был волейбольный. егор не играет в баскетбол. определите, какой мяч и какого цвета купил митя. a) митя – баскетбольный, белый b) митя – волейбольный, белый c) митя – баскетбольный, красный d) митя – футбольный, голубой и обосновать ответ

1. Футбольный мяч не белый по условию, и не голубой, потому что голубой мяч волейбольный. Следовательно, футбольный мяч может быть только красным.
2. Волейбольный мяч по условию голубой, футбольный, как мы только что выяснили, красный и тогда баскетбольный мяч может быть только белым.
3. Егор не играет в баскетбол по условию, следовательно, у него не белый мяч. У Влада также не белый мяч. Получается, что белый (баскетбольный) мяч у Мити.

ответ: А)

Var
  a:array[1..3,1..2]of real;
  b:array[1..3]of real; //массив для координат пересечения сторон с ОХ
  i,j,z:integer;
// (y1-y2)x+(x2-x1)y+(x1y2-x2y1)=0 - ур-е прямой, прохоходящей через 2 точки
// тогда x=(x2y1-x1y2)/(y1-y2) - координата ее пересечения с осью х  
// найдем координаты пересечения сторон с осью х
function cross(x1,x2,y1,y2:real):real;
begin
result:=(x2*y1-x1*y2)/(y1-y2);
if ((result>x1) and (result>x2)) or ((result<x1) and (result<x2)) then
  result:=1 //это точка пересечения не самой стороны, а ее продолжения
                //поскольку в дальнейшем нам нужны будут знаки координат,           
                //ей приписываем положительной значение, чтобы она не влияла
                //на конечный результат
end;

begin
for i:=1 to 3 do
  begin
  writeln('Введите координаты х,у вершины:');
  readln(a[i,1],a[i,2]);
  end;
z:=1;
for i:=1 to 3 do
  begin
  j:=i+1;
  if j>3 then j:=1;
  b[i]:=cross(a[i,1],a[j,1],a[i,2],a[j,2]);
  z:=sign(b[i])*z;
  end;
write('Начало координат ');
if z<0 then writeln('принадлежит треугольнику')
  else writeln('не принадлежит треугольнику');
end.

Если у вас есть изображения, которые занимают много места на диске, их размеры можно уменьшить, не изменяя размер изображения. Наилучшее сжатие достигается форматом JPG, но даже если изображение уже в этом формате, его всё равно можно уменьшить, так как у формата JPG есть адаптивная схема сжатия, позволяющая сохранять изоражение с разной степенью сжатия. Компромис здесь заключается в том, что чем меньше места занимает изображение, тем больше деталей теряется при сжатии. Нужно также помнить, что повторные сохранения в формате JPG также приводят к ухудшению качества изображения.