Сельское хозяйство: До изобретения машин человек использовал лошадей для распашки земли, переработки и перевозки урожая.
Война: Степные воины запрягали коней в лёгкие повозки - колесницы. Позже лошади возили на себе свирепых стрелков и рыцарей во время сражений.
Транспорт: Раньше лошади перевозили людей и почту на большие расстояния. Они считались самым быстрым наземным транспортом.
Спорт: К конным видам спорта относят поло, конкур, родео и другие. Также людям нравятся скачки, и они играют на ипподроме, ставя деньги на коня, который, по их мнению, придёт первым.
Function Intg(p, b: real; n: integer; eps: real): real; {Метод прямоугольников, рекурсия} var a, x, h, s: real; i: integer; begin a := 0; h := (b - a) / n; x := a; s := 0; for i := 1 to n do begin s := s + sin(x); x := x + h; end; if abs(s * h - p) > eps then Intg := Intg(s * h, b, 2 * n, eps) else Intg := s * h; end;
var b, eps: real;
begin write('Задайте верхний предел интегрирования и точность: '); Readln(b, eps); writeln('Значение интеграла: ', Intg(0, b, 2, eps):0:7); end.
Тестовое решение:
Задайте верхний предел интегрирования и точность: 2 0.000001 Значение интеграла: 1.4161460
Точное значение интеграла равно 1-cos(2) ≈1.416146836, т.е. заданная точность обеспечивается.
Трудолюбивые лошади человеку уже много тысяч лет.
Сельское хозяйство: До изобретения машин человек использовал лошадей для распашки земли, переработки и перевозки урожая.
Война: Степные воины запрягали коней в лёгкие повозки - колесницы. Позже лошади возили на себе свирепых стрелков и рыцарей во время сражений.
Транспорт: Раньше лошади перевозили людей и почту на большие расстояния. Они считались самым быстрым наземным транспортом.
Спорт: К конным видам спорта относят поло, конкур, родео и другие. Также людям нравятся скачки, и они играют на ипподроме, ставя деньги на коня, который, по их мнению, придёт первым.
УдАчИ