IPB
ЛогинПароль:

> Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

 
 Ответить  Открыть новую тему 
> проблемы с модулем числа
camac
сообщение 28.09.2015 17:47
Сообщение #1





Группа: Пользователи
Сообщений: 4
Пол: Мужской

Репутация: -  0  +


Здравствуйте, знатоки.
Вопрос по FreePascal.
Столкнулся с непонятной для меня проблемой: необходимо сравнить модули чисел:

u:=u+(a*sin(al)+(ua-u)*v/r)*dt;
if abs (u)<1 then
u:=0;
v:=v+(a*cos(al)-sqr(ua/r)*ra+sqr(ua-u)/r)*dt;
if abc (v)<1 then
v:=0;


с первым (abs (u)) все нормально, но вот со вторым (abc (v)) проблема. Компилятор ругается:
Цитата
... (72,9) Error: Identifier not found "abc"


Чего же он хочет-то? Может кто подскажет, что тут не так?
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
camac
сообщение 28.09.2015 21:11
Сообщение #2





Группа: Пользователи
Сообщений: 4
Пол: Мужской

Репутация: -  0  +


Цитата(camac @ 28.09.2015 17:47) *

Здравствуйте, знатоки.
Вопрос по FreePascal.
Столкнулся с непонятной для меня проблемой: необходимо сравнить модули чисел:

u:=u+(a*sin(al)+(ua-u)*v/r)*dt;
if abs (u)<1 then
u:=0;
v:=v+(a*cos(al)-sqr(ua/r)*ra+sqr(ua-u)/r)*dt;
if abc (v)<1 then
v:=0;


с первым (abs (u)) все нормально, но вот со вторым (abc (v)) проблема. Компилятор ругается:
Чего же он хочет-то? Может кто подскажет, что тут не так?


Сам нашел. У меня просто очепятка.
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

 Ответить  Открыть новую тему 
3 чел. читают эту тему (гостей: 3, скрытых пользователей: 0)
Пользователей: 0

 



- Текстовая версия 18.09.2019 11:41
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"