A.If Int(A)=AAndSqr(A)>100ThenPrintI"OK"ElsePrint"Error"
B.If Fix(A)=AAndAbs(A)>100ThenPrint"OK"ElsePrint"Error"
C.If int(A)=AAnd(A>=100,A<=100)ThenPrint"OK"ElsePrint"Error"
D.If Fix(A)=AAndA~=100AndA<=100Thenhim"OK"ElsePrint"Error"