£Ã£è£á£ð£ô£å£ò.£¶£² [ ¥é¥¸¥¢¥ó¤È³ÑÅÙ ]
¢£³ÑÅÙ¤ò°·¤¦
¥²¡¼¥à¤Î¥×¥í¥°¥é¥ß¥ó¥°¤Ç¤Ï³ÑÅÙ·×»»¤ò¹Ô¤¦¤³¤È¤¬ÉÑÈˤˤ¢¤ê¤Þ¤¹¡£
¥·¥å¡¼¥Æ¥£¥ó¥°¥²¡¼¥à¤Ç¤ÎÃÆÆ»·×»»¡£¥Ö¥í¥Ã¥¯Êø¤·¤Ê¤É¤Ç¤Î¥Ü¡¼¥ë¤Î³ÑÅÙ·×»»¡£¥¢¥¯¥·¥ç¥ó¥²¡¼¥à¤Ç¤Î¥¥ã¥é¥¯¥¿¡¼¤Î°Üư¤¹¤ëµ°Æ»·×»»¡Ä¡Ä¤Ê¤É¤Ê¤É¡£
¥×¥í¥°¥é¥à¤ÎÃæ¤Ç¤Ï¡¢Ê¬ÅÙ´ï¤ò»È¤Ã¤Æ³ÑÅÙ¤ò¬¤ë¤ï¤±¤Ë¤Ï¤¤¤¤Þ¤»¤ó¡£º£²ó¤Ï¡Ø³ÑÅÙ·×»»¡Ù¤Ë¤Ä¤¤¤Æ¹Í¤¨¤Æ¤ß¤Þ¤·¤ç¤¦¡£
¢£ÅÙ¿ôË¡¤È¸ÌÅÙË¡
³§¤µ¤ó¤Ï¡¢±ß¤¬£±¼þ¤Ç²¿Å٤Ǥ¹¤«¡¢¤Èʹ¤«¤ì¤¿¤é¤Ê¤ó¤ÈÅú¤¨¤Þ¤¹¤«¡©¡¡ÉáÄ̤ϡØ360Å١٤ÈÅú¤¨¤ë¤Ï¤º¤Ç¤¹¡£±ß¤¬£±¼þ¤Ç360Å٤Ȥ¤¤¦¤Î¤Ï¾®³ØÀ¸¤Ç¤â¤ï¤«¤ë¤³¤È¤Ç¤·¤ç¤¦¡£
¼Â¤Ï¡¢¤³¤Î¤è¤¦¤Ê³ÑÅ٤ιͤ¨Êý¤òÅÙ¿ôË¡¤È¸Æ¤Ó¤Þ¤¹¡£»»¿ô¤ä¿ô³Ø¤ÇÉÑÈˤËÅо줹¤ë¤³¤ÎÅÙ¿ôË¡¡£³§¤µ¤ó¤â»¶¡¹´·¤ì¤·¤¿¤·¤ó¤Ç¤¤¿¤³¤È¤Ç¤·¤ç¤¦¡£
ÅÙ¿ôË¡¤Ï±ß¤ÎÆâ¦¤ò360¸Ä¤Ëʬ³ä¤·¤Æ¡¢¤½¤ì¤¾¤ì¤ò1Å٤Ȥ¹¤ë¤³¤È¤Ç³ÑÅÙ¤òɽ¤¹Ã±°Ì¤Î¹Í¤¨Êý¤Ç¤¹¡£¤³¤ì¤Ï±½¤Ë¤è¤ë¤È¡¢°ìǯ¤¬365Æü¤Ç¤¢¤ë¤³¤È¤¬Í³Íè¤À¤½¤¦¤Ç¤¹¡£
¤½¤·¤Æ¡¢³ÑÅ٤ιͤ¨Êý¤ÎÊ̤ÎÊýË¡¤È¤·¤Æ¡¢¸ÌÅÙË¡¤È¤¤¤¦¤â¤Î¤¬¤¢¤ê¤Þ¤¹¡£
¤·¤«¤â¡¢¥×¥í¥°¥é¥ß¥ó¥°¤Ç³ÑÅÙ¤ò°·¤¦¾ì¹ç¤Ë¤Ï¡¢ÅÙ¿ôË¡¤Ç¤Ï¤Ê¤¯¤³¤Î¸ÌÅÙË¡¤¬»È¤ï¤ì¤ë¤Î¤¬°ìÈÌŪ¤Ç¤¹¡£¸ÌÅÙË¡¤È¸À¤ï¤ì¤Æ¤â¤Ê¤ó¤Î¤³¤È¤À¤«¥µ¥Ã¥Ñ¥ê¡Ä¡Ä¤È¤¤¤¦Êý¤â¿¤¤¤È»×¤¤¤Þ¤¹¤Î¤Ç¡¢¤³¤ì¤Ï¤Á¤ç¤Ã¤Èº¤¤Ã¤¿ÌäÂê¤Ç¤¹¤Í¡£
¸ÌÅÙË¡¤Ç¤Ï¡¢ÅÙ¿ôË¡¤È¤ÏÁ´¤¯°ã¤¦ÊýË¡¤Ç³ÑÅÙ¤òɽ¤·¤Þ¤¹¡£
ºÙ¤«¤¯ÀâÌÀ¤¹¤ë¤ÈÈó¾ï¤ËŤ¯¤Ê¤Ã¤Æ¤·¤Þ¤¦¤Î¤Ç¡¢¤³¤³¤Ç¸ÌÅÙË¡¤Î¿ô³ØÅª¤Ê¾ÜºÙ¤Þ¤Ç¤Ï²òÀ⤷¤Þ¤»¤ó¤¬¡¢´Êñ¤ËÀâÌÀ¤·¤Þ¤¹¡£
¤Þ¤º¤Ï´Êñ¤Ë¿ô³Ø¤Î¤ª¤µ¤é¤¤¤«¤é¡£
±ß¼þ¤Îµá¤áÊý¤Ï¡Ä¡Ä
¤Ç¤·¤¿¤Í¡£¤È¤¤¤¦¤³¤È¤Ï¡¢È¾±ß¤Î±ß¼þ¤Ï¤³¤ì¤ÎȾʬ¤Ê¤Î¤Ç¡Ä¡Ä
¤Ç¤¹¤Í¡£¤³¤ì¤Ï¤è¤¯¸«¤ë¤È2¤ò¤«¤±¤Æ2¤Ç³ä¤Ã¤Æ¤¤¤Þ¤¹¤«¤é¡¢¼¡¤Î¤è¤¦¤Ë½ñ¤¯¤³¤È¤¬¤Ç¤¤Þ¤¹¤Í¡£
Æâ³Ñ¤¬180ÅÙ¤ÎȾ±ß¤Ç¤Ï¡¢
¤È¤Ê¤ë¤ï¤±¤Ç¤¹¡£¤³¤³¤Þ¤Ç¤Ï¤¤¤¤¤Ç¤¹¤Í¡£
¸ÌÅÙË¡¤Ç¤Ï¡¢¸Ì¤ÎŤµ¤ÈȾ·Â¤òÍѤ¤¤Æ³ÑÅÙ¤òɽ¤·¤Þ¤¹¡£¾å¤Î¼°¤ËÅö¤Æ¤Ï¤á¤ë¤È¡¢È¾·Â¤¬Â礤¯¤Ê¤ë¤Û¤É¡¢¸Ì¤ÎŤµ¤âÂ礤¯¤Ê¤ê¤Þ¤¹¤è¤Í¡£È¾·Â¤¬10¤Ê¤é¡¢¸Ì¤ÎŤµ¤Ï31.4¤Ë¤Ê¤ê¤Þ¤¹¡£È¾·Â¤¬100¤Ê¤é¸Ì¤ÎŤµ¤Ï314¤Ë¤Ê¤ê¤Þ¤¹¡£¤Ç¤âÈæÎ¨¤ÏÊѤï¤Ã¤Æ¤¤¤Þ¤»¤ó¤è¤Í¡©¡¡É¬¤º1ÂÐ3.14¤Ë¤Ê¤Ã¤Æ¤¤¤Þ¤¹¡£
¸ÌÅÙË¡¤È¤Ï¡¢¤³¤ÎÀ¼Á¤òµÕ¤ËÍøÍѤ·¤Æ¡¢¸Ì¤ÎŤµ¤ÈȾ·Â¤ÎÈæÎ¨¤«¤é³ÑÅÙ¤òµá¤á¤Æ¤·¤Þ¤ª¤¦¤È¤¤¤¦¹Í¤¨Êý¤Ê¤Î¤Ç¤¹¡£¤½¤·¤Æ¡¢¤½¤Î¸ø¼°¤Ï¼¡¤Î¤è¤¦¤Ëɽ¤·¤Þ¤¹¡£
¤³¤³¤ÇÅо줷¤¿¡Ø¥é¥¸¥¢¥ó¡Ù¤³¤½¤¬¡¢¸ÌÅÙË¡¤Ç³ÑÅÙ¤òɽ¤¹¤¿¤á¤Îñ°Ì¤Ë¤Ê¤ê¤Þ¤¹¡£¤Á¤ç¤Ã¤È¤ï¤«¤ê¤Ë¤¯¤¤¤«¤â¤·¤ì¤Þ¤»¤ó¤¬¡¢¥é¥¸¥¢¥ó¤ÏÅÙ¿ô¤È¤ÏÁ´¤¯°ã¤¦Ã±°Ì¤Ç¤¹¡£¤³¤¦¤¤¤¦¤â¤Î¤À¤È¤Ê¤ó¤È¤Ê¤¯¥¤¥á¡¼¥¸¤·¤Æ¤ª¤±¤Ð¡¢¤È¤ê¤¢¤¨¤º¤ÏOK¤Ç¤¹¡£
¤½¤·¤Æ¡¢¾å¤Ç¾Ò²ð¤·¤¿¼°¤³¤½¤¬½ÅÍפǤ¹¡£¤³¤Î¼°¤µ¤¨³Ð¤¨¤Æ¤ª¤±¤Ð¡¢¥é¥¸¥¢¥ó¤¬¤è¤¯¤ï¤«¤ó¤Ê¤¯¤Æ¤â²¿¤È¤«¤Ê¤ê¤Þ¤¹¡£ËÜÅö¤Ç¤¹¡£
Ǥ°Õ¤ÎÅÙ¿ôË¡¤Î³ÑÅÙ¤«¤é¡¢¥é¥¸¥¢¥ó¤ËÊÑ´¹¤¹¤ë¤³¤È¤µ¤¨¤Ç¤¤ì¤Ð¡¢¸å¤Ï¤É¤¦¤Ë¤«¤Ê¤ê¤Þ¤¹¡£ÊÑ´¹¸ø¼°¤ò¤è¤¯³Ð¤¨¤Æ¤ª¤¤Þ¤·¤ç¤¦¡£
¢£·×»»¤·¤Æ¤ß¤ë
ÅÙ¿ô¤«¤é¥é¥¸¥¢¥ó¤òµá¤á¤ëÊýË¡¤Ï¤ï¤«¤ê¤Þ¤·¤¿¡£¤Ç¤Ï¤É¤Î¤è¤¦¤Ê¾ìÌ̤ǥ饸¥¢¥ó¤¬É¬Íפˤʤë¤Î¤Ç¤·¤ç¤¦¤«¡£
¼Â¤ÏºÂɸ¤Î·×»»¤Ê¤É¤Ë·ç¤«¤»¤Ê¤¤¡¢¥µ¥¤¥ó(sin)¡¢¥³¥µ¥¤¥ó(cos)¤òµá¤á¤ë¤¿¤á¤Ë¡¢¤³¤Î¥é¥¸¥¢¥ó¤¬É¬Íפˤʤê¤Þ¤¹¡£VBA¤Ë¤Ï¡¢¥µ¥¤¥ó¤òµá¤á¤ë´Ø¿ô¤È¤·¤Æ¡¢
¤³¤ì¤é¤Î¿ô³Ø·Ï´Ø¿ô¤Ç¤Ï¡¢³ÑÅÙ¤ò°·¤¦ºÝ¤Ë¥é¥¸¥¢¥ó¤Ç¤Î³ÑÅÙ¤ò°ú¿ô¤ËɬÍפȤ·¤Þ¤¹¡£
Î㤨¤Ð90Å٤Υµ¥¤¥ó¡¦¥³¥µ¥¤¥ó¤òÆÀ¤¿¤¤¾ì¹ç¤Ë¤Ï¡¢¼¡¤Î¤è¤¦¤Ëµ½Ò¤·¤Þ¤¹¡£
¤³¤Î¥³¡¼¥É¤ò¼Â¹Ô¤¹¤ë¤È¡¢ÅÙ¿ôË¡¤Î90ÅÙ¤ò¤â¤È¤Ë¡¢¥é¥¸¥¢¥ó¤È¥µ¥¤¥ó¤È¥³¥µ¥¤¥ó¤òµá¤á¤¿·ë²Ì¤¬¥á¥Ã¥»¡¼¥¸¤È¤·¤ÆÉ½¼¨¤µ¤ì¤Þ¤¹¡£¤Á¤Ê¤ß¤Ë¡¢¥³¡¼¥É¤ÎÃæ¤Ç½Ð¤Æ¤¤Æ¤¤¤ë¡Ø
ÊÑ¿ô
¤·¤«¤·¡¢¤³¤ì¤¬¥²¡¼¥à¤ÎºîÀ®¤Ë¤É¤¦ÌòΩ¤Ä¤Î¤«¡¢¤½¤ì¤¬¤¤¤Þ¤¤¤Á¤ï¤«¤é¤Ê¤¤¿Í¤â¤¤¤ë¤Ç¤·¤ç¤¦¡£
¼¡²ó¡¢¥é¥¸¥¢¥ó¤¬¤½¤ÎËÜÅö¤Î¼ÂÎϤò¸«¤»¤Æ¤¯¤ì¤Þ¤¹¡£¤È¤ê¤¢¤¨¤ºº£²ó¤Ï¡¢¥é¥¸¥¢¥ó¤òµá¤á¤ë¤¿¤á¤Î¼°¤À¤±¤Ç¤â¡¢Íý²ò¤·¤Æ¤ª¤¤¤Æ¤¯¤À¤µ¤¤¡£±é½Ð¤ä·×»»¤Ëɬ¤ºÌòΩ¤Á¤Þ¤¹¤Î¤Ç¤Í¡£
¢£³Ê¸À
ÅÙ¿ôË¡¤È¸ÌÅÙË¡¤Î°ã¤¤¤òÍý²ò¤¹¤ë
¥é¥¸¥¢¥ó¤Îµá¤áÊý¤òÍý²ò¤¹¤ë
¤É¤Î¤è¤¦¤Ê¥×¥í¥°¥é¥ß¥ó¥°¸À¸ì¤Ç¤â³ÑÅÙ·×»»¤Ë¥é¥¸¥¢¥ó¤Ïɬ¿Ü¤Ç¤¹¡£
¤¬¤ó¤Ð¤Ã¤Æ³Ð¤¨¤Þ¤·¤ç¤¦¡£
¥²¡¼¥à¤Î¥×¥í¥°¥é¥ß¥ó¥°¤Ç¤Ï³ÑÅÙ·×»»¤ò¹Ô¤¦¤³¤È¤¬ÉÑÈˤˤ¢¤ê¤Þ¤¹¡£
¥·¥å¡¼¥Æ¥£¥ó¥°¥²¡¼¥à¤Ç¤ÎÃÆÆ»·×»»¡£¥Ö¥í¥Ã¥¯Êø¤·¤Ê¤É¤Ç¤Î¥Ü¡¼¥ë¤Î³ÑÅÙ·×»»¡£¥¢¥¯¥·¥ç¥ó¥²¡¼¥à¤Ç¤Î¥¥ã¥é¥¯¥¿¡¼¤Î°Üư¤¹¤ëµ°Æ»·×»»¡Ä¡Ä¤Ê¤É¤Ê¤É¡£
¥×¥í¥°¥é¥à¤ÎÃæ¤Ç¤Ï¡¢Ê¬ÅÙ´ï¤ò»È¤Ã¤Æ³ÑÅÙ¤ò¬¤ë¤ï¤±¤Ë¤Ï¤¤¤¤Þ¤»¤ó¡£º£²ó¤Ï¡Ø³ÑÅÙ·×»»¡Ù¤Ë¤Ä¤¤¤Æ¹Í¤¨¤Æ¤ß¤Þ¤·¤ç¤¦¡£
¢£ÅÙ¿ôË¡¤È¸ÌÅÙË¡
³§¤µ¤ó¤Ï¡¢±ß¤¬£±¼þ¤Ç²¿Å٤Ǥ¹¤«¡¢¤Èʹ¤«¤ì¤¿¤é¤Ê¤ó¤ÈÅú¤¨¤Þ¤¹¤«¡©¡¡ÉáÄ̤ϡØ360Å١٤ÈÅú¤¨¤ë¤Ï¤º¤Ç¤¹¡£±ß¤¬£±¼þ¤Ç360Å٤Ȥ¤¤¦¤Î¤Ï¾®³ØÀ¸¤Ç¤â¤ï¤«¤ë¤³¤È¤Ç¤·¤ç¤¦¡£
¼Â¤Ï¡¢¤³¤Î¤è¤¦¤Ê³ÑÅ٤ιͤ¨Êý¤òÅÙ¿ôË¡¤È¸Æ¤Ó¤Þ¤¹¡£»»¿ô¤ä¿ô³Ø¤ÇÉÑÈˤËÅо줹¤ë¤³¤ÎÅÙ¿ôË¡¡£³§¤µ¤ó¤â»¶¡¹´·¤ì¤·¤¿¤·¤ó¤Ç¤¤¿¤³¤È¤Ç¤·¤ç¤¦¡£
ÅÙ¿ôË¡¤Ï±ß¤ÎÆâ¦¤ò360¸Ä¤Ëʬ³ä¤·¤Æ¡¢¤½¤ì¤¾¤ì¤ò1Å٤Ȥ¹¤ë¤³¤È¤Ç³ÑÅÙ¤òɽ¤¹Ã±°Ì¤Î¹Í¤¨Êý¤Ç¤¹¡£¤³¤ì¤Ï±½¤Ë¤è¤ë¤È¡¢°ìǯ¤¬365Æü¤Ç¤¢¤ë¤³¤È¤¬Í³Íè¤À¤½¤¦¤Ç¤¹¡£
¤½¤·¤Æ¡¢³ÑÅ٤ιͤ¨Êý¤ÎÊ̤ÎÊýË¡¤È¤·¤Æ¡¢¸ÌÅÙË¡¤È¤¤¤¦¤â¤Î¤¬¤¢¤ê¤Þ¤¹¡£
¤·¤«¤â¡¢¥×¥í¥°¥é¥ß¥ó¥°¤Ç³ÑÅÙ¤ò°·¤¦¾ì¹ç¤Ë¤Ï¡¢ÅÙ¿ôË¡¤Ç¤Ï¤Ê¤¯¤³¤Î¸ÌÅÙË¡¤¬»È¤ï¤ì¤ë¤Î¤¬°ìÈÌŪ¤Ç¤¹¡£¸ÌÅÙË¡¤È¸À¤ï¤ì¤Æ¤â¤Ê¤ó¤Î¤³¤È¤À¤«¥µ¥Ã¥Ñ¥ê¡Ä¡Ä¤È¤¤¤¦Êý¤â¿¤¤¤È»×¤¤¤Þ¤¹¤Î¤Ç¡¢¤³¤ì¤Ï¤Á¤ç¤Ã¤Èº¤¤Ã¤¿ÌäÂê¤Ç¤¹¤Í¡£
¸ÌÅÙË¡¤Ç¤Ï¡¢ÅÙ¿ôË¡¤È¤ÏÁ´¤¯°ã¤¦ÊýË¡¤Ç³ÑÅÙ¤òɽ¤·¤Þ¤¹¡£
ºÙ¤«¤¯ÀâÌÀ¤¹¤ë¤ÈÈó¾ï¤ËŤ¯¤Ê¤Ã¤Æ¤·¤Þ¤¦¤Î¤Ç¡¢¤³¤³¤Ç¸ÌÅÙË¡¤Î¿ô³ØÅª¤Ê¾ÜºÙ¤Þ¤Ç¤Ï²òÀ⤷¤Þ¤»¤ó¤¬¡¢´Êñ¤ËÀâÌÀ¤·¤Þ¤¹¡£
¤Þ¤º¤Ï´Êñ¤Ë¿ô³Ø¤Î¤ª¤µ¤é¤¤¤«¤é¡£
±ß¼þ¤Îµá¤áÊý¤Ï¡Ä¡Ä
Ⱦ·Â¡ß2(¤Ä¤Þ¤êľ·Â)¡ß3.14¤Ç¤·¤¿¤Í¡£¤È¤¤¤¦¤³¤È¤Ï¡¢È¾±ß¤Î±ß¼þ¤Ï¤³¤ì¤ÎȾʬ¤Ê¤Î¤Ç¡Ä¡Ä
Ⱦ·Â¡ß2¡ß3.14¡à2¤Ç¤¹¤Í¡£¤³¤ì¤Ï¤è¤¯¸«¤ë¤È2¤ò¤«¤±¤Æ2¤Ç³ä¤Ã¤Æ¤¤¤Þ¤¹¤«¤é¡¢¼¡¤Î¤è¤¦¤Ë½ñ¤¯¤³¤È¤¬¤Ç¤¤Þ¤¹¤Í¡£
Ⱦ·Â¡ß3.14Æâ³Ñ¤¬180ÅÙ¤ÎȾ±ß¤Ç¤Ï¡¢
¸Ì¤ÎŤµ = Ⱦ·Â¡ß3.14¤È¤Ê¤ë¤ï¤±¤Ç¤¹¡£¤³¤³¤Þ¤Ç¤Ï¤¤¤¤¤Ç¤¹¤Í¡£
¸ÌÅÙË¡¤Ç¤Ï¡¢¸Ì¤ÎŤµ¤ÈȾ·Â¤òÍѤ¤¤Æ³ÑÅÙ¤òɽ¤·¤Þ¤¹¡£¾å¤Î¼°¤ËÅö¤Æ¤Ï¤á¤ë¤È¡¢È¾·Â¤¬Â礤¯¤Ê¤ë¤Û¤É¡¢¸Ì¤ÎŤµ¤âÂ礤¯¤Ê¤ê¤Þ¤¹¤è¤Í¡£È¾·Â¤¬10¤Ê¤é¡¢¸Ì¤ÎŤµ¤Ï31.4¤Ë¤Ê¤ê¤Þ¤¹¡£È¾·Â¤¬100¤Ê¤é¸Ì¤ÎŤµ¤Ï314¤Ë¤Ê¤ê¤Þ¤¹¡£¤Ç¤âÈæÎ¨¤ÏÊѤï¤Ã¤Æ¤¤¤Þ¤»¤ó¤è¤Í¡©¡¡É¬¤º1ÂÐ3.14¤Ë¤Ê¤Ã¤Æ¤¤¤Þ¤¹¡£
¸ÌÅÙË¡¤È¤Ï¡¢¤³¤ÎÀ¼Á¤òµÕ¤ËÍøÍѤ·¤Æ¡¢¸Ì¤ÎŤµ¤ÈȾ·Â¤ÎÈæÎ¨¤«¤é³ÑÅÙ¤òµá¤á¤Æ¤·¤Þ¤ª¤¦¤È¤¤¤¦¹Í¤¨Êý¤Ê¤Î¤Ç¤¹¡£¤½¤·¤Æ¡¢¤½¤Î¸ø¼°¤Ï¼¡¤Î¤è¤¦¤Ëɽ¤·¤Þ¤¹¡£
¥é¥¸¥¢¥ó = ÅÙ¿ô¡ß3.14¡à180¤³¤³¤ÇÅо줷¤¿¡Ø¥é¥¸¥¢¥ó¡Ù¤³¤½¤¬¡¢¸ÌÅÙË¡¤Ç³ÑÅÙ¤òɽ¤¹¤¿¤á¤Îñ°Ì¤Ë¤Ê¤ê¤Þ¤¹¡£¤Á¤ç¤Ã¤È¤ï¤«¤ê¤Ë¤¯¤¤¤«¤â¤·¤ì¤Þ¤»¤ó¤¬¡¢¥é¥¸¥¢¥ó¤ÏÅÙ¿ô¤È¤ÏÁ´¤¯°ã¤¦Ã±°Ì¤Ç¤¹¡£¤³¤¦¤¤¤¦¤â¤Î¤À¤È¤Ê¤ó¤È¤Ê¤¯¥¤¥á¡¼¥¸¤·¤Æ¤ª¤±¤Ð¡¢¤È¤ê¤¢¤¨¤º¤ÏOK¤Ç¤¹¡£
¤½¤·¤Æ¡¢¾å¤Ç¾Ò²ð¤·¤¿¼°¤³¤½¤¬½ÅÍפǤ¹¡£¤³¤Î¼°¤µ¤¨³Ð¤¨¤Æ¤ª¤±¤Ð¡¢¥é¥¸¥¢¥ó¤¬¤è¤¯¤ï¤«¤ó¤Ê¤¯¤Æ¤â²¿¤È¤«¤Ê¤ê¤Þ¤¹¡£ËÜÅö¤Ç¤¹¡£
Ǥ°Õ¤ÎÅÙ¿ôË¡¤Î³ÑÅÙ¤«¤é¡¢¥é¥¸¥¢¥ó¤ËÊÑ´¹¤¹¤ë¤³¤È¤µ¤¨¤Ç¤¤ì¤Ð¡¢¸å¤Ï¤É¤¦¤Ë¤«¤Ê¤ê¤Þ¤¹¡£ÊÑ´¹¸ø¼°¤ò¤è¤¯³Ð¤¨¤Æ¤ª¤¤Þ¤·¤ç¤¦¡£
ÅÙ¿ô¢Í¥é¥¸¥¢¥ó ¤ÎÊÑ´¹¸ø¼°
rad = ang * 3.14 / 180rad¡Ä¡Ä¥é¥¸¥¢¥óang¡Ä¡ÄÅÙ¿ô¢£·×»»¤·¤Æ¤ß¤ë
ÅÙ¿ô¤«¤é¥é¥¸¥¢¥ó¤òµá¤á¤ëÊýË¡¤Ï¤ï¤«¤ê¤Þ¤·¤¿¡£¤Ç¤Ï¤É¤Î¤è¤¦¤Ê¾ìÌ̤ǥ饸¥¢¥ó¤¬É¬Íפˤʤë¤Î¤Ç¤·¤ç¤¦¤«¡£
¼Â¤ÏºÂɸ¤Î·×»»¤Ê¤É¤Ë·ç¤«¤»¤Ê¤¤¡¢¥µ¥¤¥ó(sin)¡¢¥³¥µ¥¤¥ó(cos)¤òµá¤á¤ë¤¿¤á¤Ë¡¢¤³¤Î¥é¥¸¥¢¥ó¤¬É¬Íפˤʤê¤Þ¤¹¡£VBA¤Ë¤Ï¡¢¥µ¥¤¥ó¤òµá¤á¤ë´Ø¿ô¤È¤·¤Æ¡¢
Sin´Ø¿ô¤¬¡¢¥³¥µ¥¤¥ó¤òµá¤á¤ë´Ø¿ô¤È¤·¤Æ¡¢Cos´Ø¿ô¤¬¤¢¤ê¤Þ¤¹¡£Â¾¤Ë¤â¥¿¥ó¥¸¥§¥ó¥È¤òµá¤á¤ëTan´Ø¿ô¤È¤«¤â¤¢¤ê¤Þ¤¹¡£¤³¤ì¤é¤Î¿ô³Ø·Ï´Ø¿ô¤Ç¤Ï¡¢³ÑÅÙ¤ò°·¤¦ºÝ¤Ë¥é¥¸¥¢¥ó¤Ç¤Î³ÑÅÙ¤ò°ú¿ô¤ËɬÍפȤ·¤Þ¤¹¡£
¡ß¡Ä¡ÄSin(ÅÙ¿ô)
¡û¡Ä¡ÄSin(¥é¥¸¥¢¥ó)
¡û¡Ä¡ÄSin(¥é¥¸¥¢¥ó)
Î㤨¤Ð90Å٤Υµ¥¤¥ó¡¦¥³¥µ¥¤¥ó¤òÆÀ¤¿¤¤¾ì¹ç¤Ë¤Ï¡¢¼¡¤Î¤è¤¦¤Ëµ½Ò¤·¤Þ¤¹¡£
Sub Radian()
Dim rad As Single
Dim ang As Long
Dim pi As Single
pi = 3.14159
ang = 90
rad = ang * pi / 180
MsgBox "ÅÙ¿ô" & ang & "¤Ï¡¢¥é¥¸¥¢¥ó¤Ç¤Ï" & rad & "¤Ç¤¹" & vbCr & _
"Sin = " & Format(Sin(rad), "0.0000000000") & vbCr & _
"Cos = " & Format(Cos(rad), "0.0000000000")
End Sub
Dim rad As Single
'¥é¥¸¥¢¥óDim ang As Long
'ÅÙ¿ôDim pi As Single
'¦Ð ¤Ä¤Þ¤ê±ß¼þΨpi = 3.14159
ang = 90
rad = ang * pi / 180
MsgBox "ÅÙ¿ô" & ang & "¤Ï¡¢¥é¥¸¥¢¥ó¤Ç¤Ï" & rad & "¤Ç¤¹" & vbCr & _
"Sin = " & Format(Sin(rad), "0.0000000000") & vbCr & _
"Cos = " & Format(Cos(rad), "0.0000000000")
End Sub
¤³¤Î¥³¡¼¥É¤ò¼Â¹Ô¤¹¤ë¤È¡¢ÅÙ¿ôË¡¤Î90ÅÙ¤ò¤â¤È¤Ë¡¢¥é¥¸¥¢¥ó¤È¥µ¥¤¥ó¤È¥³¥µ¥¤¥ó¤òµá¤á¤¿·ë²Ì¤¬¥á¥Ã¥»¡¼¥¸¤È¤·¤ÆÉ½¼¨¤µ¤ì¤Þ¤¹¡£¤Á¤Ê¤ß¤Ë¡¢¥³¡¼¥É¤ÎÃæ¤Ç½Ð¤Æ¤¤Æ¤¤¤ë¡Ø
vbCr¡Ù¤È¤¤¤¦¤Î¤Ï²þ¹Ô¤òɽ¤¹Äê¿ô¤Ç¤¹¡£¤³¤ÎÄê¿ô¤òµ½Ò¤·¤¿Éôʬ¤Ç¤Ïʸ»úÎ󤬲þ¹Ô¤µ¤ì¤Þ¤¹¡£ÊÑ¿ô
ang¤ËÂåÆþ¤µ¤ì¤ë¿ôÃͤòÊѹ¹¤¹¤ë¤È¡¢¤½¤ì¤¾¤ì¤Ë±þ¤¸¤¿¥é¥¸¥¢¥ó¤È¥µ¥¤¥ó¡¦¥³¥µ¥¤¥ó¤òɽ¼¨¤¹¤ë¤³¤È¤¬¤Ç¤¤Þ¤¹¤Î¤Ç¡¢¿§¡¹Êѹ¹¤·¤Æ¤ä¤Ã¤Æ¤ß¤ë¤È¤¤¤¤¤Ç¤·¤ç¤¦¡£¤·¤«¤·¡¢¤³¤ì¤¬¥²¡¼¥à¤ÎºîÀ®¤Ë¤É¤¦ÌòΩ¤Ä¤Î¤«¡¢¤½¤ì¤¬¤¤¤Þ¤¤¤Á¤ï¤«¤é¤Ê¤¤¿Í¤â¤¤¤ë¤Ç¤·¤ç¤¦¡£
¼¡²ó¡¢¥é¥¸¥¢¥ó¤¬¤½¤ÎËÜÅö¤Î¼ÂÎϤò¸«¤»¤Æ¤¯¤ì¤Þ¤¹¡£¤È¤ê¤¢¤¨¤ºº£²ó¤Ï¡¢¥é¥¸¥¢¥ó¤òµá¤á¤ë¤¿¤á¤Î¼°¤À¤±¤Ç¤â¡¢Íý²ò¤·¤Æ¤ª¤¤¤Æ¤¯¤À¤µ¤¤¡£±é½Ð¤ä·×»»¤Ëɬ¤ºÌòΩ¤Á¤Þ¤¹¤Î¤Ç¤Í¡£
¢£³Ê¸À
ÅÙ¿ôË¡¤È¸ÌÅÙË¡¤Î°ã¤¤¤òÍý²ò¤¹¤ë
¥é¥¸¥¢¥ó¤Îµá¤áÊý¤òÍý²ò¤¹¤ë
¤É¤Î¤è¤¦¤Ê¥×¥í¥°¥é¥ß¥ó¥°¸À¸ì¤Ç¤â³ÑÅÙ·×»»¤Ë¥é¥¸¥¢¥ó¤Ïɬ¿Ü¤Ç¤¹¡£
¤¬¤ó¤Ð¤Ã¤Æ³Ð¤¨¤Þ¤·¤ç¤¦¡£





