Думала, у кого кривые руки - у меня или у разработчиков Дельфи. Как ни странно, оказалось, что у вторых. 1. С месяц назад я искала в списке математических функций Math для Delphi функцию ошибок erf. Что ее там не оказалось вообще, равно как и других статистических функций, либо они были, но только в кривом виде для статических массивов, так что
(
Read more... )
Comments 54
Вообще, собираюсь обзавестись свежими дистрибутивами, могу поделиться как только.
Reply
Reply
зы. а писать на паскале чтото серезное, имхо несерезно это ;)
Reply
А где он у тебя? Дома? На работе?
Reply
Reply
ЗЫ: А я не защищаю Паскаль :)
Reply
(The comment has been removed)
Reply
var V1 : array of Double;//вектор
var N : integer;//размерность вектора
...
begin
N=...;
....
SetLength(V1,N);//устанавливаем длину
...
V1[i]:=...;//задаём компоненты вектора
...
x:=Norm(V1);//функция нормы (для примера)
end;
А функция пишется например так:
function Norm(V : array of Double) : Double;
var i : integer;
begin
Result:=0;
for i:=0 to Length(V)-1 do //Length(V) - размерность вектора
Result:=Result+sqr(V[i]);
Result:=sqrt(Result);
end;
С матрицами тоже можно похожим образом работать. Если надо, подскажу.
Reply
А в динамических массивах длину надо определить до того, как к массиву обращаешься. У тебя цикл for, а у меня while, там длина сначала неизвестна.
Что-то вроде того, что мне надо, я то ли видела, то ли делала в си++
Reply
while i
Reply
Reply
Reply
Reply
Leave a comment