Question

Поможіть....... Скласти програму обчислення значень функції f(x)=е^(-x )+ cos3x на відрізку [A;B] в точках Xi=A+iH, де H=(B-A)/M, А=-1, В=4, М=10.

Answer 1

Var
    x0, xk, dx, x: real;

function f(x: real): real;
begin
    f := exp(-x) + cos(3 * x);
end;

begin
    write('Введите промежуток и шаг ([a,b] h) ');
    readln(x0, xk, dx);
    
    x := x0;
    writeln(' x ':10, ' | ', ' f(x) ':10);
    
    repeat
        writeln(x:10:3, ' | ', f(x):10:3);
        x := x + dx;
    until x > xk;
end.

Пример вывода
Введите промежуток и шаг ([a,b] h) -1 4 0.5
        x  |      f(x)
    -1.000 |      1.728
    -0.500 |      1.719
     0.000 |      2.000
     0.500 |      0.677
     1.000 |     -0.622
     1.500 |      0.012
     2.000 |      1.096
     2.500 |      0.429
     3.000 |     -0.861
     3.500 |     -0.445
     4.000 |      0.862

Answer 2

Щоб скласти програму для обчислення значень функції f(x) = e^(-x) * cos(3x) на відрізку [A;B] в точках Xi = A + iH, де H = (B - A)/M, A = -1, B = 4 і M = 10, ми можемо використати мову програмування Python. Ось один з можливих варіантів реалізації:

import math

def f(x):
    return math.exp(-x) * math.cos(3*x)

def compute_values(A, B, M):
    H = (B - A) / M
    values = []
    for i in range(M+1):
        x = A + i*H
        values.append(f(x))
    return values

A = -1
B = 4
M = 10

result = compute_values(A, B, M)
print(result)

В цьому коді ми визначили функцію `f(x)`, яка обчислює значення функції f(x) для заданого x. Далі, функція `compute_values` обчислює значення функції на відрізку [A;B] в точках Xi = A + iH, де H = (B - A)/M. Вона повертає список значень функції.

У головній частині програми ми задаємо значення A, B і M, і викликаємо функцію `compute_values` для обчислення значень функції на вказаному відрізку. Результат виводиться на екран у вигляді списку значень.

Якщо ви запустите цей код, ви отримаєте список значень функції f(x) на відрізку [-1;4] у 11 точках, розташованих рівномірно.