найти среднее арифметическое трех целых случайных чисел, принадлежащих промежутку {0;10)

var a,b,c:integer;begina:=random(10);writeln('a = ',a);b:=random(10);writeln('b = ',b);c:=random(10);writeln('c = ',c);writeln('Среднее арифметическое =  ',(a+b+c)/3);end.Пример:a = 4b = 2c = 9Среднее арифметическое =  5