Помогите написать программу для нахождения среднего арифметического пять...

Question

Помогите написать программу для нахождения среднего арифметического пять чисел:a,b,c,d,f.результат:Р. плиииз помогите,оценка между тройкой и пятеркой!!!

Answer 1

Т.е. "4" выходит?) Вот решение, но можно было короче, а можно было .NET подключить ещё... Но это вот классика)
var
  a, b, c, d, f, P: real;
begin
  readln(a, b, c, d, f);
  P := (a + b + c + d + f) / 5;
  writeln(P);
end.