Составить программу , где нужно ввести две цифры и вывести полусумму
Var a,b:real; begin; readln(a,b); writeln((a=b)/2); end.