- 25.09.2018 12:18
- Информатика
- remove_red_eye 4386
- thumb_up 8
Ответы и объяснения 1
Var
x,fx,xmax,fmax:real;
begin
fmax:=-100;
x:=-1;
while x<=1 do begin
fx:=(sin(x)-sqrt(sqr(x)+7))/2;
if fmax
end;
Writeln('Найден максимум f(',xmax:0:1,')=',fmax:0:5)
end.
Результат выполнения программы
Найден максимум f(1.0)=-0.99348
- 26.09.2018 06:08
- thumb_up 42
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.