Задать вопрос
5 декабря, 23:30

Pascal. для функции y=x (x-1) ^2 (x-2) ^3 записать в массив В значение аргумента х на интервале [-0,3; 0,5] и найти минимум этой функции и соответствующее значение аргумента

+3
Ответы (1)
  1. 6 декабря, 00:36
    0
    Const

    a1 = - 0.3;

    a2 = 0.5;

    h = 0.1;

    nm = 50;

    var

    b: array[1 ... nm] of real;

    x, y, min: real;

    i, n, imin: integer;

    begin

    n : = trunc ((a2 - a1) / h + 1) ;

    x : = a1; min : = 1e20;

    for i : = 1 to n do

    begin

    b[i] : = x;

    y : = x * sqr (x - 1) * (x - 2) * sqr (x - 2) ;

    if min > y then begin imin : = i; min : = y end;

    x : = a1 + i * h

    end;

    Writeln ('Минимальное значение ', min, ' достигнуто при аргументе ', b[imin])

    end.

    Результат выполнения программы:

    Минимальное значение - 0.746496 достигнуто при аргументе 0.2

    Аналитическое решение показывает, что у функции имеется локальный минимум в точке x = (5-√13) / 6≈0.2324081207; при этом функция принимает значение, приблизительно равное - 0.7562371972, поэтому решение можно считать верным.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Pascal. для функции y=x (x-1) ^2 (x-2) ^3 записать в массив В значение аргумента х на интервале [-0,3; 0,5] и найти минимум этой функции и ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
Как описывают переменные в Pascal? Какие стандартные числовые типы языка Pascal вам известны? Что вам известно о соответствии типов переменных в языке Pascal? Какие арифметические операции можно выполнять в Pascal?
Ответы (1)
1) Вычислить длину окружности и площадь круга одного и того же заданного радиуса R. Pascal (желательно с блок-схемой) 2) Найти сумму членов арифметической прогрессии, если известны её первый член, знаменатель и число членов прогрессии Pascal
Ответы (1)
1) Найти сумму нечетных чисел на интервале [-30; 40]. 2) Найти кол-во чисел на интервале [-50; 120], которые кратны 9. 3) Найти произведение чисел кратных 11 на интервале [-10; 20]. 4) Последовательно вводятся N чисел. Найти их произведение.
Ответы (1)
Паскаль! Заполнить массив случайными числами в интервале [-10,10] и отобрать в другой массив все чётные отрицательные числа. Пример: Массив А: -5 6 7 - 4 - 6 8 - 8 Массив B: -4 - 6 - 8
Ответы (1)
Решить задачи с помощью Паскаля: 1. Заполнить массив из 10 элементов случайными числами в интервале [0 ... 100] и отсортировать его по последней цифре. 2. Заполнить массив из 10 элементов случайными числами в интервале [0 ...
Ответы (2)