пусть дано N чисел,введенных с клавиатуры. Найти количество только тех из них,которые кратны 2 и оканчиваются на 8.Программа в паскале(с помощью цикла)

Вопрос школьника по предмету Информатика

пусть дано N чисел,введенных с клавиатуры. Найти количество только тех из них,которые кратны 2 и оканчиваются на 8.
Программа в паскале(с помощью цикла)

Ответ учителя по предмету Информатика

Var

i,N,A,k:integer;

Begin

k:=0;

Write(‘N = ‘);Read(N);

For i:= 1 to N do

    Begin

    Read(A);

    if (A mod 10 = 8) then k:=k+1;

    End;

WriteLn(k);

End.