Вопрос по информатике:
Помогите ....... Составить программу вычисления значений функции f (x) = е ^ (- x
) + Cos3x
на отрезке [A; B] в точках
Xi = A + iH, где H = (B-A) / M, а = 1, В = 4, М = 10.
Пожаловаться
- 24.12.2017 09:27
- Информатика
- remove_red_eye 12889
- thumb_up 17
Ответы и объяснения 1
Const a=1; b=4; m=10;
var x,f,h:real; i:integer;
begin
h:=(b-a)/m;
x:=a-h;
for i:=0 to m do
begin
x:=x+h;
f:=exp(-x)+cos(3*x);
writeln(x:5:1,f:8:3);
end;
end.
Результат:
1.0 -0.622
1.3 -0.453
1.6 0.289
1.9 0.984
2.2 1.061
2.5 0.429
2.8 -0.458
3.1 -0.947
3.4 -0.681
3.7 0.129
4.0 0.862
var x,f,h:real; i:integer;
begin
h:=(b-a)/m;
x:=a-h;
for i:=0 to m do
begin
x:=x+h;
f:=exp(-x)+cos(3*x);
writeln(x:5:1,f:8:3);
end;
end.
Результат:
1.0 -0.622
1.3 -0.453
1.6 0.289
1.9 0.984
2.2 1.061
2.5 0.429
2.8 -0.458
3.1 -0.947
3.4 -0.681
3.7 0.129
4.0 0.862
Пожаловаться
- 25.12.2017 03:10
- thumb_up 26
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы
Интересные вопросы