Из функции y=x1x2+x1x3+x2x3 написать программу. Срочно Помогите пожалуйста!!!!!

Question

Из функции y=x1x2+x1x3+x2x3 написать программу. Срочно Помогите пожалуйста!!!!!

Answer 1

Program one;
var  x, y: real;
begin  write('Введите число x: ');  read(x);  y := x * 1 * x * 2 + x * 1 * x * 3 + x * 2 * x * 3;  write('Ответ: ', y);end.

Comments

program one;

var
x, y: real;

begin
write('Введите число x: ');
read(x);
y := x * 1 * x * 2 + x * 1 * x * 3 + x * 2 * x * 3;
write('Ответ: ', y);
end.