С клавиатуры вводится строка, содержащая пример на суммирование 2=х чисел.

Подсчитать сумму и вывести пример полностью.

Например, 5+9=14.

Var s, s1:string; a, b, c, p:integer;

begin

writeln ('Введите пример:') ;

readln (s) ;

p:=pos ('+', s) ;

val (copy (s, 1, p-1), a, c) ;

val (copy (s, p+1, length (s) - p), b, c) ;

writeln (s,' = ', a+b) ;

end.

Пример:

Введите пример:

25+194

25+194 = 219