Question

Помогите, пожалуйста.
Пишу программу в Pascal abc. У меня она не запускается. Выдает ошибку. Встречено 'var', а ожидался идентификатор.
program
var y, a, b, c :integer;
begin
read a, b, c;
if a mod 2=0 then y:=y+1;
if b mod 2=0 then y:=y+1;
if c mod 2=0 then y;=y+1;
writeln
end.