program AverageCalculator;

var
num1, num2, num3, num4: integer;
average: real;

begin
writeln${}^{\prime }Enterfourintegers{:}^{\prime }$;
readln$num1,num2,num3,num4$;

average := $num1+num2+num3+num4$ / 4;

writeln${}^{\prime }Average{:}^{\prime },average:0:2$;
end.

Пример тестирования программы:
1. Входные данные: 5 10 15 20
Выходные данные: Average: 12.50
2. Входные данные: 6 6 6 6
Выходные данные: Average: 6.00
3. Входные данные: 0 0 0 0
Выходные данные: Average: 0.00
Программа корректно выполняет вычисление среднего арифметического четырех введенных пользователем целых чисел.