Предмет: Информатика, автор: Rozdestvo

Составить программу на языке Pascal, печатающую значение TRUE, если указанное высказывание является истинным и False в противном случае. 

1) среди чисел a,b,c есть хотя бы 1 пара взаимно противоположных чисел

Приложения:

Ответы

Автор ответа: sansanic
0

var a, b, c: integer;

begin

  readln(a, b, c);

  if (a=-b)or(a=-c)or(b=-a)or(b=-c)or(c=-a)or(c=-b) then writeln('TRUE') else writeln('FALSE');

end.

 

Похожие вопросы