Viết chương trình tính trung bình cộng của hai số a và b, với a và b là hai số bất kì được nhập từ bàn phím (cần trong 15p nx)

uses crt;
var a,b:longint;
begin
clrscr;
   write(‘a,b=’);readln(a,b);
   writeln(‘Trung binh cong cua 2 so ‘,a,’ va ‘,b,’: ‘,(a+b)/2:0:5);
readln
end.