===== PascalABC.NET =====
function nF(n: integer) := Range(1, n).Product;
begin
SeqGen(5, i -> nF(i), 1).Sum.Println
end.
Ответ:
2 и 3 вариант верные
Объяснение:
Поставь лучший ответ пожалуйста
Это же элементарно!
Вот решения ко всем 4 задачам, Джон :)
Трёхбитовых слов всего 2^3 = 8
четырёхбитовых 2^4 = 16
пятибитовых 2^5 = 32
Всего 32+16+8 = 56 слов
Да, несложный язык :)
Ответ:
Создается константа nmax, равная 15
Создается переменная a, типа двумерного массива типа integer
Создаются переменные n, i, j, jmax типа byte
Создается переменная buf типа integer
Задается размерность, не больше nmax (то есть 15), и помещается в переменную n
Выводится исходная матрица, через 2 цикла, тк двумерный массив.
Дальше преобразуется матрица
Опять таки в двух циклах.
Выводится на экран и всё.