• Даны вещественные ненулевые числа x, y. Если они имеют разные знаки, то отрицательное заменить его абсолютным значением. В противном случае оба числа заменить на число 100.

Ответы 1

  • на паскале решить?

     

    var x,y:real;beginWriteln('Input x: ');Readln(x);Writeln('Input y: ');Readln(y);if ((x>0) and (y>0))or((x<0) and (y<0)) thenbeginx:=100;y:=100;end;if ((x<0) and (y>0)) thenx:=Abs(x);if ((x>0) and (y<0)) theny:=Abs(y);Writeln('Result: ');Writeln('x=',x:5:2);Writeln('y=',y:5:2);readln;end.

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

Еще вопросы

Войти через Google

или

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

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

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