Дана последовательность целых чисел, оканчивающаяся нулём. Сколько элементов в этой последовательности имеют запись, оканчивающуюся на цифру 8? Составьте программу для решения задачи.

• var a, kol: integer;
• begin
• kol:=0; a:=29;
• while a<>0 do begin
• read\(a\);
• if a mod 8 = 0 then kol:=kol+1;
• end;
• write\(kol\);
• end.