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

Program numbers;var a,b,sum,raz,proz,chast:real;beginwriteln('Введите числа');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.