>KEISAN(rkizami,kuri,anser);
anser = KEISAN(rkizami,kuri,anser);

>float KEISAN(float rv,int kaisu,float ans) /* 計算する関数の定義 */
>{
> int i;
> for(i=kaisu;i>0;--i){ /* 回数が０になるまでループ */
> ans+=rv;
> }
>}
float KEISAN(float rv,int kaisu,float ans) /* 計算する関数の定義 */
{
int i;
for(i=kaisu;i>0;--i){ /* 回数が０になるまでループ */
ans+=rv;
}
return ans;
}