Вопрос Помогите составить 2 программы в Pasca

[kirillkot1]

Составить программы вычисления логического выражения, заданного значениями переменных: 1) для a, b, c хотя бы две переменные не равны между собой ; 2) f определено на всей числовой оси, кроме нуля и отрезка [-5; -2] . Под номером 7 .

 

[кирилл1234]

я не знаю как это делать

 

[ganster]

1) var a,b,c:real; begin readln(a,b,c); writeln((a<>b) or (a<>c) or (b<>c)) end.