Форум: "Основная";
Текущий архив: 2004.05.02;
Скачать: [xml.tar.bz2];
ВнизВопрос по кратности значений Найти похожие ветки
← →
avgur (2004-04-15 15:40) [0]как сделать, что-бы значеник было кратным 5.
например если 16 то стало 15
если 19 то стало 20
← →
Ega23 © (2004-04-15 15:42) [1]+ и - ?
← →
Тимохов © (2004-04-15 15:42) [2]вам самому вопрос ясен?
← →
TUser © (2004-04-15 15:42) [3]result:=5*round(Znachenik/5)
← →
Reindeer Moss Eater © (2004-04-15 15:43) [4]Val := Val - (Val Mod 5)
← →
TUser © (2004-04-15 15:47) [5]2[4]19~станет=20:)
← →
han_malign © (2004-04-15 15:55) [6]>[3],[4]
для целочисленных
const Step:integer=5;
var rest,Val: integer;rest:=Val mod Step;
if(rest>=(Step+1) div 2)
then inc(Val,Step-rest)
else dec(Val,rest);
- будет все таки быстрее чем [3];
Для вещественых альтернаивы [3] нет...
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2004.05.02;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.029 c