Вводится 3 числа вычислить среднее апифметическое этих чисел составить формализацию, алгоритм программы и программу

Program srednee;
Var a,b,c:Integer;
Begin 
  Write(Введите 3 числа);
  read(a,b,c);
  WriteLn(Их среднее арифметическое  ,a, ,b, ,c, = ,a+b+c/3:2:2);
  ReadLn;
End.

Алгоритм:
1. Ввести 3 числа
2. Найти сумму 3 чисел
3. Поделить/Разделить на количество чисел т.е. на 3
4. Результат

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.