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

01.program  number11; 02.uses  crt; 03.var  a, b, c: real; 04.begin 05.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.readln 17.end.