Question

Дан одномерный массив, найти все элементы кратные 3 и 5 сколько их.

Answer 1

Ответ:

let count = 0;

arr.foreach(el => {

    if( el % 3 == 0 && el % 5 == 0) count++;

});

Паскаль

var i:longint;

a:array [1..100]

begin

for i := 1 to n do

 if (a[i] mod 3 && a[i] mod 5) = 0 then k:=k+1;

end.