REM
REM  Найти максимум функции
REM  z = (x * y) / EXP(x + y)  
REM
REM  x = 1  y = 1  z = 0.1353353
REM
 
DECLARE FUNCTION f! (x!, y!)
 
CLS
 
FOR x = 0 TO 2 STEP .01
FOR y = 0 TO 2 STEP .01
   IF max < f(x, y) THEN
      max = f(x, y)
      xm = x
      ym = y
   END IF
NEXT y, x
 
PRINT xm; ym; max
 
END
 
FUNCTION f (x, y)
   f = (x * y) / EXP(x + y)
END FUNCTION

Заказать работу у эксперта

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

10.05.2016, 15:29

Ответы с готовыми решениями:

Найти максимум линейного массива с помощью рекурсивной функции
Найти максимум линейного массива с помощью рекурсивной функции очень легко. Весь код забирает...

Найти локальный максимум
дан 2-мерный массив. Найти локальный максимум, если он есть заменить его на противоположный по знаку

Найти максимум числового ряда
Числовой ряд не задан. Надо его еще построить так, чтобы он имел максимальную сумму. построение....

Найти максимум числового выражения 2
ТС предлагает вам решить эту задачу. Она принесет вам счастье и радость грядущего лета... ...

	10.05.2016, 15:29

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

10.05.2016, 15:29

Помогаю со студенческими работами здесь

В массиве А(65) найти максимум и минимум
В массиве А(65) найти максимум и минимум. Значения в каждом десятке элементов массива. Из найденных...

Найти максимум числового выражения
Задано числовое выражение (sin1 + ... + sin(k)) * (sin(k+1) + ... + sin(n)) в двух скобках...

Найти максимум из множества чисел
Дано множество из 1024 чисел. Числа имеют вид sin(cos(cos(.....sin(1)...)) или ему подобный То...

В массиве найти максимум, минимум и сумму элементов до максимума.
Дан массив 15 элементов. Найти у него максимум, минимум и сумму элементов до максимума.

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

Или воспользуйтесь поиском по форуму:

Наверх