Оно относится к обратной связи (Ну лично по моему рассуждению)
<u>PascalABC.NET 3.2</u>
begin
var B := MatrRandom(4, 5, -50, 70);
println('Исходный массив:');
B.Println;
println('Кратных 3:', B.Rows.SelectMany(x->x).Where(x->x mod 3 = 0).Count);
println('Кратных 5:', B.Rows.SelectMany(x->x).Where(x->x mod 5 = 0).Count);
println('Кратных 7:', B.Rows.SelectMany(x->x).Where(x->x mod 7 = 0).Count);
end.
<em>Пример вывода:</em>
Исходный массив:
13 31 34 -30 24
34 55 9 16 66
-38 -50 44 53 18
-20 -4 -49 -42 -3
Кратных 3: 7
Кратных 5: 4
Кратных 7: 2
2) ![2^{16}](https://tex.z-dn.net/?f=%202%5E%7B16%7D%20)
бит/с переведем в кбайт/с.
![\frac{ 2^{16}}{ 2^{13} } = 2^{3}](https://tex.z-dn.net/?f=%20%5Cfrac%7B%202%5E%7B16%7D%7D%7B%202%5E%7B13%7D%20%7D%20%3D%20%202%5E%7B3%7D)
кбайт/с.
Время передачи:
1) 20% от 8 мбайт - это 8 * 0,20 = 3,2 мбайт
![\frac{3,2 * 2^{10} }{ 2^{3}} = 2^{7} * 3,2 = 409,6 + 15 + 14 = 428,6cek](https://tex.z-dn.net/?f=%20%5Cfrac%7B3%2C2%20%2A%20%202%5E%7B10%7D%20%7D%7B%202%5E%7B3%7D%7D%20%3D%20%202%5E%7B7%7D%20%2A%203%2C2%20%3D%20409%2C6%20%2B%2015%20%2B%2014%20%3D%20428%2C6cek)
Вывод:
способ 1 быстрее на 595,4 секунды.