Клёвый код

Recur10. Описать рекурсивную функцию DigitSum($K$) целого типа, которая находит сумму цифр целого числа $K$, не используя оператор цикла. С помощью этой функции найти суммы цифр для пяти данных целых чисел.

Читать далее

Param19. Описать функцию Norm1($A$, $M$, $N$) вещественного типа, вычисляющую норму вещественной матрицы $A$ размера $M \times N$: Norm1($A$, $M$, $N$)=$max {|A_{1,J}|+|A_{2,J}| +…+ |A_{M,J}|}$, где максимум берется по всем $J$ от $1$ до $N$. Для данной матрицы $A$ размера $M \times N$ найти Norm1($A$, $K$, $N$), $K=1,…, M$.

Читать далее

Recur9. Описать рекурсивную функцию NOD($A$, $B$) целого типа, находящую наибольший общий делитель (НОД) двух натуральных чисел $A$ и $B$, используя алгоритм Евклида: НОД($A$, $B$)=НОД($B$, $A$ mod $B$), если $B \ne 0$;НОД($A$, $0$)=$A$. С помощью этой функции найти НОД($A$, $B$), НОД($A$, $C$), НОД($A$, $D$), если даны числа $A$, $B$, $C$, $D$.

Читать далее

Param18. Описать процедуру Chessboard($M$, $N$, $A$), формирующую по целым положительным числам $M$ и $N$ матрицу $A$ размера $M \times N$, которая содержит числа $0$ и $1$, расположенные в «шахматном» порядке, причем $A_{1,1}=0$. Двумерный целочисленный массив $A$ является выходным параметром. С помощью этой процедуры по данным целым числам $M$ и $N$ сформировать матрицу $A$ размера $$M …

Читать далее

Recur8. Описать рекурсивную функцию RootK($X$, $K$, $N$) вещественного типа, находящую приближенное значение корня $K$-й степени из числа $X$ по формуле: $Y_0=1$,$Y_{N+1}=Y_N — (Y_N — X/(Y_N)^{K-1})/K$, где $Y_N$ обозначает RootK($X$, $K$, $N$) при фиксированных $X$ и $K$. Параметры функции: $X$ $(>0)$ — вещественное число, $K$ $(>1)$ и $N$ $(>0)$ — целые. С помощью функции RootK найти …

Читать далее

File89. Даны два файла вещественных чисел с именами $S_A$ и $S_B$, содержащие ненулевые части верхнетреугольных матриц $A$ и $B$ (по строкам). Создать новый файл с именем $S_C$, содержащий ненулевую часть произведения $A*B$ (по строкам). Если матрицы $A$ и $B$ нельзя перемножать, то оставить файл $S_C$ пустым.

Читать далее

Param17. Описать процедуру ArrayToMatrix2($A$, $K$, $M$, $N$, $B$), формирующую по вещественному массиву $A$ размера $K$ матрицу $B$ размера $M \times N$ (матрица заполняется элементами массива $A$ по столбцам). «Лишние» элементы массива игнорируются; если элементов массива недостаточно, то оставшиеся элементы матрицы полагаются равными $0$. Двумерный массив $B$ является выходным параметром. С помощью этой процедуры на основе …

Читать далее

File90. Даны два файла вещественных чисел с именами $S_A$ и $S_B$, содержащие ненулевые части нижнетреугольных матриц $A$ и $B$ (по строкам). Создать новый файл с именем $S_C$, содержащий ненулевую часть произведения $A*B$ (по строкам). Если матрицы $A$ и $B$ нельзя перемножать, то оставить файл $S_C$ пустым.

Читать далее

Recur7. Описать рекурсивную функцию CombiN_2($N$, $K$) целого типа, находящую $C(N, K)$- число сочетаний из $N$ элементов по $K$ — с помощью рекуррентного соотношения: $C(N, 0)=C(N, N)=1$, $C(N, K)=C(N — 1, K)+C(N — 1, K — 1)$ при $0<K<N$. Параметры функции — целые числа; $N>0$, $0 \le K \le N$. Считать, что параметр $N$ не превосходит …

Читать далее

File88. Дан файл вещественных чисел, содержащий ненулевую часть трехдиагональной матрицы (по строкам). Создать новый файл, содержащий все элементы данной матрицы (по строкам).

Читать далее