function Im (z: Complex): Real;
Im extracts the imaginary part of the complex number z. The result is a real value.
Im is an ISO 10206 Extended Pascal extension.
program ImDemo; var z: Complex; begin z := Cmplx (1, 2); { 1 + i * 2 } WriteLn (Im (z) : 0 : 5) { 2.00000 } end.