손영민 wrote:
> 중간고사 대신으로 델파이를이용해 1부터 100까지 연산하는 프로그램을
> 짜오라는데 도무지 뭐가뭔지 몰라서여..
> 혹시 아시면 도와주세여 은혜는 잊지 않겠습니다...
> 또 참고할 만한 도서가 있다면 알려주십시요,,,
> 시간이 없으니 빠른 시일 안에 답장 좀 부탁드립니다..
폼위에 버튼을 하나 올려 놓고
procedure TForm1.Button1Click(Sender: TObject);
var
intCnt,intResult : Integer;
begin
// 결과값 변수 CLEAR
intResult := 0;
// 1 부터 100까지 더하기
for intCnt := 1 to 100 do
begin
intResult := intResult + intCnt;
end;
// 결과값 출력
ShowMessage(Format(' 1 부터 100까지의 합은 %d 입니다 !', [intResult]));
end;
위와 같이 코딩하시길 ...
이런 이런걸 갈켜줘도 되나 ...?