Question

Даны действительные числа x, y. Не пользуясь никакими другими арифметическими операциями, кроме умножения, сложения и вычитания, вычислить:
$3 x^{2} y^{2} -2x y^{2} -7 x^{2} y- 4y^{2} +15xy+ 2x^{2} -3x+10y+6$

Answer 1

Var x,y,res : real;
begin
    {Задаем значения х и у}
    write('Введите x и y через пробел: ');
    readln(x,y);
    {Вычисляем значение выражения и присваиваем результат переменной res}
    res := 3*x*x*y*y - 2*x*y*y - 7*x*x*y - 4*y*y + 15*x*y + 2*x*x - 3*x + 10*y + 6;
    {Выводим результат на экран}
    writeln('Ответ: ',res:6:4);
    readln;
end.