Помогите пожалуйста!!срочно!!!!!! 10 баллов и лучший ответ тому кто быстрее ответиит!!

Цикл for k:=1 to 10 do проверяет каждый элемент массива dat. В теле цикла условие - if dat[k] = 15 then m:=m+1 Переводя на русский язык - ЕСЛИ элемент массива = 15 ТО прибавляем к m единицу. То есть m - количество элементов массива, значение которых равно 15. Всего таких элементов три (dat[2], dat[4], dat[10]). То есть программа выведет на экран тройку.