составьте программу,которая выводит с клавиатуры два числа и выводит их сумму,разность,произведение и частное

Program numbers;

var a,b,sum,raz,proz,chast:real;begin

writeln('Введите числа');

readln(a,b);

sum:=a+b;

raz:=a-b;

proz:=a*b;

chast:=a/b;

writeln('Сумма = ',sum);

writeln('Разность = ',raz);

writeln('Произведение = ',proz);

writeln('Частное = ',chast);

readln;

end.