ПОМОГИТЕ ПОЖАЛУЙСТА!!!! Составить программу на TURBO PASCAL для вычисления суммы, разности, произведения частного двух действительных чисел x, y!

Program Zadacha;
var
    x, y: real;
Begin
    Write(Enter x, y );
    ReadLn(x, y);
    
    WriteLn(x, + , y, = , x+y);
    WriteLn(x, - , y, = , x-y);
    WriteLn(x, * , y, = , x*y);
    WriteLn(x, / , y, = , x/y);
            
    ReadLn;
End.