помогите с программированием

k-коэффициент с клавиатуры либо 9*e9-это значение?

Program fiz;
var f,q1,q2,k,e,r:real;
begin
k:=9000000000; 
writeln('Введите q1');
 readln(q1); 
writeln('Введите  q2'); 
readln(q2); 
writeln('Введите  e'); 
readln(e); 
writeln('Введите  r'); 
readln(r);
 f:=(k*абс(q1)*абс(q2))/(e*r*r);
 writeln('F=',f,'(H)')
end.