• Ввести с клавиатуры два числа X и Y .Присвоить Z значение большего из них,если Х<0 и меньшего если Х>0.

Ответы 1

  • uses crt;

    begin

    x,y,z:integer;

    readln(x,y);

    if (x<0) then begin

    if (x>y) then z:=x;

    if (y>x) then z:=y;

    end else begin

    if (x>0) then begin

    if (x>y) z:=y;

    if (y>x) z:=x;

    end;

    write(z);

    end.

    • Автор:

      isabell
    • 6 лет назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

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

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

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