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

Var
  a,b:real;
begin
  Write('Введите два числа через пробел: '); Read(a,b);
  Writeln('Сумма равна ',a+b)
end.