Напишите программу, которая вычисляет сумму трёх чисел,введённую в форме символьной строки.все целые числа равны. пример: введите выражение: 12+3+45 ответ: 60

Так?
Program A1;
var
a,b,c:real;
begin
readln(a);
readln(b);
readln(c);
writeln(a+b+c);
end.