Извините, ничего не найдено.

12121 · 11.01.2011, 00:00

Тебе здесь пример привели в 25 посте. Я тебе пример сделал. http://mobilepascal.ru/forum/4-471-1 если ничего не помогает то (цензура)

Halk-DS · 11.01.2011, 01:37

Еще я вставлю своих 2 рубля...
Пробуй также только на своем язике:
A#=15.4444444444 ;-Пример округляемого числа.
B#=A#*10 ;-В итоге выйдет B#=154.444444444
B#=Floor#(B#);-Округлили до целых. Теперь выщло просто B#=154
A#=B# / 10 ;-Ответ "15,4" то что надо...

А теперь в одной строчке
A#=Floor#(A#*10)/10.0

Sloth · 11.01.2011, 16:38



B#=Floor#(B#);

а MP будет:



B=trunc(A);

так чтоли? и еще читал что trunc работает неправильно с fixed point

12121 · 11.01.2011, 16:58

Да неправильно. Поэтому я обошелся без trunc.

Sloth · 11.01.2011, 17:10

а floating point где ставиться? или как ты обошелся без trunc?

DIMMON4IK · 11.01.2011, 20:11

посмотри мой пост на предыдущей странице

Sloth · 12.01.2011, 18:01



if frac(realvar)>=0.5 then int:=(realvar*2 div 2)+1 else int:=realvar*2 div 2

realvar - это типа переменная.
int - что это?

DIMMON4IK · 13.01.2011, 18:20

1.Да, типа - real, число для округления
2.Тоже переменная, типа - integer, округленное число

Sloth · 18.01.2011, 20:12

требует until