Ввести файл F из 13 элементов. Определить в нём - вопрос №1354178913 от superfrap320 03.03.2021 17:42

Question

Информатика: Ввести файл F из 13 элементов. Определить в нём количество тех элементов, которые без остатка делятся на собственный индекс (номер позиции в файле, увеличенный на единицу).

superfrap320 · Answer

PascalABC.NETbeginWriteElements( LRSM.data ,ReadSeqInteger(13));ReadElements& integer ( LRSM.data ).Numerate.Count(x- x[1] mod x[0] = 0).Printend.Пример работы:...