Тема: программирование. Найти сумму двух чисел х+у ?
Uses crt; var z,x,y:real; begin write('Введите x и y'); readln(x,y); z:=x+y; writeln('Ответ: ',z); end.