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

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

    question img

Ответы 1

  • 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.

     

  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years