창조유저그룹-커즈닷컴
Window close
ID :
PASS :
처음으로
창조
창조 소개
창조 다운로드
CUGz.com 소개
온라인 도움말
커뮤니티
가입인사
자유게시판
Q/A게시판
TIP/TECH
열린강좌
자주하는질문
아이디어게시판
자료실
소스자료실
프로그램자료실
기타자료실
명예의 전당
이미지 자료실
지원/기타
표준용어재정
구글 웹서치
관리자 전용
목록에서 글자 제한 23이였음 ?>
질문게시판
- 반드시 검색을 하신 후 원하는 답변을 찾을 수 없을 때, 질문을 올려주세요.
LIST ALL
Posted by
김대명
2011-05-26 17:11:53, Hit :
4103
원주율(파이) 구하기
Post URL :
http://cugz.sjworks.net/bbs/zboard.php?id=qna&no=2465
창조로 원주율을 구하려는데 대충 이렇게 소스를 짜봤습니다.
실수:수,수2,수3,값,연산자;
연산자:=0;
수2:=1;
반복
{
수2:=수2+2;
만일(수=0)
{
수3:=(1/1);
}
아니면 만일(연산자=0)
{
수3:=수3-(1/수2);
연산자:=1;
}
아니면 만일(연산자=1)
{
수3:=수3+(1/수2);
연산자:=0;
}
수:=수+1;
}
까지(수=500);
값:=4*수3;
문자창보여(수를문(값));
그런데 값이 3.1415926535.......... 이렇게 나와야 하는데
3.5로 시작하는 이유는 어디에서 문제일까요???
성인e
2011-05-27 AM 1:09:59
이 식은 매우 느리게 수렴합니다.
본 식 : pi/4 = 1-1/5+1/7-1/9+...
옳은 식 : pi/4 = 1-1/3+1/5-1/7+...
간단한 코드 :
실수:n,pii;
되풀이
{
pii:=pii+제곱(-1,n)/(2*n+1);
n:=n+1;
}
출력해(4*pii);
테스트는 안해봤지만 아마 동작할겁니다.
성인e
2011-05-27 AM 1:28:21
10000번 연산 했더니 3.14149265359026 로 나오네요.
소수점 세자리 까지밖에 맞지 않습니다.
김대명
2011-05-27 PM 5:33:17
감사합니다.
고훈
2011-06-03 PM 7:24:54
'Public Overloads Function PI() As Single
' Dim newaa As Double
' Dim newbb As Double
' Dim aa As Double
' Dim bb As Double
' Dim Sum As Double
' Dim i As Short
' newaa = (Math.Sqrt(2) + 1) / 2 / System.Math.Sqrt(2)
' newbb = System.Math.Sqrt(1 / System.Math.Sqrt(2))
' Sum = 3 / 2 - System.Math.Sqrt(2)
' For i = 2 To 3
' aa = (newaa + newbb) / 2
' bb = System.Math.Sqrt(newaa * newbb)
' Sum = Sum + 2 ^ (i + 1) * (aa * aa - bb * bb)
' newaa = aa
' newbb = bb
' Next i
' PI = CSng(4 * aa * bb / (1 - Sum))
'End Function
제가 사용하는 비주얼베이직용 파이 계산 프로그램입니다.
굉장히 빠릅니다. 자리수가 더 필요하면 loop룰 더 돌려보세요..
LIST ALL
GO TO THE TOP
N
Category
Subject
Posted by
Date
H
133
창조
리스트박스 내 모든 줄내용 덧셈 질문입니다.
[4]
김희준
2010/12/30
3809
132
창조
에디트박스 에서 특정키보드를 눌러야만 명...
[15]
김희준
2010/12/31
3698
131
창조
저 원격도움좀 주실분 ㅠㅠㅠ
[3]
김희준
2011/01/02
4220
130
창조
현재시간을 저장해두고 저장해둔시간에서 종...
[6]
김희준
2011/01/04
4396
129
창조
DSLR 유저입니다. 컷수 확인하는...
[4]
신용주
2011/01/05
4948
128
창조
시계관련 문의
[1]
하얀구름
2011/01/14
4727
127
창조
웹브라우저 복사
유형종
2011/01/18
4417
126
창조
오랫만에 와서 질문부터 하네요.;;
[1]
바람
2011/02/01
4280
125
기타
익스플로러에서 접속 불가한 부분
[5]
신용주
2011/02/05
3880
124
창조
윈도우 종료시... 또는 시작시...
[3]
신용주
2011/02/06
4356
123
창조
문법검사 합격인데 왜 컴파일이 안되나요?
[3]
김대명
2011/02/24
3774
122
창조
filetr32.dll 포트수정
[1]
유형종
2011/02/28
6178
121
창조
파일찾아 의 한계..
[2]
박재성
2011/03/25
4725
120
창조
SQL 연결시 비번을 물어보는데..
[1]
권선중
2011/03/31
4878
119
창조
도움말파일이 윈7에서 열리지 않습니다.
[2]
이희창
2011/04/10
3722
118
창조
백신프로그램이 바이러스르 오진하는데 해결...
[4]
이희창
2011/04/28
3071
117
기타
도와주세요..
이민수
2011/05/13
3621
116
창조
도저히 안되서 여기에 질문합니다.
김대명
2011/05/20
3545
115
창조
[re] 도저히 안되서 여기에 질문합니다.
[3]
성인e
2011/05/20
3615
114
창조
다른프로그램입력내용받기
만물
2011/05/24
3585
창조
원주율(파이) 구하기
[4]
김대명
2011/05/26
4103
112
창조
...
..
2011/06/12
4352
111
창조
[re] 그림판 깜빡임 문제 질문드립니다
[3]
지상현
2011/06/13
5089
110
창조
비주얼 베이직 6에서 창조용 DLL 만들기
[2]
김대명
2011/06/21
6252
109
창조
양력을 음력으로 변환하는 방법은 없나요?
[3]
김대명
2011/07/12
3314
LIST ALL
Prev
[1]
..
[81]
82
[83]
[84]
[85]
[86]
[87]
Next
Copyright 1999-2024
Zeroboard
/ skin by
reedyfox
in
miniwini
style
지우개 Expert 3.0
제작자 : 천호성 님 [
LINK
]
대박로또2005
제작자 : 최재일 님 [
LINK
]
1
박종훈
님
15292 점
2
지상현
님
8809 점
3
손상진
님
7388 점
4
권선중
님
6060 점
5
이진백
님
5174 점
가입일
닉네임
05/31
김동률
03/31
홍형기
09/01
o00pp99oo
12/27
이재민
11/20
이희철
.
.
.