Опубликовано 09.06.2017 по предмету Информатика от Гость >> <<

С клавиатуры вводятся целые числа a и b , котрые являются концами отрезка. Для функции f(x)=sin(x)/((3*x)+7) на отрезке [ a,b] найти ее максимальное значение, рассматривая все точки отрезка с шагом +1.

Ответ оставил Гость

Program MissPhelps;
uses crt;
var a,b,x: integer;
F,k:real;
begin
writeln(Начало);
readln(a);
writeln(Конец);
readln (b);
F:=-999;
x:=a;

while x<=b do begin
k:= sin(x)/((3*x)+7);
if F< k then
F:=k ;
inc(x);

end;
write(Макс на отрезке,F);
end.