Дан текст, в котором имеются цифры. найти их сумму. найти максимальную цифру на языке програмирования! паскаль , нужно

Program sum;
var a,b,c:real;
a:=пишешь число;
b:=пишешь второе число;
c:=a+b:
writeln ('сумма равна ' ,c:10:2);
readln;
end.