Определить количество членов в последовательности натуральных чисел кратных числу M и заключенных в интервале от L до NНужно сделать в Pascal

##

var k := ReadInteger('Длина последовательности:');

var (M, L , N) := ReadInteger3('Введите M, L и N:');

Writeln('Вводите данные');

k := ReadSeqInteger(k). Where(t -> (t mod M = 0) and (t in L. . N)). Count;

Print('Количество значений, удовлетворяющих условию:', k)