Даны два числа A и B. Вам нужно вычислить их сумму A B. В этой задаче вам нужно читать из стандартного воода и выводить ответ в стандартный вывод
Var a,b,s:real; begin Write('A='); read(a); Write('B='); read(b); s:=a+b; Writeln('Сумма данных чисел равна ',s); end.