Рост каждого из N учеников хранится в сантиметрах в массиве. Найдите количество учеников, рост которых меньше M сантиметров
Помогите ребят)

const N = 10;const M = 179;varmas:array [1..N] of integer;count,i:integer;beginwriteln('Введите рост учеников');for i:=1 to N doread(mas[i]);for i:=1 to N doif mas[i]<M thencount:=count+1;writeln('Число учеников,чей рост меньше '+M+' равен '+count);end.