Рассмотрим алфавит, состоящий из следующих символов: 0, 1, 2, 3, 4, 5, 6, 7. какова его мощность?

Question

Информатика: Рассмотрим алфавит, состоящий из следующих символов: 0, 1, 2, 3, 4, 5, 6, 7. какова его мощность?

Aleksandra1111117 · Accepted Answer

// PascalABC.NET 3.2, сборка 1417 от 28.03.2017
// Внимание! Если программа не работает, обновите версию!

begin
Writeln('*** Исходный массив 8x6 ***');
var c:=MatrRandom(8,6,-99,99);
c.Println(4); Writeln(4*c.ColCount*'-');
Writeln('Произведения элементов, больших -7, построчно:');
foreach var row in c.Rows do
    Writeln(row.Where(x->x>-7).Aggregate(int64(1),(p,q)->p*q));
end.

Пример
*** Исходный массив 8x6 ***
-50   8 -15 55 91 -53
-25 82 33 65 19 -63
99 49 -80 84 -2 68
-52 -63 -58 23 89 58
81 -45 -71 -85 34 66
-35   2 23 26 -33 -56
74 35 -35 21 15 -77
40 87 -11 77 -74 -65

Произведения элементов, больших -7, построчно:
40040
3341910
-55417824
118726
181764
1196
815850
267960

MOGZ ответил