![]() |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
![]() ![]() |
![]() |
Renn |
![]() ![]()
Сообщение
#1
|
Группа: Пользователи Сообщений: 3 Пол: Мужской Реальное имя: Ренн Репутация: ![]() ![]() ![]() |
Доброго времени суток. Вот выношу себе мозг не первый день... А сдача - горит.
> > Разработать схему алгоритма, составить Pascal программу: "Вычисления таблицы значений функции ax^2+bx+cos(П*a/b). При заданных значениях аргумента x, xn, xk, dx и параметра а = М-значений a. Параметр b принимает значение, численно равное корню нелинейного уравнения x^2-1,3ln(x+0,5)-2,8x+1,15. Интервал изоляции 0-10. > > Обозначение: > > xn, xk - начальное и конечное значение аргумента x; > > dx - шаг изменения параметра x; > > N - число значений параметра x, изменяемого от значения xn, с шагом dx; > > M - число значений параметра a. > > ^ - степень. Прошу подсказать, хотя бы, как записать а = М-значений a с функцией и как найти корни x^2-1,3ln(x+0,5)-2,8x+1,15. Интервал изоляции 0-10. Буду очень благодарен. Сообщение отредактировано: Renn - 21.12.2007 4:28 |
Renn |
![]()
Сообщение
#2
|
Группа: Пользователи Сообщений: 3 Пол: Мужской Реальное имя: Ренн Репутация: ![]() ![]() ![]() |
Вот программа, которую сумел состряпать посмотрите пожалуйста и подскажите, что не верно.
program rgr; Буду очень благодарен. =) Сообщение отредактировано: Renn - 21.12.2007 4:21 |
klem4 |
![]()
Сообщение
#3
|
![]() Perl. Just code it! ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: ![]() ![]() ![]() |
эм ... ну смотри:
Цитата function y(x,a,b:real):real; begin y:=a*sqr(x)+b*x+cos(pi*(a/b)); end; // .... mx[i]:=y(x,b); -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
Renn |
![]() ![]()
Сообщение
#4
|
Группа: Пользователи Сообщений: 3 Пол: Мужской Реальное имя: Ренн Репутация: ![]() ![]() ![]() |
Ошибок, как я понимаю там немеренная куча, как понимаю...
Спасибо, за помощь отыскание одной из них, ищу дальше... Поправил осталась совсем чуть чуть ну, плз. program rgr; Помогите плз... ну очень очень срочно. Сообщение отредактировано: Renn - 21.12.2007 12:17 |
andriano |
![]()
Сообщение
#5
|
Гуру ![]() ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 1 168 Пол: Мужской Реальное имя: Сергей Андрианов Репутация: ![]() ![]() ![]() |
repeat PS. Чтобы самому без посторонней помощи искать подобные ошибки, нужно всего-навсего отформатировать текст. Зачем просить делать других то, что вполне можешь сделать сам? Сообщение отредактировано: andriano - 21.12.2007 22:43 |
![]() ![]() |
![]() |
Текстовая версия | 22.06.2025 21:41 |