напишите программу, которая выводит на экран сумму чисел, не оканчивающихся на 2, из семи, вводимых пользователем. Пожалуйста, помогите!

 const N =7;var a, k, i:integer;begink:=0;for i:=1 to n do beginreadln(a);if a mod 10<>2 thenk:=k+a;end;writeln(k);end.