Форум программистов, компьютерный форум, киберфорум
PascalABC.NET
Войти
Регистрация
Восстановить пароль
Другие темы раздела
PascalABC.NET Вывести количество строк матрицы, элементы которых монотонно возрастают https://www.cyberforum.ru/ pascalabc-net/ thread1525017.html
///20. Дана матрица размера 5 x 10. Вывести количество строк1|столбцов2, элементы которых монотонно возрастают3|убывают4. Генерирует считает но не выводит program var3_20; const n = 5; m = 10;
PascalABC.NET Не работает генерация рандомного числа
Каждый раз программа дает 7, счетчик К работает правильно, а вот строка r:=random(1,k); дает всегда один и тот же результат. r:=random(k)+1; (что идентично по действию) дает такой же результат. Program test; function randomset(s: set of integer): integer; var num, k, i, r: integer; res: array of integer; begin k := 0; foreach num in s do begin
PascalABC.NET Составить программу для нахождения минимума функции на отрезке Всем привет, не могу составить программу для нахождения минимума функции, помогите пожалуйста: .Найти минимум функции y=(log_2(|x|+2))^3-cos(a^b) на отрезке xє h=3. https://www.cyberforum.ru/ pascalabc-net/ thread1524972.html PascalABC.NET Вычислить наименьшее количество операций, необходимых для получения из числа 1 числа N Ограничение по времени работы программы: 4 секунды Исполнитель «Калькулятор» может с заданным числом X выполнить одну из трех операций и получить новое число. Возможные операции: Прибавить к числу X единицу. Умножить число X на 2. Умножить число X на 3. Определите, какое наименьшее число операций необходимо для того, чтобы получить из числа 1 заданное число N. ВХОДНЫЕ ДАННЫЕ Программа... https://www.cyberforum.ru/ pascalabc-net/ thread1524760.html
PascalABC.NET Работать с картинкой как с объектом
У меня есть изображение, ну скажем человечек какой-нибудь и мне нужно этого человечка "перенести" в паскаль. То есть хочу работать в паскале с этой картинкой, как с объектом. Возможно такое сделать?
PascalABC.NET Параметры-значения и параметры-переменные в функции и процедуре https://www.cyberforum.ru/ pascalabc-net/ thread1524373.html
Плиз помогите в этом коде поставить параметры или атрибуты, не уверен в правильном названии, для функции и процедуры, я по примерам учебника не могу понять, а если можно то еще обьяснить почему так. var sum: integer; nom: array of integer = (200, 100, 50, 20); menuN: integer; k: array of integer; kEnter: array of integer; pass: integer = 123;
PascalABC.NET Есть ли функция, возвращающая случайное значение из множества integer? Есть ли функция, возвращающая случайное значение из множества integer? Если нет, каков принцип написания такой подпрограммы? https://www.cyberforum.ru/ pascalabc-net/ thread1524256.html Запустить BAT-файл на выполнение PascalABC.NET
Возможно немного глупый вопрос, но все же... Как выполнить батник, в теле которого есть пути? Из-за них отказывается корректно выполняться батник, запущенный через программу.. Добавлено через 3 минуты вариант "переписать батник" не катит, потому что программа(не быдлошколомайнкрафт) использует какой-то хитрый синтаксис, в котором никак разобраться не могу, хотя переписывал батники вроде...
PascalABC.NET Перечисление через пробел в результате Program perestanovkastrok; const m=4; n=4; o=1; k=4; var E:array of real; c:real; i,j:integer; https://www.cyberforum.ru/ pascalabc-net/ thread1523826.html PascalABC.NET Используя стек, переписать строки в обратом порядке Сегодня решалась мной одна задача, но не понятно: как можно через процедуру Pop занести данные в файл. Подскажите, ели знаете. Сейчас заново буду пытаться её сделать, и поэтому хотелось бы заранее понять как правильно. Задача такая: Дан текстовый файл, в котором записаны строки, размер которых не превышает . Нужно, используя стек переписать строки в обратом порядке ( не символы, а именно... https://www.cyberforum.ru/ pascalabc-net/ thread1523760.html
PascalABC.NET Ошибка в чтении массива
В программе после трех рядов и нажатия Enter курсор просто перемещается на след. строку, ничего больше не происходит. Помогите пожалуйста, почему? ___________________________________ Program Max_In_Rows; const n=3; var b:array of real; i,j:integer; a:array of real; begin
PascalABC.NET Ошибка при создании файла var f : file of integer; i,x : integer; begin Assign(f,'Text.txt'); Rewrite(f); for i:= 1 to 10 do write(f,i); Close(f); end. https://www.cyberforum.ru/ pascalabc-net/ thread1523588.html
Почетный модератор
64299 / 47594 / 32743
Регистрация: 18.05.2008
Сообщений: 115,181
06.09.2015, 07:06 0

Найти минимум функции - PascalABC.NET - Ответ 8043841

06.09.2015, 07:06. Показов 1317. Ответов 2
Метки (Все метки)

Лучший ответ Сообщение было отмечено tezaurismosis как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
const xn=3;
      xk=33;
      h=3;
      a=3;
      b=2;
      c=3;
function f(x:integer):real;
begin
f:=power(ln(abs(x)+2)/ln(2),3)-cos(power(a,b))-c*power(x,1.8);
end; 
var x:integer;
    min:real;
begin
x:=xn;
min:=F(x);
while x<=xk do
 begin
  writeln('x=',x:2,' y=',f(x):8:2);
  if f(x)<min then min:=f(x);
  x:=x+h;
 end;
write('Минимум=',min:0:2);
end.


Вернуться к обсуждению:
Найти минимум функции PascalABC.NET
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
06.09.2015, 07:06
Готовые ответы и решения:

Процедуры и функции: найти минимум всех сумм абсолютных величин элементов матрицы по столбцам
В заданной матрице А (n х n) найдите минимум всех сумм абсолютных величин элементов матрицы по...

В массиве A(m,n) в каждом столбце найти минимум, умножить каждый минимум на 5 и найти произведение этих чисел.
В массиве A(m,n) в каждом столбце найти минимум, умножить каждый минимум на 5 и найти произведение...

Найти минимум и максимум функции
помогите решить 31. Найти минимум и максимум функции Y = X3 – 7X +8, х принимает целые значения на...

Найти минимум и максимум функции
help me pls 32. Найти минимум и максимум функции Y = ln(x – x2 +8), х принимает целые значения на...

2
06.09.2015, 07:06
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
06.09.2015, 07:06
Помогаю со студенческими работами здесь

Найти минимум и максимум функции на отрезке
Народ, помогите, пожалуйста, вот с такой задачкой: Перебором с шагом 0.05 найти минимум функции...

Найти минимум функции одной переменной
Пожалуйста, помогите с заданием! Очень нужно! Найти минимум функции одной переменной двумя...

Подрограммы. Для этих матриц найти минимум среди минимальных элементов и минимум среди максимальных элементов, произвести замену.
Помогите пожалуйста, из-за сессии не успеваю а сдавать уже завтра: Ввести двумерные массивы X1...

Найти самое короткое слово в предложение и найти минимум функции
1) дано предложение в котором слова разделены запятой или пробелом а общая длинна меньше или равна...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru