Ввести два числа и вывести их сумму на экран
Var a,b,x:real; begin writeln('Введите зачения чисел a и b'); read(a,b); x:=a+b; writeln('Сумма чисел a+b=',x); end.