Q&A
- function에 관한 질문이있는데요..(초보라서)
삼차원 array값을 function에 넘겨주어 값을 구해 오는 방법좀 가르쳐주세요..
잘안되네요.. 예를 들면요.. E2의 값을 function으로 주고 function에서
PERM값을 구해서 QK에 줄려구요.. I,J,K는 반복문으로 돌아가구요..
QK[I,J,K]:=PERM(E2[I,J,K]);
function PERM(E: array of real):real;
begin
PERM:= 1/(-82.4626*(sqr(E[X,Y,Z]-1.3858))+ 135.9433);
end;
어떻게 해야하는지 답좀해주세요..
그럼 수고하세요...
잘안되네요.. 예를 들면요.. E2의 값을 function으로 주고 function에서
PERM값을 구해서 QK에 줄려구요.. I,J,K는 반복문으로 돌아가구요..
QK[I,J,K]:=PERM(E2[I,J,K]);
function PERM(E: array of real):real;
begin
PERM:= 1/(-82.4626*(sqr(E[X,Y,Z]-1.3858))+ 135.9433);
end;
어떻게 해야하는지 답좀해주세요..
그럼 수고하세요...
3
COMMENTS
-
-
flash wrote:
> novice wrote:
> > 삼차원 array값을 function에 넘겨주어 값을 구해 오는 방법좀 가르쳐주세요..
> >
> > 잘안되네요.. 예를 들면요.. E2의 값을 function으로 주고 function에서
> >
> > PERM값을 구해서 QK에 줄려구요.. I,J,K는 반복문으로 돌아가구요..
> >
> >
> > QK[I,J,K]:=PERM(E2[I,J,K]);
> >
> > function PERM(E: array of real):real;
> > begin
> >
> > PERM:= 1/(-82.4626*(sqr(E[X,Y,Z]-1.3858))+ 135.9433);
> >
> > end;
> >
> > 어떻게 해야하는지 답좀해주세요..
> >
> > 그럼 수고하세요...
>
> 안녕하세요~
>
> 위의 함수를 보니 X,Y,Z은 선언 되지 않았는데 전역변수인지요?
> 함수 내부에서 E배열의 범위 전체를 접근한다면 이런방법이 있습니다.
>
>
> type T_E = array[0..9,0..9,0..9] of real;
>
> var QK:T_E;
> E2:T_E;
>
> ....
> QK[I,J,K]:=PERM(E2[I,J,K]);
> ....
>
> function PERM(const E: T_E ):real;
> begin
>
> PERM:= 1/(-82.4626*(sqr(E[X,Y,Z]-1.3858))+ 135.9433);
>
> end;
>
> const는 배열을 수정못하게 하기도 하지만 속도면에서도 매우 빠릅니다.
>
> 좋은하루 되세요~
우선 답글을 올려주셔서 고맙습니다..
근데 잘 안되는데요..
QK[I,J,K]:=PERM(E2[I,J,K]); 여기에 missing operator or semicolon 이라는 메세지와
PERM:= 1/(-82.4626*(sqr(E[X,Y,Z]-1.3858))+ 135.9433); array type required라는 에
러 메서지가 끝네요..
어떻게 된건지 죄송하지만 한번만더 가르쳐주세요..
-
안녕하세여.. 타락임다..^^
제 생각에는 삼차원 어레이를 전역변수로 쓰는것이 좋겠네여..
함수 파라미터로 줄수도 있지만, 전역변수로 쓰는게 정신건강상 좋아요..^^
novice wrote:
> 삼차원 array값을 function에 넘겨주어 값을 구해 오는 방법좀 가르쳐주세요..
>
> 잘안되네요.. 예를 들면요.. E2의 값을 function으로 주고 function에서
>
> PERM값을 구해서 QK에 줄려구요.. I,J,K는 반복문으로 돌아가구요..
>
>
> QK[I,J,K]:=PERM(E2[I,J,K]);
>
> function PERM(E: array of real):real;
> begin
>
> PERM:= 1/(-82.4626*(sqr(E[X,Y,Z]-1.3858))+ 135.9433);
>
> end;
>
> 어떻게 해야하는지 답좀해주세요..
>
> 그럼 수고하세요...
(NOTICE) You must be logged in to comment on this post.
-
-
타락천사•2000.05.17 19:27안녕하세여.. 타락임다..^^ 그건 빈폼을 만들어서 빈폼의 함수마다 어떤 값을 보이게 하면 쉽게 실행순...
-
홍세비•2000.05.17 19:00델초보 wrote: > 윈도우에서 프로그램을 실행할 때.. > 실행되는 경로(과정)이 알고 싶은데.. > 아시는 ...
-
nilriri•2000.05.17 18:40showmessage(application.ExeName); 이렇게하면 실행파일의 경로명과 파일명을 알수 있습니다... 가...
-
-
- 초보
- 2000.05.17 09:56
- 0 COMMENTS
- /
- 0 LIKES
-
-
- 초보
- 2000.05.17 07:11
- 0 COMMENTS
- /
- 0 LIKES
-
- novice
- •
- 2000.05.17 06:48
- 3 COMMENTS
- /
- 0 LIKES
삼차원 array값을 function에 넘겨주어 값을 구해 오는 방법좀 가르쳐주세요.. 잘안되네요.. 예를 들면요.. E2의 값을 function으로 주고 function에서 PERM값을 구해서 QK에 줄려구요.. I,J,K는 반복문으로 돌아가구요.. QK[I,J,K]:=PERM...-
최용일•2000.05.18 00:28안녕하세요. 최용일입니다. 좀 이상한 질문이네요. 배열을 넘겨주어 값을 구한다고 했는데 코딩은 배열...
-
novice•2000.05.18 00:12flash wrote: > novice wrote: > > 삼차원 array값을 function에 넘겨주어 값을 구해 오는 방법좀 가르쳐...
-
타락천사•2000.05.17 18:48안녕하세여.. 타락임다..^^ 제 생각에는 삼차원 어레이를 전역변수로 쓰는것이 좋겠네여.. 함수 파라...
-
- 한호
- 2000.05.17 06:13
- 0 COMMENTS
- /
- 0 LIKES
-
- 이병협
- 2000.05.17 05:43
- 0 COMMENTS
- /
- 0 LIKES
-
- 최상열
- •
- 2000.05.17 04:57
- 1 COMMENTS
- /
- 0 LIKES
-
최석기•2000.05.17 05:06최상열 wrote: > 제가 컴포넌트를 등록해서 쓰려고 하는데 소스파일인 *.pas는 없고 *.dcu파일만 있습니다...
-
- Macgyver
- •
- 2000.05.17 04:25
- 1 COMMENTS
- /
- 0 LIKES
-
배재근•2000.05.18 00:19Macgyver wrote: > > 델파이 5.0에서 DB Grid있잖아요 그걸루 사용자가 데이타를 입력[한번에 많게는 40...
-
- 어린왕자
- •
- 2000.05.17 04:09
- 1 COMMENTS
- /
- 0 LIKES
-
홍세비•2000.05.17 04:23어린왕자 wrote: > 안녕하세요..어린왕자입니다.. > 완전 초보질문..T.T > 툴바의 툴버튼 3개를 만들었...
-
- 힙합인
- •
- 2000.05.17 03:36
- 1 COMMENTS
- /
- 0 LIKES
-
한차으히•2000.05.17 06:15힙합인 wrote: > 에러1 > > ♥ 상세내용 참조 > ♥ 상세내용: > tblCommon: Field index out of range ...
-
-
- 최희영
- •
- 2000.05.17 03:17
- 1 COMMENTS
- /
- 0 LIKES
-
조규춘•2000.05.17 03:34최희영 wrote: > 화면의 캡쳐된 image를 압축하여 tcp/ip로 전송하고자 합니다. > image를 jpeg나 다른 f...
-
- 김문기
- •
- 2000.05.17 03:10
- 1 COMMENTS
- /
- 0 LIKES
-
타락천사•2000.05.17 18:46안녕하세여.. 타락임다.. ^^ 당근 에러가 나져.. 이렇게 바꿔보세여.. type P_Item = ^T_Item; ...
-
- 최영국
- 2000.05.17 02:53
- 0 COMMENTS
- /
- 0 LIKES
-
- 김문기
- •
- 2000.05.17 01:57
- 2 COMMENTS
- /
- 0 LIKES
-
구창민•2000.05.17 02:06김문기 wrote: > 델파이3.0을 사용하는 초보자 입니다. > > 프로그램에서 다른 프로그램을 실행하여야 ...
-
김문기•2000.05.17 02:58구창민 wrote: > 김문기 wrote: > > 델파이3.0을 사용하는 초보자 입니다. > > > > 프로그램에서 다른...
-
- 울랄라
- 2000.05.17 01:56
- 0 COMMENTS
- /
- 0 LIKES
-
- 잔상
- 2000.05.17 01:53
- 0 COMMENTS
- /
- 0 LIKES
-
- 답좀 줘요
- 2000.05.17 01:38
- 0 COMMENTS
- /
- 0 LIKES
-
- 준희
- •
- 2000.05.17 01:29
- 2 COMMENTS
- /
- 0 LIKES
-
구창민•2000.05.17 01:50준희 wrote: > 안녕하세요. 델초보입니다. > > 즐거운 하루를 맞이하셨는지요... 다름이 아니라... > ...
-
준희•2000.05.17 02:02안녕하세요.. 어떠한 범위를 정하는 것이 아니라 범위도 정할 수 있고 또한 한칸 건너뛰어서 선택할 수 ...
좀 이상한 질문이네요. 배열을 넘겨주어 값을 구한다고 했는데 코딩은 배열의 한
값을 넘겨주네요.
아뭏든 아래와 같이 하시면 되겠네요.
type
TEArray = array[0..9, 0..9, 0..9] of Real;
// 동적으로 배열을 선언할 때, 아래와 같이 사용하실려면 먼저 배열의 크기를
// 할당 받아야 합니다.
// TEArray = array of array of array of Integer;
function PERM(E: TEArray; X, Y, Z: Integer): Real;
begin
Result := 1/(-82.4626 * Sqr(E[X,Y,Z] - 1.3858) + 135.9433);
end;
QK[I,J,K]:=PERM(E2, I, J, K);
^^ 항상 즐코하세요.
novice wrote:
> 삼차원 array값을 function에 넘겨주어 값을 구해 오는 방법좀 가르쳐주세요..
>
> 잘안되네요.. 예를 들면요.. E2의 값을 function으로 주고 function에서
>
> PERM값을 구해서 QK에 줄려구요.. I,J,K는 반복문으로 돌아가구요..
>
>
> QK[I,J,K]:=PERM(E2[I,J,K]);
>
> function PERM(E: array of real):real;
> begin
>
> PERM:= 1/(-82.4626*(sqr(E[X,Y,Z]-1.3858))+ 135.9433);
>
> end;
>
> 어떻게 해야하는지 답좀해주세요..
>
> 그럼 수고하세요...