
- •Множества.
- •Процедуры и функции.
- •Описание и вызов процедур и функций
- •Var имя праметра: имя типа
- •Передача параметров
- •Локальные и глобальные идентификаторы
- •Вариант 2.
- •Вариант 3.
- •Вариант 4.
- •Вариант 5.
- •Вариант 6.
- •Вариант 7.
- •Вариант 8.
- •Вариант 9.
- •Вариант 10.
- •Вариант 11.
- •Вариант 12.
- •Вариант 13.
- •Вариант 14.
- •Вариант 15.
Вариант 11.
Окружность характеризуется координатами центра (X, Y) и радиусом. Задан массив из N окружностей. Упорядочить массив по возрастанию длин заданных окружностей.
Дана строка, содержащая русские строчные буквы. Вывести на экран в убывающем в алфавитном порядке все буквы, содержащиеся в заданной строке.
Описать функцию PosSub(S0, S, K, N) целого типа, возвращающую номер позиции, начиная с которой в строке S содержится первое вхождение строки S0, причем анализируются только N символов строки S, начиная с ее K-го символа (таким образом, PosSub обеспечивает поиск в подстроке). Если K превосходит длину строки S, то возвращается 0, если длина строки меньше K + N, то анализируются все символы строки, начиная с ее K-го символа. Если в требуемой подстроке строки S вхождения S0 отсутствуют, то функция возвращает 0. Вывести значения функции PosSub для данных строк S0, S и каждой из трех пар положительных целых чисел: (K1, N1), (K2, N2), (K3, N3).
Реализовать функцию Trim(S), удаляющую в строке начальные и конечные пробелы. Обработать заданной функцией N строк, введённых пользователем.
Вариант 12.
Сообщение характеризуется текстом (строка длиной 255 символов), датой отправки, номером абонента отправившего сообщение и номером адресата, которому предназначено сообщение.
Дан массив из N сообщений. Упорядочить массив сообщений по убыванию по дате отправки в пределах одного абонента-адресата.
Дана строка, содержащая английские строчные буквы. Вывести на экран в убывающем в алфавитном порядке все буквы, содержащиеся в заданной строке.
Описать функцию WordK(S, K) строкового типа, возвращающую K-е слово строки S (словом считается набор символов, не содержащий пробелов и ограниченный пробелами или началом/концом строки). Если количество слов в строке меньше K, то функция возвращает пустую строку. Используя эту функцию, выделить из данной строки S слова с данными номерами K1, K2, K3.
Описать функцию InvStr(S, K, N) строкового типа, возвращающую инвертированную подстроку строки S, содержащую в обратном порядке N символов строки S, начиная с ee K-го символа. Если K превосходит длину строки S, то возвращается пустая строка; если длина строки меньше K + N, то инвертируются все символы строки, начиная с ee K-го символа. Вывести значения функции InvStr для данной строки S и каждой из трех пар положительных целых чисел: (K1, N1), (K2, N2), (K3, N3).
Вариант 13.
Студент характеризуется фамилией, именем и отчеством (строка — 100 символов), курсом (число от 1 до 5) и средним баллом. Дан массив из N студентов. Упорядочить заданный массив по убыванию по среднему баллу внутри курса.
Задано некоторое положительное число N. Вывести все простые числа расположенные в диапазоне [2..N].
Описать функцию DecToHex(N) строкового типа, возвращающую строковое представление целого неотрицательного числа N в 16-ричной системе счисления. Результирующая строка состоит из символов «0»–«9», «A»–«F» и не содержит ведущих нулей (за исключением представления числа 0). Используя эту функцию, получить 16-ричные представления пяти данных чисел.
Описать процедуру SwapRow(A, M, N, K1, K2), осуществляющую перемену местами строк вещественной матрицы A размера M × N с номерами K1 и K2. Матрица A является входным и выходным параметром; если K1 или K2 больше M, то матрица не изменяется. Используя эту процедуру, поменять для данной матрицы A размера M × N строки с данными номерами K1 и K2.