1+3+5+7+¡¦+99ÀÇ ÇÕÀ» ±¸ÇϽÿÀ (ÀÚ·á¸í¼¼Ç¥, ¹®Á¦ºÐ¼®, 󸮰úÁ¤, NSÂ÷Æ®, VBA¼Ò½º±îÁö ÀÛ¼ºÇÒ °Í.) |
@ÀÚ·á¸í¼¼Ç¥
ÀÚ·á¸í |
º¯¼ö¸í |
Ư¡ |
»ó¼ö ÃÖ´ë°ª |
MAX |
Çհ踦 ±¸ÇÒ ¹üÀ§ÀÇ ÃÖ´ëÄ¡¸¦ ÁöÁ¤ |
»ó¼ö Áõ°¡°ª |
DELTA |
Çհ踦 ±¸ÇÒ ¼ýÀÚÀÇ Áõ°¡Ä¡¸¦ ÁöÁ¤ |
º¯¼ö ¼ýÀÚ |
number |
Çհ踦 ±¸ÇÒ ¼ýÀÚµé |
º¯¼ö ÇÕ°è |
sum |
ÇÕ°è |
@ ¹®Á¦ºÐ¼® : numberÀÇ Å©±â°¡ MAXº¸´Ù Ä¿Áú ¶§ ±îÁö 2¾¿ Áõ°¡½ÃÅ°¸é¼ ÇÕÀ» ±¸ÇÑ´Ù.
@ 󸮰úÁ¤ :
1. 1ºÎÅÍ MAX±îÁö ¹Ýº¹ÇÑ´Ù.
1.1. Çհ踦 ±¸ÇÑ´Ù.
1.2. ¼ýÀÚ¸¦ 2¾¿ Áõ°¡½ÃŲ´Ù.
2. Ãâ·ÂÇÑ´Ù.
3. STOP
@ NSÂ÷Æ®
START |
MAX = 99, DELTA = 2, number, sum |
sum = 0 |
|
for number = 1 to MAX |
|
sum = sum + number |
|
number = number + DELTA |
msgbox sum |
STOP |
@ VBA ¼Ò½º
Sub ¹®Á¦Ç®ÀÌ()
Const MAX As Integer = 99
Const DELTA As Integer = 2
Dim i As Integer, sum As Integer
sum = 0
For i = 1 To MAX
sum = sum + i
i = i + DELTA
Next i
MsgBox "ÇÕ°è´Â" & sum & "ÀÔ´Ï´Ù"
End Sub
@ ½ÇÇà°á°ú