複素数の計算 (a+jb+c+jd; a,b,c,d:real) の出力型式の設定方法
複素数`z`の実数部のみを得る