代码大全

(singke) #1
IBM OS 360

143 2.4 Sely Basin 1991

5.6.l


A

r<>0


Pr

seertionn: boolean;


100 150 200

200

200

500 500

148 000 143

5.6


PDL

Denominator Pascal
ssert Denominator<>0,'Denominator is unexpected equal to 0.' ;
Denominator 0 Denominato
True False False


Pascal
ocedure Assert
(
A
Message : string
);

Free download pdf