За пишите на языке Pascal следующие условия))
(риши те пж. 18 баллов дам).

(a<=5)(x>0) and (y>0)(x>0) and (y<=5)(x>=0) and (x<=4)(x>5) and (x<=5)(x>=0)(x<=0)(x mod 2 =0)(x mod 2 =1)(x mod 3=0)(x mod 3=0) and (x mod 2 =0)(x mod 5 <>0)