Написать на языке паскаль программу ввода четырех целых чисел и вычисления их среднего арифметического . протестировать программу на различных исходных данных (включая вещественные числа) и доказать правильность работы
Вот решение вашей задачки)
Program zadaha; var a,b,c,d,sr:integer; begin Writeln('Введите 4 целых числа'); readln(a,b,c,d); sr:=(a+b+c+d)/4; readln(sr); Writeln('sr=',sr); end.
вроде так