/************************/
/*  単振り子の長さ計算  */
/************************/
#include <stdio.h>
#include <string.h>
#include <stdlib.h>

void  main( )
{
   double l,T;    // 振り子長さ,周期
   double PI=3.14159265;
   double g=9.80665;
   char c[128];

    printf("\n************************");
    printf("\n*　単振り子の長さ計算　*");
    printf("\n*  文字 E 入力で終了   *");
    printf("\n************************\n");

    while( 1 )
      {
        printf("\n振り子の周期（秒）：");
        fflush(stdout);
        gets(c);                                        // 文字列入力
        if ( strcmp(c,"E")==0 ) break;

        T=atof(c);                                      // 文字列を数値に変換

        l=g*T*T/(4.0*PI*PI);                            // 長さ計算

        printf("\n糸の長さ(メートル)：%lf\n\n",l);      // 結果表示
      }
}