Написать функцию для определения количества элементов одномерного массива, кратных k

@Mark1615 · Регистрация: 04.04.2014

Написать функцию для определения количества элементов одномерного массива, кратных k.

@dela · 05.04.2014, 21:08

Pascal

function kolKratn(mas : array [1..n] of integer; k : integer):integer;
var i, res: integer;
begin
     res := 0;
     for i := 1 to n do
         if (mas[i] mod k = 0) then
            res := res + 1;
     kolKratn := res;
end;

@Mark1615 0 / 0 / 0 Регистрация: 04.04.2014 Сообщений: 30
		1
	Написать функцию для определения количества элементов одномерного массива, кратных k 05.04.2014, 18:58. Показов 1371. Ответов 1 Метки нет (Все метки) Написать функцию для определения количества элементов одномерного массива, кратных k. __________________ Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь 0

Опции темы

Написать функцию для определения количества элементов одномерного массива, кратных k

Решение