Разработать алгоритм для ввода четырёх целых чисел и вычисление их среднего арифметического. Протестировать алгоритм на исходных данных: -5,8,-1,9. Линейный алгоритм

program znanija.com;var a,b,c,d: integer;sr: real;beginread(a,b,c,d);sr = (a+b+c+d)/4;write(sr:5:2)end.