Среднее значение функции на указанном промежутке

@citizen · Регистрация: 28.12.2009

Author24 — интернет-сервис помощи студентам

Доброго времени суток!

помогите пожалуйста решить задачу на TP с помощью процедуры

y= (x^3 - 4*x^2) / (x^2 + 1).

х є [-1;6]

@System.exe · 28.12.2009, 21:38

Pascal

Var sred_zn,a,b:real; 
procedure funct(x:integer;Var p:real);
begin
p:=(x*x*x-4*x*x)/(x*x+1)
end;
begin
funct(-1,a);
funct(6,b);
sred_zn:=(a+b)/2;
writeln('srednee znachenie function=', sred_zn:6:3)
end.

@citizen · 28.12.2009, 22:19 **[ТС]**

все отлично работает

пасяб

@citizen 0 / 0 / 0 Регистрация: 28.12.2009 Сообщений: 6
		1
	Среднее значение функции на указанном промежутке 28.12.2009, 20:47. Показов 1293. Ответов 2 Метки нет (Все метки) Доброго времени суток! помогите пожалуйста решить задачу на TP с помощью процедуры y= (x^3 - 4*x^2) / (x^2 + 1). х є [-1;6] 0

@citizen 0 / 0 / 0 Регистрация: 28.12.2009 Сообщений: 6
	28.12.2009, 22:19 [ТС]	3
	все отлично работает пасяб 0

Среднее значение функции на указанном промежутке

Решение