помогите, не могу понять что неправильно
Program fm2;
var a,b,c:real;
P,S:real;
begin
writeln (a,b,c);
readln(a,b,c);
P:=(a+b+c)/2;
writeln(P,S);
S:= (p*(p-a)*(p-b)*(p-c));
writeln(S,P);
readln;
end.
Program2.pas(6) : Ошибка времени выполнения: Входная строка имела неверный формат.