PascalABC.NET

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
PascalABC.NET Найти ошибку в методе упорядочения Шелла народ мне сбросили задачу которая маё упорядочивать элементы методом шелла но она почемута не работает посмотрите где здесь ошибка есть program z_1; uses crt; type massiv=array of integer; var i, j, n, d, count: integer; A: massiv; procedure Shell(A: massiv; n: integer); begin d:=n; https://www.cyberforum.ru/ pascalabc-net/ thread1554998.html	PascalABC.NET C использованием операции in организовать проверку текущего числа цифр в строке s C использованием операции in организовать проверку текущего числа цифр в строке s, описанных как var s: string .
PascalABC.NET Описать функцию подсчета количества цифр в числе Описать функцию DigitCount(К) целого типа, находящую количество цифр целого положительного числа К. Используя эту функцию, сформировать массив В, каждый элемент которого равен количеству цифр соответствующего элемента массива А размера N. Входной файл может быть произвольным Есть небольшие наработки, не могу понять как сделать что бы количество цифр выводилось в другой массив const ... https://www.cyberforum.ru/ pascalabc-net/ thread1554740.html	PascalABC.NET Математическое ожидание и дисперсия помогите вывести формулу нахождения мат.ожидания и дисперсии ,в программный код запутался в цикле.. по идее... Мат ожидание (Mat)= сумма шага(0,1 .. 0.2 .. 1) *на значение а дисперсия(Dis) это... разность между мат.ожиданием квадрата случайной величины(Mat2) и квадратом ее мат.ожидания(Mat) Буду очень благодарен за помощь! var mass:array of real; i :integer; Mat:= 0.0; ... https://www.cyberforum.ru/ pascalabc-net/ thread1554542.html
Построить новую матрицу такого же размера по правилу PascalABC.NET Вот полностью программа и по факту должна работать,но где-то здесь if a < min then min := a; b := min; выдаёт ошибку выход за границу массива,помогите найти ошибку {Дана прямоугольная целоичесленная матрица размером m x n. Построить новую матрицу такого же размера,гд каждый элемент равен минимальному срерди соседей соответсующего элемента сходной матрицы} program P1; const m...	PascalABC.NET Указать множество всех треугольников с вершинами в заданных точках, пересекающихся с окружностью Здравствуйте. Помогите пожалуйста написать программу с использованием цикла for. Условие: На плоскости n точек заданы своими координатами, и также дана окружность радиуса R с центром в начале координат. Указать множество всех треугольников с вершинами в заданных точках, пересекающихся с окружностью; множество всех треугольников, содержащихся внутри окружности. https://www.cyberforum.ru/ pascalabc-net/ thread1554436.html
PascalABC.NET Протабулировать функцию https://www.cyberforum.ru/ pascalabc-net/ thread1554291.html Протабулировать функцию+корректность ввода	PascalABC.NET Расположить в обратном порядке элементы массива с индексами от M до N Дан одномерный числовой массив размера K. С клавиатуры вводятся числа M и N, где 0 < M < N < K. Расположите в обратном порядке элементы массива с индексами от M до N, не включая элементы с указанными индексами. Вспомогательный массив не использовать. Вывод элементов измененного массива осуществите в строку.
PascalABC.NET Требуется отладить игру "Пятнашки" Прошу помощи. Помогите пожалуйста довести пятнашки до ума, а именно создать массив сверяясь с которым определяется выигрыш , ведется счетчик ходов и выводится на поле. uses graphABC; const SCR_SIZE: integer = 400; B_Color = RGB(100, 100, 200); T_Color = RGB(200, 155, 64); FLD_SIZE: integer = 4; //матрица блоков https://www.cyberforum.ru/ pascalabc-net/ thread1554174.html	PascalABC.NET Найти максимальное произведение чисел, кратное 14 https://www.cyberforum.ru/ pascalabc-net/ thread1554067.html Привет всем! Надо решать задачу: Последовательность натуральных чисел характеризуется числом Х – наибольшим числом, кратным 14 и являющимся произведением двух элементов последовательности с различными номерами. Напишите эффективную, в том числе по используемой памяти, программу (укажите используемую версию языка программирования, например, Borland Pascal 7.0), находящую число X для...
Упорядочить элементы матрицы по правилу (процедуры и функции) PascalABC.NET Пусть задана вещественная матрица A (n x n). Упорядочить элементы матрицы: a) по неубыванию значений максимальных элементов в строках; b) по неубыванию сумм элементов строк.	PascalABC.NET Вычислить длину кривой, соответствующей функции y=f(x) на отрезке [a,b], приближенно заменив кривую ломаной https://www.cyberforum.ru/ pascalabc-net/ thread1553967.html Вычислить длину кривой, соответсвующей функции y=f(x) на отрезке ,приближенно заменив кривую ломаной,полученной в результате разбиения отрезка на n равных частей. помогитее :cry:

Puporev

Почетный модератор

64304 / 47599 / 32743

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

Сообщений: 115,181

18.10.2015, 12:29

Как решать сложное математическое уравнение? - PascalABC.NET - Ответ 8209080

18.10.2015, 12:29. Показов 2085. Ответов 1

Метки (Все метки)

Сообщение было отмечено rokis123 как решение

Решение

Pascal

var a,b,c,d,e,f,x:real;
begin
writeln('Введите a,x');
readln(a,x);
if a*x=-3 then write('c не определено, деление на 0')
else
 begin
  b:=x/sqr(3+a*x)+3*x;
  d:=x*sin(x)/3-1;
  if cos(x)<0 then
  write('c не определено, отрицательное число в вещественной степени')
  else if cos(x)=0 then write('c не определено, деление на 0')
  else
   begin
    e:=exp(ln(cos(x))*x);
    f:=d*d*d/e;
    c:=b*f+a+2;
    write('c=',c:0:3);
   end;
 end;
end.

Вернуться к обсуждению:
Как решать сложное математическое уравнение? PascalABC.NET

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

Programming

Эксперт

94731 / 64177 / 26122

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

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

18.10.2015, 12:29

Готовые ответы и решения:

Как решать дифференциальное уравнение
2yy''={y}^{2}+{(y')}^2 Вроде бы вот это http://eqworld.ipmnet.ru/en/solutions/ode/ode0336.pdf но...

Как решать урАвнение типа: (5+х) / (х-2) = 1 ?
Как решать уровнение типа: (5+х) / (х-2) = 1 ?

Как решать это уравнение?
Здравствуйте, есть дифур (во вложениях). И дан отрезок интегрирования с шагом 0.5 Напомните,...

Как решать комплексное уравнение
z^3+3z^2+3z+3=0 как решать вообще не пойму есть идеи что нужно разложить на множители но чем...

	18.10.2015, 12:29

IT_Exp

Эксперт

87844 / 49110 / 22898

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

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

18.10.2015, 12:29

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

как решать уравнение Бернулли такого вида
(y ln x - 2)ydx = xdy

Как школьник должен решать данное уравнение?
Имеется уравнение x^(x-1) = 1. С одной стороны, ввиду того, что область определения показательной...

Как решать в matlabe дифференциальное уравнение с запаздывающим аргументом?
Здравствуйте. Для решения выбрал matlab поскольку у него имеются все необходимые инструменты. Но...

Как преобразовать математическое уравнение в, введенное в lineEdit, в код и посчитать его?
Вопрос такой. Есть LineEdit, в него вводится выражение, например 4*5-10/2 и нужно чтобы программа...

Наверх