Задать вопрос Регистрация
Помочь другим

  • Даны целые числа x, y,z.Найти максимальное из (x-y, x/y, z*x). x=2, 

    y=0.3, z=0.5. (Паскаль)

    Буду признательна за ответ. 

Ответы 2

  • решение  для данных чисел.

    var x,y,z,a,b,c: real;

    begin

    x:=2;

    y:=0.3;

    z:=0.5;

    a:=x-y;

    b:=x/y;

    c:=z*x;

    write('naibolshee x/y = ',b:2:1);

    readln;

    end.

    • Автор:

      ericlong
    • 6 лет назад
    • 0

  • program z1; var x,y,z,a,b,c:real; begin x:=2; y:=0.3; z:=0.5; a:=x-y; b:=x/y; c:=z*x; if a > b then begin if a < c then write ('Наибольшее', c) else write ('Наибольшее', a) end; else write ('Наибольшее', b); end.

    • Автор:

      oto50k4
    • 6 лет назад
    • 0

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

Еще вопросы

Топ пользователей

Войти через Google

 или

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

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

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