Написать программу: вводят трех целых чисел, вычислить и вывести их среднее арифметическое значение. (pascal)

Предыдущий
вопрос Следующий
вопрос

program AverageValue;

var
num1, num2, num3: Integer;
average: Real;

begin
writeln('Enter three integers:');
readln(num1);
readln(num2);
readln(num3);

average := (num1 + num2 + num3) / 3;

writeln('The average value is: ', average:0:2);

end.