Нужна ! не могу понять где ошибка в третьей строчке. program n_3; begin writeln("введите сумму рублей"); readln(a)

В паскале вместо знака " используется '

program n_3;
var a:real;// не объявлена переменная "a"
begin
writeln('Введите сумму рублей');
readln(a)
end.//нет закрывающего "end."