Написать программу, которая запрашивает ввод двух вещественных чисел и проделывает над ними операции сложения, вычитания(Паскаль)

01.program number11;02.uses crt;03.var a, b, c:real;04.begin05.clrscr;06.a:=17.3;07.b:=3.4;08.c:=a*b;09.writeln('a*b=',c:4:1);10.c:=a/b;11.writeln('a/b=',c:4:1);12.c:=a+b;13.writeln('a+b=',c:4:1);14.c:=a-b;15.writeln('a-b=',c:4:1);16.readln17.end.