Определить, пересекаются ли два отрезка и .

Правильный ответ:

если сумма площадей треугольников и равна сумме площадей треугольников и , то отрезки пересекаются (иначе - нет)

если большая координата по оси первого отрезка больше меньшей координаты по оси втрого отрезка и большая координата по оси первого отрезка больше меньшей координаты по оси втрого отрезка, то отрезки пересекаются (иначе - нет)

если площадь четырехугольника равна произведению длин отрезков и , то отрезки пересекаются (иначе - нет)

если отсортированные в порядке возрастания точки по оси и по оси чередуются: сначала идет координата конца первого отрезка, затем - координата конца второго отреза, затем - опять первого, затем - второго, то отрезки пересекаются (иначе - нет)

• # Для нахождения площади треугольника используют формулу Герона: , где - длины сторон, - …
• # В результате выполнения программы, фрагмент которой приведен ниже, элементы одномерного массива примут значения … const n=10; k=5; var a: array [1..n+1] of integer; … for i:=1 to n do a[i]:=i; for i:=k to n do a[i+1]:=a[i]; a[k]:=0; …
• # Назначение программы на Паскале… var a: string; b, i, st, n, s, x, k:integer; begin readln (a); readln(b); n:=length(a); s:=0; st:=1; for i:=1 to n do begin val (copy(a,n-i+1,1),x,k); s:=s+x*st; st:=st*b; end; writeln (s); end.
• # Предскажите, какие значения будет содержать массив х, в результате выполнения программы на Паскале, фрагмент которой приведен ниже, если первоначально в массиве соделжались значения . Ответ дайте в поле ввода без пробелов: . . . for i:=1 to 5 do readln (x[i]); for j:=5 downto 2 do for i:=1 to j-1 do if x[i]>x[i+1] then begin y:=x[i]; x[i]:= x[i+1]; x[i+1]:=y; end; …
• # В результате выполнения программы на Паскале, фрагмент которой приведен ниже, в массив Х вводятся числа: 1, 8, 12, 3, 5, 4. Сумма элементов массива У будет равна: … j:=1; k:=0; n:=6; for i:=1 to n do if x[i] mod 2=0 then begin y[j]:=i; j:=j+1; end; …