программка не запускается на паскале помогите пожалуйста поправить программу program v;var

Program p;
var
a,s,v: real;
begin
a:=20.0;
s:=75.0;
v:=sqrt(2*a*s);
writeln ('v=',v);
readln;
end.

1. Имя программки v совпадает с именем объявленной в var переменной v, что неприемлимо. Переименуем программу, например, в w.
2. В списке writeln элементы обязаны перечисляться через запятую, а перед v указана точка с запятой
3. Программка должна завершаться end с следующей точкой, а указана точка с запятой.

program w;
var
a,s,v: real;
begin
a:=20.0;
s:=75.0;
v:=sqrt(2*a*s);
writeln ('v=',v);
readln;
end.