Найдите количество элементов целочисленного массива , заканчивающиеся цифрой 3 . паскаль

var i,s: integer;a:array[1..10] of integer;beginrandomize;for i:=1 to 10 do begina[i]:=random(13)+1;if (a[i]=3)or(a[i] mod 10 = 3) then s:=s+1;end;writeln(s);end.