Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.73/11: Рейтинг темы: голосов - 11, средняя оценка - 4.73
 Аватар для dimkachel
6 / 1 / 2
Регистрация: 18.11.2009
Сообщений: 172

Наибольшее и наименьшее значения функции

14.01.2010, 20:23. Показов 2416. Ответов 14
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Помогите понять что тут:
u =ln │3sin x +1│;
x {-1; 2; 4.1; -5; -22; 17} найти Наибольшее и наименьшее значения функции
Это типа х состоит из этих чисел {-1; 2; 4.1; -5; -22; 17}
И как х это присвоить правельно.
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
14.01.2010, 20:23
Ответы с готовыми решениями:

найти наибольшее и наименьшее значения функции
№1 найти наибольшееD и наименьшееT значения функции y=a*n*n-4*n+6 на отрезке изменения аргумента n с шагом 1 . для этих ...

определить наибольшее и наименьшее значения,
Если кто - нибудь сможет эти решить....буду век благодарна!!!!!!!!!!!! 1) Составить программу, которая просматривает массив из 10...

Протабулировать функцию и найти её наибольшее и наименьшее значения
1. Выбрать алгоритм, составить блок-схему и программу:1) для вычисления значений функции в указанных точках разбиения промежутка её задания...

14
 Аватар для Jeni
64 / 44 / 6
Регистрация: 10.01.2010
Сообщений: 99
14.01.2010, 20:25
Тебе нужно для каждого x, вычислить значение функции, а затем искать среди них max и min.
0
 Аватар для dimkachel
6 / 1 / 2
Регистрация: 18.11.2009
Сообщений: 172
14.01.2010, 20:31  [ТС]
Цитата Сообщение от Jeni Посмотреть сообщение
Тебе нужно для каждого x, вычислить значение функции, а затем искать среди них max и min.
а как можно модуль вычислить, или просто оператором if?
0
 Аватар для Jeni
64 / 44 / 6
Регистрация: 10.01.2010
Сообщений: 99
14.01.2010, 20:32
Модуль вычисляет функция abs
0
 Аватар для dimkachel
6 / 1 / 2
Регистрация: 18.11.2009
Сообщений: 172
14.01.2010, 20:43  [ТС]
А как то объявить этот массив, или поочереди перебирать?
0
 Аватар для Jeni
64 / 44 / 6
Регистрация: 10.01.2010
Сообщений: 99
14.01.2010, 21:22
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
var
  x: array[1..6] of real;
  y: array[1..6] of real;
 
begin
  x[1] := -1;
  x[2] := 2;
  (*и т.д.*)
  for i := 1 to 6 do
  begin
    y[i] := Ln(abs(3*sin(x)+1));
  end;
  (*тут должен быть поиск максимума и минимума и вывод результата*)
end.
Добавлено через 24 минуты
Ошибку нашла, нужно конечно так
Pascal
1
y[i] := Ln(abs(3*sin(x[i])+1));
1
 Аватар для dimkachel
6 / 1 / 2
Регистрация: 18.11.2009
Сообщений: 172
14.01.2010, 21:26  [ТС]
Ну это я сам исправил
0
Эксперт по компьютерным сетямЭксперт Pascal/Delphi
 Аватар для TAVulator
4191 / 1292 / 237
Регистрация: 27.07.2009
Сообщений: 3,962
14.01.2010, 21:28
Jeni, нафиг y загонять в массив? просто перебирать все значения и сразу искать максимум и минимум.
0
 Аватар для Jeni
64 / 44 / 6
Регистрация: 10.01.2010
Сообщений: 99
14.01.2010, 21:31
Я показывала как функцию для всех x посчитать, так было нагляднее
0
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
14.01.2010, 21:36
В массиве удобнее и короче, только его нужно типизированной константой объявить.
Pascal
1
const m:array[1..6] of real=(-1, 2, 4.1, -5, -22, 17});
0
Эксперт по компьютерным сетямЭксперт Pascal/Delphi
 Аватар для TAVulator
