Найти максимальное и среднее значение функции y=71x-43x^3 на отрезке[4;14] шагом 1

$71x-43x^3=x(71-43x^2)$

var
x,y,max,s,n:longint;
avg:real;
begin
max:=4*(71-43*sqr(4));
n:=1; s:=max;
for x:=5 to 14 do
begin
Inc(n); y:=x*(71-43*sqr(x)); s:=s+y;
if max end;
avg:=s/n;
Writeln(Максимальное значение: ,max);
Writeln(Среднее значение: ,avg:0:3)
end.

Результат выполнения программы:
Максимальное значение: -2468
Среднее значение: -42318.000

Оцени ответ

Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Найти другие ответы