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

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.