
27.12.2013, 12:39
|
 |
Let Me Show You
|
|
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
|
|
да, все работает:
Код:
var
d: array of Double;
begin
SetLength(d, 2);
d[0]:=0;
d[1]:=10;
ShowMessage(FloatToStr(Mean(d)));
end;
Код:
var
d: array [0..1] of Double;
begin
d[0]:=0;
d[1]:=10;
ShowMessage(FloatToStr(Mean(d)));
end;
__________________
Пишу программы за еду.
__________________
|