[자료구조] 마방진과 큐스택 계산기

등록일 2001.11.10 한글 (hwp) | 14페이지 | 가격 1,000원

소개글

많은 도움이 됐으면 합니다.

목차

1. 마방진
1. 1. 알고리즘
1. 2. 마방진 프로그램 폼
1. 3. 마방진 Source
2. 큐, 스택을 이용한 계산기
2. 1. 알고리즘
2. 2. 계산기 프로그램 폼
2. 3. 계산기 Source

본문내용

이 프로그래밍은 마방진과 큐, 스택을 이용한 계산기를 합쳐놓은 프로그램입니다.
이 곳에서 마방진 버튼을 클릭하면 마방진 프로그램이 실행되고, 계산기 프로그램을 클릭하면 큐,스택을 이용한 계산기 프로그램이 실행됩니다.
1. 마방진

1. 1. 알고리즘

(1) 1행의 중간열을 1로 채운다.

(2) ■방향으로 다음 위치로 이동하되 위에 행이 없으면 제일 아래로 이동한 후 ■방향으로 빈칸에 2, 3, ■을 채운다.

(3) 왼쪽에 열이 없으면 제일 오른쪽으로 이동한 후 ■방향으로 4, 5, ■를 채운다.

(4) 이동 중 숫자가 채워진 칸을 만나면 하나 ■위치로 가서 ■방향으로 빈칸에 6, 7, 8, ■을 채운다.
1. 3. 마방진 Source

Private Sub Command1_Click()
form_1.Hide
End Sub

Private Sub Form_Load()

Dim i

For i = 3 To i = 17 Step 2
nLst.AddItem i
Next i

End Sub

Private Sub nLst_DblClick()

Dim n, i
Dim a(100, 100)

n = Val(nLst.Text)

Badukpan n

Mabang a, n

nLst.SetFocus

End Sub

Sub Badukpan(n)

Dim hng, yul
Dim pok, npi
Dim sijakX
Dim idx, i
Dim fsize(17)

mbjPicjeger

fsize(3) = 80: fsize(5) = 50
fsize(7) = 35:
      최근 구매한 회원 학교정보 보기
      1. 최근 2주간 다운받은 회원수와 학교정보이며
         구매한 본인의 구매정보도 함께 표시됩니다.
      2. 매시 정각마다 업데이트 됩니다. (02:00 ~ 21:00)
      3. 구매자의 학교정보가 없는 경우 기타로 표시됩니다.
      최근 본 자료더보기
      추천도서