Решить на переливание: в бочке имеется 18 л бензина. имеется 2 ведра объёмом по 7 л, в которые нужно налить по 6 л бензина. как это сделать, если имеется черпак объёмом 4 л?
Во вложении находится файл в формате MS Excel 2003. Во втором вложении - фрагмент таблицы, где видно, что уравнение имеет два корня : -1 и 6.
Для решения составляем две функции y₁=x²-2x-5 и y₂=3x+1 и вычисляем их значения на заданном интервале с каким-то шагом (был принят шаг, равный 1). Точек получилось много, но нас интересуют те, где y₁ ≈ y₂. Для простоты была выделена еще одна колонка, где вычислялись значения y₁-y₂. Была найдена область значений, близких к нулю (выделена желтым) и по значениям аргумента х из этой области строились графики. А далее мы нашли точки их пересечения.
Var a: array[0..10] of integer; i, n, k: integer; // b: array[1..4, 1..4] of integer;
begin Println(); Println(1); for i := 0 to 10 do A[i] := i + 1; PrintLn(a); Println(); for i := 1 to 10 do begin A[i] := A[i - 1]; PrintLn(a); end;
Println(); Println(2); for i := 0 to 10 do A[i] := i + 1; PrintLn(a); Println(); for i := 10 downto 0 do begin A[i] := A[10 - i]; PrintLn(a); end; end.