/*= Ex04 数学関数(mathematical function) =*/ #include "pseudo.h" #include /*========================================*/ FUNC Main() VAR REAL xx, yy, zz; BEGIN LOOP WriteS("2個の実数? "); ReadReal( xx); ReadReal( yy); IF (xx EQL 0.0) EXITLOOP; ENDIF WriteS("xのy乗= "); zz= pow( xx, yy); WriteRealF( zz,10,8); WriteLn; DebugR(sin(xx)); DebugR(log(xx)); ENDLOOP END /*========================================*/