Найдите ошибку в программе:

program ;
var a,b,c,d,f,p:integer;
begin
writeln\('Введите 5 численных значений:'\);
readln\(a,b,c,d,f \);
p:=a+b+c+d+f;
writeln\('p=',p\);
readln
end.

• отсутствует имя программы
• имя программы написано не правильно
• отсутствует раздел переменных