• Помогите, срочно Паскаль

    Составить программу для вычисления функций

    Q=2,8sin x+│y│

    При  любых значениях X  и  Y 

    и еще фото во вложениях.

               

    question img

Ответы 2

  • Program Pr2;uses crt;var z,x,y:real;Beginclrscr;readln(x,y);z:=(x+((2+y)/sqr(x)))/(y+(1/sqrt(sqr(x)+10)));writeln(z);end.

  • Var q,x,y:real;BEGIN

    read(x);

    read(y);

    q:= 2,8 * sin(x) + abs(y);write(q);

    END. Для вложения:Var x,y:integer;  

              z:real;BEGIN

    read(x);

    read(y);

    z:=(x + (2 + y)/x) / (y + 1/(sqrt( sqr(x) + 10 ));

    write(z);

    END.

    • Автор:

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

Еще вопросы

Войти через Google

или

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

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

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