Вопрос по кратности значений

← →
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)

2[4]19~станет=20:)

>[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] нет...

Вопрос по кратности значений Найти похожие ветки