Var a,b,t,M,R :integer;Function F(x:integer):integer;begin F:=4*(x-5)*(x+3);end;BEGIN a:=-20; b:=20; M:=a; R:=F(a); for t:=a to b do begin if (F(t)< R)then begin M:=t; R:=F(t); end; end; write(R);END.


будет -64, объясните пож, каким образом?


1

Ответы и объяснения

2014-03-04T13:21:33+04:00
Это по суди задача на поиск минимума функции на отрезке (-20;20). Функция - парабола. Аналитически можно найти ее вершину, х=1, f(1)=-64.
что подразумевается под словом "Аналитически", подробней объясни пожалуйста, если понимаешь , как это выяснить.
Для параболы координата вершины x=-b/2a , x= -8/8, это если в функции раскрыть скобки. а потом этот икс подставляем в функцию
Спасибо )))))