/*= Ex02 実数(real number)の四則演算 =*/ #include "pseudo.h" /*====================================*/ FUNCTION Main() VARIABLE REAL a, b, wa, sa, seki, sho; BEGIN WriteS("2個の実数? "); ReadReal( a); ScanReal( b); wa= a+b; sa= a-b; seki= a*b; sho= a/b; WriteS("wa= "); WriteR(wa); WriteLn; DebugR(sa); DebugR(seki); DebugR(sho); END /*===================================*/