М. Э. Абрамян Programming Taskbook


Составные типы данных в процедурах и функциях



Pdf көрінісі
бет62/66
Дата11.04.2023
өлшемі0,52 Mb.
#81497
1   ...   58   59   60   61   62   63   64   65   66
Байланысты:
Задачник Абрамяна

Составные типы данных в процедурах и функциях.
Рекурсивные алгоритмы
Mix70

. [Param1] Описать функцию MinElem(AN) целого типа, находящую
минимальный элемент целочисленного массива размера N. С помощью
этой функции найти минимальные элементы массивов ABразмера N
A
,
N
B
N
C
соответственно.
Mix71

. [Param17] Описать процедуру ArrayToMatrCol(AKMNB), фор-
мирующую по вещественному массиву размера матрицу размера
M × N (матрица заполняется элементами массива по столбцам). «Лиш-
ние» элементы массива игнорируются; если элементов массива недоста-
точно, то оставшиеся элементы матрицы полагаются равными 0. Дву-
мерный массив является выходным параметром. С помощью этой про-
цедуры на основе данного массива размера и целых чисел и N
сформировать матрицу размера M × N.
Mix72

. [Param41] Описать процедуру SplitStr(SWN), которая формирует по
данной строке массив слов, входящих в (массив и его размер N
являются выходными параметрами). Словом считается набор символов,
не содержащий пробелов и ограниченный пробелами или началом/концом
строки; предполагается, что строка содержит не более 10 слов. Исполь-
зуя функцию SplitStr, найти количество слов N, содержащихся в данной
строке S, и сами эти слова.
Mix73

. [Param51] Описать процедуру AddLineNumbers(SNKL), добавляю-
щую в начало каждой строки существующего текстового файла с именем S
ее порядковый номер: первая строка получает номер N, вторая — + 1 и


Избранные задания из различных групп
137
т. д. Номер отображается в позициях, выравнивается по правому краю
и отделяется от последующего текста пробелами (> 0, > 0). Если
строка файла является пустой, то она также нумеруется, но пробелы по-
сле номера не добавляются. Применить эту процедуру к данному файлу,
используя указанные значения Nи L.
Mix74

. [Recur1] Описать рекурсивную функцию Fact(N) вещественного типа,
вычисляющую значение факториала
N! = 1·2·. . .·N
(> 0 — параметр целого типа). С помощью этой функции вычислить
факториалы пяти данных чисел.
Mix75

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

. [Recur14] Вывести значение целочисленного выражения, заданного в
виде строки S. Выражение определяется следующим образом:
<выражение> ::= <цифра> | <выражение> + <цифра> |
<выражение> − <цифра>
Mix77

. [Recur15] Вывести значение целочисленного выражения, заданного в
виде строки S. Выражение определяется следующим образом:
<выражение> ::= <терм> | <выражение> + <терм> |
<выражение> − <терм>
<терм>
::= <цифра> | <терм> * <цифра>
Mix78

. [Recur16] Вывести значение целочисленного выражения, заданного в
виде строки S. Выражение определяется следующим образом:
<выражение> ::= <терм> | <выражение> + <терм> |
<выражение> − <терм>
<терм>
::= <элемент> | <терм> * <элемент>
<элемент>
::= <цифра> | (<выражение>)
Mix79

. [Recur17] Вывести значение целочисленного выражения, заданного в
виде строки S. Выражение определяется следующим образом:
<выражение> ::= <цифра> |
(<выражение><знак><выражение>)
<знак>
::= + | − | *
Mix80

. [Recur18] Проверить правильность выражения, заданного в виде непу-


138
М. Э. Абрамян. Электронный задачник Programming Taskbook 4.5
стой строки (выражение определяется по тем же правилам, что и в за-
дании Mix79). Если выражение составлено правильно, то вывести
TRUE
,
иначе вывести
FALSE
.
Mix81

. [Recur25] Дано дерево глубины N, каждая внутренняя вершина кото-
рого имеет (< 10) непосредственных потомков (нумеруются от 1 до K).
Корень дерева имеет номер 0. Записать в текстовый файл с данным име-
нем все возможные пути, ведущие от корня к листьям. Перебирать пути,
начиная с «самого левого» и заканчивая «самым правым» (при этом пер-
выми заменять конечные элементы пути).


Достарыңызбен бөлісу:
1   ...   58   59   60   61   62   63   64   65   66




©emirsaba.org 2024
әкімшілігінің қараңыз

    Басты бет