Program ifelseEx;
Var InputNo:real;
Begin
Writeln('Please input a real number.');
Readln(InputNo);
If(InputNo=0)then
writeln('It is zero')
else writeln('It is not zero.');
end.
UHJvZ3JhbSBpZmVsc2VFeDsKVmFyIElucHV0Tm86cmVhbDsKQmVnaW4KV3JpdGVsbignUGxlYXNlIGlucHV0IGEgcmVhbCBudW1iZXIuJyk7ClJlYWRsbihJbnB1dE5vKTsKSWYoSW5wdXRObz0wKXRoZW4Kd3JpdGVsbignSXQgaXMgemVybycpCmVsc2Ugd3JpdGVsbignSXQgaXMgbm90IHplcm8uJyk7CmVuZC4=