4191 / 1292 / 237
Регистрация: 27.07.2009
Сообщений: 3,962
14.01.2010, 21:37
полностью программа:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
var
 y, max, min: Real;
 i: byte;
Const
 X: array[1..6] of Real = (-1,2,4.1,-5,-22,17);
Begin
 max:=Ln(abs(3*sin(x[1])+1));
 min:=max;
 For i:=2 to 6 do
  Begin
   y:=Ln(abs(3*sin(x[i])+1));
   If y>max then max:=y else
   If y<min then min:=y;
  End;
 Writeln('min= ',min:5:2,', max= ',max:5:2)
End.
1
 Аватар для dimkachel
6 / 1 / 2
Регистрация: 18.11.2009
Сообщений: 172
15.01.2010, 20:15  [ТС]
TAVulator, такое объявление массива у меня не работает, дает ошибку ";" expected и тавится курсор на конец объявление массива поле реала
0
Эксперт по компьютерным сетямЭксперт Pascal/Delphi
 Аватар для TAVulator
4191 / 1292 / 237
Регистрация: 27.07.2009
Сообщений: 3,962
15.01.2010, 20:20
dimkachel, полностью переписал? Const не забыл?
1
Retired
7727 / 2559 / 671
Регистрация: 17.10.2009
Сообщений: 5,100
15.01.2010, 20:22
dimkachel, ну можно сделать ручной ввод
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
var
 y, max, min: Real;
 i: byte;
 X: array[1..6] of Real;
Begin
 for i:=1 to 6 do
 begin
   write('X[',i,']:=');
   readln(X[i])
 end;
 max:=Ln(abs(3*sin(x[1])+1));
 min:=max;
 For i:=2 to 6 do
  Begin
   y:=Ln(abs(3*sin(x[i])+1));
   If y>max then max:=y else
   If y<min then min:=y;
  End;
 Writeln('min= ',min:5:2,', max= ',max:5:2)
End.
0
 Аватар для dimkachel
6 / 1 / 2
Регистрация: 18.11.2009
Сообщений: 172
15.01.2010, 20:32  [ТС]
TAVulator , точно, я его в переменных описал
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
15.01.2010, 20:32
Помогаю со студенческими работами здесь

Найти наибольшее и наименьшее значения элементов и поменять их местами
Здравствуйте, помогите пожалуйста с решением задачи: Для целочисленного массива X(N), заданного датчиком случайных чисел в интервале...

Найти наибольшее и наименьшее значение функции
Найти наибольшее и наименьшее значение функции y=3x*x+x-4, если на заданном интервале x меняется с шагом 0.1. Организовать цикл при вводе...

найти наибольшее и наименьшее значение функции
1)Написать программу которая по n дня недели выводит на экран название дня. N дня вводить с клавиатуры, если 7 &lt; n &lt;= 0 выдать...

Найти наименьшее и наибольшее значение функции на заданном промежутке
Задание: Найти наименьшее и наибольшее значение функции на промежутке. y=\sqrt{x-{x}^{3}}\, x\epsilon Проблема в том, что не...

Составить программу, которая находит наибольшее и наименьшее значение функции
Составить программу, которая находит наибольшее и наименьшее значение функции y=f(x) на отрезке . Концы отрезка машина должна запрашивать. ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
15
Ответ Создать тему
Новые блоги и статьи
Подстановка значения реквизита справочника в табличную часть документа
Maks 10.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .
Очистка реквизитов документа при копировании
Maks 09.04.2026
Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .
модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий
anaschu 08.04.2026
https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI
Блокировка документа от изменений, если он открыт у другого пользователя
Maks 08.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .
Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка.
Hrethgir 08.04.2026
Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .
Модель ЗдрввоСохранения 7: больше работников, больше ресурсов.
anaschu 08.04.2026
работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ
Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики.
Hrethgir 07.04.2026
Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .
Горе от ума
kumehtar 07.04.2026
Эта мне ментальная установка, что вот прямо сейчас, мол, мне для полного счастья не хватает (нужное вписать), и когда я этого достигну - тогда и полный кайф. Одна из самых сильных ловушек на пути. . . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru