В Паскале есть возможность вызывать функцию и не использовать то значение, которое она возвращает.
Иными словами, вызов функции может внешне выглядеть как вызов процедуры, например:
{$Х+} {Включаем расширенный синтаксис}
Function My.Func (var x : Integer) : Integer;
begin
if x
else MyFunc := x+10
end; {MyFunc}
var
i : Integer;
begin {main}
i := 1;
i := 2*MyFunc(i) -100; {Стандартный вызов функции}
MyFunc ( i ) {Расширенный синтаксис вызова}
end. {main}
Расширенный синтаксис делает использование функций таким же свободным, как, например, их использование в языке Си, и придает Паскалю дополнительную гибкость.
С помощью расширенного синтаксиса нельзя вызывать стандартные функции.
Компиляция с учетом расширенного синтаксиса включается активным состоянием опции EXTENDED SYNTAX диалогового окна OPTIONS/COMPILER или глобальной директивой компилятора {$Х+}.
19.4.3 Решить задачу, используя рекурсивную подпрограмму
Номерварианта | Выражение |
Найти сумму цифр заданного натурального числа | |
Подсчитать количество цифр в заданном натуральном числе | |
Описать функцию С(m,n), где 0?m?n, для вычисления биномиального коэффициента Сmn по следующей формуле: С0n =Сnn =1; Сmn =Сmn-1 +Сm-1n-1 при0 | |
Описать рекурсивную функцию Root(a,b,?), которая методом деления отрезка пополам находит с точностью ? корень уравнения f(x)=0 на отрезке [a,b] (считать , что ?0, a | |
Описать функцию min(x) для определения минимального элемента линейного массива X?Введя вспомогательную рекурсивную функцию min1(k), находящую минимум среди последних элементов массива X, начиная с k- того. | |
Описать рекурсивную логическую функцию Simm(S,I,J), проверяющую, является ли симметричной часть строки S, начинающаяся i- м изаканчивающаяся j- м ее элементами. | |
Составить программу для вычисления наибольшего общего делителя двух натуральных чисел. | |
Составить программу для нахождения числа, которое образуется изданного натурального числа при записи его цифр в обратном порядке.Например для числа 1234 получаем результат 4321. | |
Составить программу для перевода данного натурального числа вдвоичной системе счисления (2? p ?9). | |
Дана символьная строка, представляющая собой запись натуральногочисла p- ичной системе счисления (2? p ?9).Составить программу для перевода этого числа в десятичную систему счисления. | |
Составить программу для вычисления суммы:1!+2!+3!+…..+n! (n?15)Примечание. Тип результата значения функции – LongInt. | |
Составить программу для вычисления суммы: 2!+4!+6!+…..+n!(n?16, n- четное)Примечание. Тип результата значения функции – LongInt | |
Дано n различных натуральных чисел. Напечатать все перестановки этих чисел. | |
Логическая функция возвращает true, если ее аргумент — простое число. | |
Описать функцию, которая удаляет из строки все лишние пробелы. Пробелы считаются лишними, если их подряд идет более двух, если они стоят в конце строки после последней точки, если стоят после открывающегося парного знака препинания. |
Программирование алгоритмов с использованием графического режима
Цель работы
20.1.1 Познакомиться со средствами компьютерной графики в Паскале
20.1.2 Составление программ с использованием графического режима
Приборы и оборудование
20.2.1 Free Pascal
20.2.2 ПЭВМ IBM PC/XT
20.2.3 Microsoft Word
20.2.4 Задание на выполнение работы в электронном варианте.
Порядок выполнения работы
20.3.1 Изучите средства компьютерной графики в Паскале
20.3.2 Выберите номер варианта, согласно списка в учебном журнале (Приложение А).
20.3.3 Составьте программу, используя команд графического режима
20.3.4 Результаты работы распечатайте на принтере.
20.3.4 Оформите лабораторную работу для сдачи преподавателю
Этапы работы
Основные понятия и средства компьютерной графики в Паскале
До сих пор мы использовали экран компьютера только для вывода символьной информации – чисел, текстов.
Однако Паскаль позволяет выводить на экран рисунки, чертежи, графики функций, диаграммы и т.п., все то, что принято называть компьютерной графикой.
Появилась мощная графическая библиотека, организованная в модуль Graph.
Для его подключения в начале программы необходимо написать строку:
Uses Graph;
Для вывода графических изображений необходимо перевести экран в один из графических режимов.
В графическом режиме можно из программы управлять состоянием каждого пиксела (точечного элемента) экрана.
Графические режимы отличаются:
• размером графической сетки (М х N, где М— число точек по горизонтали, N — число точек по вертикали);
• цветностью (число воспроизводимых на экране цветов).
Допустимые режимы зависят от типа монитора и соответствующего графического драйвера, используемого на компьютере.
Для установки графического режима экрана существуют соответствующие процедуры. В модуле Graph процедура установки графического режима экрана имеет следующий заголовок: Procedure InitGraph(var Driver,Mode: Integer; Path: String);
Здесь Driver — переменная типа Integer, определяет тип графического драйвера;
Mode — переменная того же типа, задающая режим работы графического адаптера;
Path — выражение типа String, содержащее имя файла драйвера и, возможно, маршрут его поиска.
Статьи к прочтению:
- Расширенное выделение объектов
- Расскажите подробнее о категориях вселения, и на какие подъемные стоит рассчитывать, как быстро их выплачивают?
Функции c++ примеры. Синтаксис. Объявление, реализация функции. Параметры, аргументы.C++ #33
Похожие статьи:
-
Пользовательские методы класса. синтаксис объявления и вызова, пример.
Методом называется элемент класса или структура, в котором описываются операторы, предназначенные для выполнения определенных алгоритмов. Каждый метод…
-
Листинг 1. программа, в которой осуществляется вызов двух функций.
Лабораторная работа №5 ФУНКЦИИ Функцией называется выделенная последовательность инструкций, предназначенных для решения определенной задачи. Вы можете…