Вычислить значения двух функций в n равномерно распределенных в диапазоне а≤x≤b точках.
a=1 b=3 n=12 F1(х)=√(e^(x) -1) F2(х)=x ln^2 x
(Паскаль)
Вычислить значения двух функций в n равномерно распределенных в диапазоне а≤x≤b точках.
a=1 b=3 n=12 F1(х)=√(e^(x) -1) F2(х)=x ln^2 x
(Паскаль)
a=1 b=3 n=12 F1(х)=√(e^(x) -1) F2(х)=x ln^2 x
(Паскаль)
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
program FunctionValues;
var
a, b, n, i: Integer;
x, F1, F2: Real;
function Func1(x: Real): Real;
begin
Func1 := sqrt(exp(x) - 1);
end;
function Func2(x: Real): Real;
begin
Func2 := x ln(x) ln(x);
end;
begin
a := 1;
b := 3;
n := 12;
for i := 0 to n do
writeln('x = ', x:0:2);begin
x := a + i * (b - a) / n;
F1 := Func1(x);
F2 := Func2(x);
writeln('F1(x) = ', F1:0:4);
writeln('F2(x) = ', F2:0:4);
writeln;
end;
end.