Составить програму в pascal которая вычисляет суму,где x-любое вещественное число,а n-любое натуральное число

Program summa;
var a,b,s:double;
begin
write('Введи первое число: ');
readln(a);
write('Введи второе число: ');
readln(b);
s:=a+b;
writeln(round(s));
end.