Округление чисел

@iluzi0n · Регистрация: 30.03.2014

Доброго времени суток. Подскажите пожалуйста как сделать округление чисел в массиве до(допустим) 4 символов после запятой.

Delphi

for i:=1 to k do
begin
Form6.Memo1.Lines.Add('text ' + nm[i] + v + FloatToStr(mass[i]));
end;

Заранее огромное спасибо.

@i8085 · 16.02.2016, 23:24

Сообщение от iluzi0n

как сделать округление чисел в массиве до(допустим) 4 символов после запятой

Округлить числа в самом массиве - умножить на 10⁴, округлить до целого и поделить на 10⁴.
А если как у вас, вывести число с округлением, то

Delphi

1	Form6.Memo1.Lines.Add('text ' + nm[i] + v + Format('%.4f',[mass[i]]);

@northener · 17.02.2016, 01:03

Сообщение от iluzi0n

Подскажите пожалуйста как сделать округление чисел в массиве

Что ты подразумеваешь под "округлением чисел в массиве"? И зачем оно тебе надо?
В приведенном тобой коде нет никакого округления чисел в массиве.

@northener пофигист широкого профиля 4733 / 3167 / 859 Регистрация: 15.07.2013 Сообщений: 18,252
	17.02.2016, 01:03	3
	Сообщение от iluzi0n Подскажите пожалуйста как сделать округление чисел в массиве Что ты подразумеваешь под "округлением чисел в массиве"? И зачем оно тебе надо? В приведенном тобой коде нет никакого округления чисел в массиве. 0