Составить программу на языке Pascal, печатающую значение TRUE, если указанное высказывание является истинным и False в противном случае. 
1) среди чисел a,b,c есть хотя бы 1 пара взаимно противоположных чисел



Есть ответ
18.12.2022
415

Ответ


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.

 


Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
18.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.