Напишите программу определяющую среднее арфиметическое двух чисел,

var a,b:integer; begin write('Введите значение A=');read(a); write('Введите значение B=');read(b); write('Среднее арифметическое чисел=',(a+b)/2); end.