По паскалю записать условие, которое является истинным, когда а) каждое из чисел а и в больше 100; б) только одно из чисел а и в четное; в) хотя бы одно из чисел а и в положительно; г) каждое из чисел а, в, с кратно трем; д) только одно из чисел а, в и с меньше 50; е) хотя бы одно из чисел а, в, с отрицательно. решить .
а) if (a>100) and (b>100) then
write('ISTENO');
б) if (a mod 2 = 0) or (b mod 2 =0) then
write('ISTENO');
в) if (a > 0) or (b>0) then
write('ISTENO');
г) if (a mod 3 = 0) and (b mod 3 = 0) and (c mod 3 = 0) then
write('ISTENO');
д) if ((a<50) and (b>50) and (c>50)) or ((a>50) and (b<50) and (c>50)) or ((a>50) and (b>50) and (c<50)) then
write('ISTENO');
е) if (a<0) or (b<0) or (c<0) then
write('ISTENO');