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

2006anna1 2006anna1    2   18.06.2021 17:48    1

Ответы
niggaeasyreal niggaeasyreal  18.07.2021 18:47

##

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)


Определить количество членов в последовательности натуральных чисел кратных числу M и заключенных в
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика