Q&A
- 행렬의 곱을 구하려는 함수인데 잘 안되네요..
function portfolioStdvr( a : array of Double; b : array of Double; column : Integer):Double;
var
i,j : Integer;
AStdvr : array[1..10] of Double;
Stdvr : Double;
begin
stdvr:=0;
for i:=1 to Column do
begin
for j:=1 to Column do AStdvr[i]:=a[j]*b[j,i];
Stdvr := AStdvr[i]*a[i]+Stdvr;
end;
PortfolioStdvr:=Power(Stdvr, 0.5);
end;
위 코드로 하면 애러가 납니다. 벡터와 합수와 벡테의 곱( xAx)을 구하려는 함수인데 왜 안될까요?
고수님들의 조언을 구합니다.
var
i,j : Integer;
AStdvr : array[1..10] of Double;
Stdvr : Double;
begin
stdvr:=0;
for i:=1 to Column do
begin
for j:=1 to Column do AStdvr[i]:=a[j]*b[j,i];
Stdvr := AStdvr[i]*a[i]+Stdvr;
end;
PortfolioStdvr:=Power(Stdvr, 0.5);
end;
위 코드로 하면 애러가 납니다. 벡터와 합수와 벡테의 곱( xAx)을 구하려는 함수인데 왜 안될까요?
고수님들의 조언을 구합니다.
1
COMMENTS
(NOTICE) You must be logged in to comment on this post.
-
- SexyBear
- •
- 2000.07.19 02:26
- 2 COMMENTS
- /
- 0 LIKES
-
도마뱀•2000.07.19 02:43아래꺼중 하나를 써봄이 어떨런지... 김영대씨의 답변 내용중... > // 아래에서 GetVolumeInfo 를 보... -
도마뱀•2000.07.19 02:38SexyBear wrote: > 펜티엄2까지는 델파이팁의 CPUID 구하는 방법으로 해결이 되는데 > 펜티엄3에서는 CPU...
-
- 신현숙
- •
- 2000.07.19 02:23
- 1 COMMENTS
- /
- 0 LIKES
-
김영해•2000.07.19 03:21신현숙 wrote: > 안녕하세요.. > excel로 자료를 보내고, excel의 자료를 읽고 하다 보니.. > f1book콤...
-
-
구창민•2000.07.19 02:20호야 wrote: > procedure TForm1.ToolButton5Click(Sender: TObject); > var > ActiveForm: TForm; > ...
-
-
- ljb007
- •
- 2000.07.19 02:06
- 1 COMMENTS
- /
- 0 LIKES
-
오광배•2000.07.29 03:35ljb007 wrote: > sql서버 C/S환경은 절대아님 > 10대의pc가 있는데 1대만 실행파일과 db을 설치하고 > ...
-
- 이지은
- •
- 2000.07.19 01:45
- 1 COMMENTS
- /
- 0 LIKES
function portfolioStdvr( a : array of Double; b : array of Double; column : Integer):Double; var i,j : Integer; AStdvr : array[1..10] of Double; Stdvr : Double; begin stdvr:=0; for i:=1 to Column do begin for j:=1 to Colu...-
최용일•2000.07.19 12:11안녕하세요. 최용일입니다. for j:=1 to Column do AStdvr[i]:=a[j]*b[j,i]; 위에서 b가 이차원배...
-
- Faster
- •
- 2000.07.19 01:32
- 1 COMMENTS
- /
- 0 LIKES
-
성호종•2000.07.21 22:15Faster wrote: 당근 가능하지요... 아주 기본적인 형태의 그래프군요.... > 넙쭉. > > 안녕하심까. ...
-
- 찾는이
- 2000.07.19 01:21
- 0 COMMENTS
- /
- 0 LIKES
-
-
구창민•2000.07.19 01:25heimdal wrote: > datetimepicker을 이용해서 검색을 하고싶은데여.. > > 2000-7-17일을 클릭하면 디비...
-
heimdal•2000.07.19 02:34구창민 wrote: > heimdal wrote: > > datetimepicker을 이용해서 검색을 하고싶은데여.. > > > > 2000...
-
김영해•2000.07.19 03:26heimdal wrote: > 구창민 wrote: > > heimdal wrote: > > > datetimepicker을 이용해서 검색을 하고싶은...
-
-
- xfilemania
- •
- 2000.07.19 01:04
- 2 COMMENTS
- /
- 0 LIKES
-
한재필•2000.07.19 01:15xfilemania wrote: > > Exit가 아니라 다른 것이 있는지 궁금합니다. Exit는 아예 프로시저에서 빠...
-
구창민•2000.07.19 01:10xfilemania wrote: > > Exit가 아니라 다른 것이 있는지 궁금합니다. Exit는 아예 프로시저에서 빠...
-
- 문현범
- •
- 2000.07.19 00:56
- 1 COMMENTS
- /
- 0 LIKES
-
구창민•2000.07.19 01:13문현범 wrote: > 년도를 바꿀 수 있게금 하는 달력 콤포넌트를 가지고 계신분은 꼭 좀 공유 합시다. > 저...
-
- 소방관
- 2000.07.19 00:54
- 0 COMMENTS
- /
- 0 LIKES
-
- 한재필
- •
- 2000.07.19 00:42
- 3 COMMENTS
- /
- 0 LIKES
-
이주흥•2000.07.19 00:51한재필 wrote: > 델파이로 만든프로그램인데요 파라독스를 사용한 테이블이 연결되있는데 > 인스톨쉴드를...
-
한재필•2000.07.19 01:06이주흥 wrote: > 한재필 wrote: > > 델파이로 만든프로그램인데요 파라독스를 사용한 테이블이 연결되있...
-
이주흥•2000.07.20 02:39아..이제 봤네요.. BDE를 따로설치하는건 저도 해보지 않았구요.. 아마 정품을 사셨다면 따로 들어있을지...
-
- 장명선
- •
- 2000.07.19 00:36
- 1 COMMENTS
- /
- 0 LIKES
-
성호종•2000.07.21 22:29장명선 wrote: Lock은 paradox만 그런것이 아니고 모든 DB가 마찬가지입니다. 다만 table을 create할때 L...
-
- 초보자
- •
- 2000.07.19 00:35
- 4 COMMENTS
- /
- 0 LIKES
-
초보자•2000.07.19 02:58찾았습니다.. 먼저 고수님들의 성원에 감사들입니다. 아래의 내용을 From 문장을 합쳐서 하닌 문제없이 ...
-
ACCESS•2000.07.19 02:39초보자 wrote: > 데이타는 ms access2000을 사용하고 있습니다. > > > ADOQBAR.Close; > ADOQBAR.S...
-
어린왕자•2000.07.19 01:53초보자 wrote: > 데이타는 ms access2000을 사용하고 있습니다. > > > ADOQBAR.Close; > ADOQBAR.S...
-
어린왕자•2000.07.19 03:02아..그룹별루 정렬을 안해두 되는 군요.. 이상타 쩌번엔 안되는 건 같던데..윈도우 98만 안되었던가? m...
-
- 김인수
- •
- 2000.07.19 00:19
- 3 COMMENTS
- /
- 0 LIKES
-
한재필•2000.07.19 01:01김인수 wrote: > 고수님들 안녕하세요 > 오늘두 하수는 고수님들을 찾아 뵙는군요 > 염치없지만 제문제...
-
이경문•2000.07.19 00:47Form의 KeyPreview 를 true로 해 주시고 procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char)...
-
김인수•2000.07.19 01:08정말루 감사합니다 가르쳐주신대로 해보겠습니다 좋은 하루가 되시길 바랍니다 안녕히...
-
- 델파이걸
- •
- 2000.07.19 00:11
- 3 COMMENTS
- /
- 0 LIKES
-
Black}{ole•2000.07.19 00:27델파이걸 wrote: > 특정 폴더를 변수에 넣어주고 나서 거기에 있는것들을 하나씩 읽어와 > Listbox1.ite...
-
델파이걸•2000.07.19 01:27Black}{ole wrote: > > > > 안녕하세요. ^^ > 걍.. FileListBox를 이용하심.. 간단하게 해결될것 같...
-
Black}{ole•2000.07.19 03:50델파이걸 wrote: > Black}{ole wrote: > > > > > > > 안녕하세요. ^^ > > 걍.. FileListBox를 이용...
-
- 김선달
- •
- 2000.07.19 00:14
- 1 COMMENTS
- /
- 0 LIKES
-
구창민•2000.07.19 01:30김선달 wrote: > 스크린에서 현재 키보드 커서의 좌표를 알수 있는 함수를 알고 싶습니다. > API함수는 ...
-
-
- 델초...
- •
- 2000.07.18 22:42
- 1 COMMENTS
- /
- 0 LIKES
-
Black}{ole•2000.07.19 00:29델초... wrote: > 고수님들의 철저한 외면을 받고 있는 델초...입니다.....정말 울고 싶군요... > 다시한...
-
- 전수완
- •
- 2000.07.18 22:30
- 1 COMMENTS
- /
- 0 LIKES
-
하얀까마귀•2000.07.18 22:36안녕하세요 하얀까마귀 입니다. 그냥 데이타베이스 엔진 설치하시고 개발하시면 됩니다.. 단지.. 테...
for j:=1 to Column do AStdvr[i]:=a[j]*b[j,i];
위에서 b가 이차원배열로 되어있네요...
^^ 항상 즐코하세요.
이지은 wrote:
> function portfolioStdvr( a : array of Double; b : array of Double; column : Integer):Double;
> var
> i,j : Integer;
> AStdvr : array[1..10] of Double;
> Stdvr : Double;
> begin
> stdvr:=0;
> for i:=1 to Column do
> begin
> for j:=1 to Column do AStdvr[i]:=a[j]*b[j,i];
> Stdvr := AStdvr[i]*a[i]+Stdvr;
> end;
> PortfolioStdvr:=Power(Stdvr, 0.5);
> end;
>
> 위 코드로 하면 애러가 납니다. 벡터와 합수와 벡테의 곱( xAx)을 구하려는 함수인데 왜 안될까요?
>
> 고수님들의 조언을 구합니다.