ТутРешу.Ру

По паскалю Записать условие, которое является ИСТИННЫМ…

Задание:

По паскалю Записать условие, которое является ИСТИННЫМ, когда а) каждое из чисел А и В больше 100; б) только одно из чисел А и В четное; в) хотя бы одно из чисел А и В положительно; г) каждое из чисел А, В, С кратно трем; д) только одно из чисел А, В и С меньше 50; е) хотя бы одно из чисел А, В, С отрицательно.

Решение:

А) if (a>100) and (b>100) thenwrite ('ISTENO'); б) if (a mod 2=0) or (b mod 2=0) thenwrite ('ISTENO'); в) if (a > 0) or (b>0) thenwrite ('ISTENO'); г) if (a mod 3=0) and (b mod 3=0) and (c mod 3=0) thenwrite ('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) thenwrite ('ISTENO'); е) if (a<0) or (b<0) or (c<0) thenwrite ('ISTENO');




Знаете другой ответ?

Отправить свой ответ