testcode16/Simul_2/Test3_Byte2.pas

23   if 0 + 0 = 0 then good else bad end;
24   if 0 + 1  = 0 then bad else good end;
25   if 255 + 0 = 255 then good else bad end;
30   if a + a = 0 then good else bad end;
31   if a + b = 255 then good else bad end;
32   if b + a = 255 then good else bad end;
33   if a + b = b then good else bad end;
37   if a + b = 255 then good else bad end;
41   if a + 0 = 0 then good else bad end;
42   if 0 + a = 0 then good else bad end;
43   if a + 1 = 1 then good else bad end;
44   if 1 + a = 1 then good else bad end;
45   if a + 255 = 255 then good else bad end;
46   if 255 + a = 255 then good else bad end;
49   if a + 0 = 1 then good else bad end;
50   if 0 + a = 1 then good else bad end;
51   if a + 1 = 2 then good else bad end;
52   if 1 + a = 2 then good else bad end;
53   if a + 254 = 255 then good else bad end;
54   if 254 + a = 255 then good else bad end;
58   if a = b+5 then good else bad end;
59   if a + b = 15 then good else bad end;
60   if (a + b) + 1 = 16 then good else bad end;
61   if b + a = 15 then good else bad end;
62   if 15 = b + a then good else bad end;
63   if a + b = a + 5 then good else bad end;
64   if a + (b+a) = a + (a + 5) then good else bad end;
65   if a + (b+ (a+b)) = a + (a + a) then good else bad end;
72   if 0 - 0 = 0 then good else bad end;
73   if 1 - 0  = 0 then bad else good end;
74   if 255 - 0 = 255 then good else bad end;
78   if a - a = 0 then good else bad end;
79   if a - a = b then good else bad end;
80   if b - b = b then good else bad end;
81   if a - b = 255 then good else bad end;
82   if a - b = a then good else bad end;
85   if b - b = 0 then good else bad end;
86   if a - b = 254 then good else bad end;
89   if a - b = 1 then good else bad end;
90   if a - b = a then good else bad end;
93   if a - b = b then good else bad end;
94   if a - b = 5 then good else bad end;
98   if a - 0 = 0 then good else bad end;
99   if 0 - a = 0 then good else bad end;
100   if a - 0 = a then good else bad end;
102   if a - 1 = 0 then good else bad end;
103   if 1 - a = 0 then good else bad end;
104   if 255 - a = 254 then good else bad end;
105   if 10 - a = 9 then good else bad end;
107   if a - 1 = 254 then good else bad end;
108   if 255 - a = 0 then good else bad end;
109   if a - 10 = 245 then good else bad end;
113   if 10 - (b+1) = 4 then good else bad end;  //constante - expresión
114   if a - (b+1) = 4 then good else bad end;   //variable - expresión
115   if (a+1) - 1 = 10 then good else bad end;   //expresión - constante
116   if (a+1) - 0 = 11 then good else bad end;   //expresión - constante
117   if (a+1) - a = 1 then good else bad end;   //expresión - variable
118   if (a+1) - (b+1) = 5 then good else bad end;   //expresión - expresión
119   if a - b = a - b then good else bad end;
120   if a - b - 1 = 4 then good else bad end;
121   if a - b - 1 = b - 1 then good else bad end;
122   if 5 = a - b then good else bad end;
123   if a - 5 = a - b then good else bad end;
124   if b + (a-b) = a  then good else bad end;
125   if a = b + (a-b) then good else bad end;
126   if a + (b+ (a-b)) = a + (a - b + 5) then good else bad end;
132   if 0 * 0 = 0 then good else bad end;
133   if 0 * 1  = 0 then good else bad end;
134   if 255 * 0 = 0 then good else bad end;
135   if 5 * 5 = 25 then good else bad end;
139   if 5 * a = word(0) then good else bad end;
141   if word(0 * a) = word(0) then good else bad end;
142   if 5 * a = word(25) then good else bad end;
145   if 0 * (a+1) = word(0) then good else bad end;
146   if 5 * (a+1) = word(30) then good else bad end;
149   if a * 0 = word(0) then good else bad end;
150   if a * 5 = word(25) then good else bad end;
153   if a * b = word(0) then good else bad end;
155   if a * b = 500 then good else bad end;
158   if a * (b+1) = word(110) then good else bad end;
161   if (a+1) * 5 = word(100) then good else bad end;
164   if (a+1) * b = 2000 then good else bad end;
167   if (a+1) * (b+1) = word(121) then good else bad end;
174   if 0 div 1  = 0 then good else bad end;
175   if 5 div 255 = 0 then good else bad end;
176   if 25 div 5 = 5 then good else bad end;
180   if 0 div a = 0 then good else bad end;
182   if 1 div a = 1 then good else bad end;
184   if 1 div a = 0 then good else bad end;
186   if 100 div a = 2 then good else bad end;
188   if 255 div a = 255 then good else bad end;
192   if 0 div (a+1) = 0 then good else bad end;
193   if 6 div (a+1) = 1 then good else bad end;
196   if a div 5 = 5 then good else bad end;
197   if a div 6 = 4 then good else bad end;
200   if a DIV b = 5 then good else bad end;
202   if a DIV b = 0 then good else bad end;
205   if a div (b+1) = 9 then good else bad end;
208   if (a+1) div 5 = 4 then good else bad end;
211   if (a+1) div b = 4 then good else bad end;
214   if (a+5) div (b+2) = 15 then good else bad end;
221   if 0 mod 1  = 0 then good else bad end;
222   if 5 mod 255 = 5 then good else bad end;
223   if 25 mod 5 = 0 then good else bad end;
224   if 24 mod 5 = 4 then good else bad end;
228   if 0 mod a = 0 then good else bad end;
230   if 1 mod a = 0 then good else bad end;
232   if 1 mod a = 1 then good else bad end;
234   if 100 mod a = 0 then good else bad end;
236   if 255 mod a = 255 then good else bad end;  //Realmente no está definido que se así
240   if 0 mod (a+1) = 0 then good else bad end;
241   if 6 mod (a+1) = 0 then good else bad end;
245   if a mod 5 = 0 then good else bad end;
246   if a mod 6 = 1 then good else bad end;
250   if a mod b = 5 then good else bad end;
252   if a mod b = 99 then good else bad end;
256   if a mod (b+1) = 1 then good else bad end;
260   if (a+1) mod 5 = 0 then good else bad end;
264   if (a+1) mod b = 3 then good else bad end;
268   if (a+4) mod (b+2) = 6 then good else bad end;