На языке Паскаля вводятся элементы найти сумму чисел которые делятся на 4 и оканчиваются на 4

Предыдущий
вопрос Следующий
вопрос

program SumDivisibleByFour;
var
num, sum, count, i: integer;
begin
sum := 0;
count := 0;

writeln('Enter the number of elements:');
readln(num);

for i := 1 to num do
begin
writeln('Enter element ', i, ':');
readln(num);

end;

writeln('Sum of numbers divisible by 4 and ending with 4: ', sum);
end.