Пояснения к лабораторной работе

Неспециализированные пояснения к применению функций и процедур.

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

И процедура, и функция складываются из заголовка, раздела описаний и делаемого блока. Их описания должны пребывать по окончании вторых операторов описаний главной (вызывающей) программы, перед ее делаемым блоком. В отличие от главной программы, функции и заголовки процедуры необходимы, и имеют вид:

PROCEDURE (); – для процедуры и

FUNCTION ():; – для функции.

Перечень доводов это, по существу, перечень входных параметров.

Раздел описаний процедуры либо функции строится как раздел описаний главной программы, с учетом того, что все обрисованные переменные существуют лишь на протяжении исполнения процедуры (функции) в виде локальных переменных и никак не связаны с переменными вызывающей программы.

направляться иметь в виду, что в случае, если во внешней программе переменная обрисована, а в процедуре – нет, ее применение в теле процедуры свидетельствует работу с переменной внешней программы (так именуемые глобальные переменные).

Делаемый блок (что должен быть заключен в скобки Begin .. End) заканчивается знаком ;, а не точкой. В функции, в отличие от процедуры, в делаемом блоке имени функции непременно должно быть присвоено значение, которое и будет являться ее значением. Такое присваивание может видеться пара раз, конечным значением будет итог последнего присваивания. В выражений тела функции ее имя видеться не должно, в случае, если это не особая рекурсивная функция.

Обращение (вызов) процедуры выполняется написанием имени процедуры в форме отдельного оператора. Обращение к функции выполняется лишь в выражения, входящего в состав оператора, подобно обращению к стандартным (встроенным) функциям Турбо-Паскаля.

Механизм параметров

В перечень параметров включаются данные для работы процедуры/функции (входные параметры) и, в случае, если нужно, указания, куда поместить результаты работы процедуры (выходные параметры).

Существует два метода передачи данных через перечень параметров из вызывающей программы в процедуру. Первый метод содержится в том, что процедуре передается некое данное в виде его значения, к примеру, в случае, если данное числового типа, передается само число. Второй метод содержится в том, что передается не значение данного, а адрес ячейки, где это данное находится (говорят, что передается имя переменной). Так, параметры смогут передаваться по значению и по имени. В каких случаях какой метод направляться применять? В большинстве случаев входные параметры передаются в процедуру по значению, а выходные – в любой момент по имени.

Имеется кое-какие особенности при передаче массивов (и других составных данных громадного размера) в качестве фактических параметров. Кроме того в случае, если массив представляет собой входные эти и не изменяется в ходе исполнения процедуры, его в большинстве случаев передают по имени, поскольку это требует передачи лишь адреса начала массива, а не копии всего массива, как это потребовалось бы при передаче массива по значению. Помимо этого, массив главной программы (фактический параметр) и массив в перечне формальных параметров должны иметь одинаковый тип – т.е. обязан употребляться одинаковый явный описатель.

Напомним, что в то время, когда параметры передаются по имени, они занимают в памяти по 4 байта. Подробнее об этом наблюдай лабораторную работу № 9.

Примеры написания перечней формальных и фактических параметров:

..(A,B,C:real;VAR X1,X2:real;VAR N:integer); – формальные,

..(0.762,Alfa,C[3]-1.2,X,Y,Num); соответствующие фактические.

Для передачи массива в процедуру:

TYPE

Vect = array[1..10] of real;

Mas5x8 = array[1..5,1..8] of integer;

. . .

VAR

C1,C2: Vect;

A: Mas5x8;

Metod: Integer;

. . .

PROCEDURE GetMatr(M:integer; Var X,Y:Vect;

Var Z:Mas5x8;…);

VAR A1,C1:integer;

. . .

Begin

End;

FUNCTION MinValueMatr( Var Z:Mas5x8; M,N:integer)

:Integer;

VAR MinZ, I, j :integer;

Begin

MinValueMatr:= MinZ;

End;

BEGIN

. . .

GetMatr(0, C2, C1, A,…); {обращение к процедуре}

. . .

If MinValueMatr(A,5,7) div 2 3 then {обращение к функции}

. . .

END.

Разбор контрольного варианта

Задание

Таблица 24. Эти к заданию 31 варианта

Таблица идентификаторов

Составляется как для главной программы, так и для каждой подпрограммы пользователя.

Таблица 25. Идентификаторы программы 31 варианта

Блок-схема метода

Текст программы.

PROGRAM KorrMas;

{ Лабораторная работа N 7 Вариант N 31

Обработка массива

А.Я.Умненькая, ст. гр. Я-007 }

TYPE

Massiv = array[1..13,1..10] of integer;

Stroka = string[30];

CONST Quest1: Stroka=’Задайте число строчков массива’;

Quest2: не=’Задайте число столбцов массива’;

VAR A :Massiv;

M,N,I,j : integer;

Fin : file of integer;

Fout : file of text;

{ Процедура ввода размеров массива }

PROCEDURE InpMN(Txt:Stroka; MaxK:integer;

Var Kol:integer);

Begin

WriteLn; WriteLn(Txt);

Repeat

Readln(Kol);

If KolMaxKol then

Writeln(‘Возможно не более ‘,MaxK,’задайте опять’);

until Kol

End;

{ Процедура вывода массива в файл протокола }

PROCEDURE PrintMas(Txt: string; Var Mas: Massiv;

NStr,NKol: integer);

VAR i,j : integer;

Begin

Writeln(Fout,Txt);

For i:= 1 to NStr do

begin

For j:= 1 to Nkol do Write(Fout,Mas[I,j]:7);

WriteLn(Fout);

end;

End;

{ Функция вычисления суммы четных элементов заданной строки массива }

FUNCTION Sum(Var Mas: Massiv; N,St: integer)

:integer;

VAR j,S : integer;

Begin

S:=0;

For j:=1 to N do

If not Odd(Mas[St,j]) then S:=S+Mas[St,j];

Sum:=S;

End;

BEGIN { Главная программа }

InpMn(Quest1,13,M);

InpMn(Quest2,10,N);

Assign(Fout,’Umnik7.res’);

ReWrite(Fout);

WriteLn(Fout,’Сумма четных элем. в последний столбец’);

Assign(Fin,’D:\LAB1\DATI.BIN’);

ReSet(Fin);

Seek(Fin,32);

for i:=1 to M do

for j:=1 to N do Read(Fin,A[I,j]);

Close(Fin);

PrintMas (‘ Исходный массив’, A,M,N);

for I:=1 to M do A[I,N]:=Sum(A,N,I);

PrintMas (‘ Обработанный массив’, A,M,N);

Close(Fout);

END.

Содержимое комплекта данных UMNIK7.RES:

Сумма четных элем. в последний столбец

Исходный массив

9 8 0 -7 0 -5 7 -5 5

6 9 9 2 -2 -8 3 -8 -9

8 -4 -4 1 3 6 4 0 -5

4 1 -2 4 2 1 -2 -6 -5

-1 5 0 9 4 -3 -6 -691 885

-709 800 382 -396 -140 -841 923 368 -686

737 624 169 -610 458 -188 -423 126 355

Обработанный массив

9 8 0 -7 0 -5 7 -5 8

6 9 9 2 -2 -8 3 -8 -10

8 -4 -4 1 3 6 4 0 10

4 1 -2 4 2 1 -2 -6 0

-1 5 0 9 4 -3 -6 -691 -2

-709 800 382 -396 -140 -841 923 368 328

737 624 169 -610 458 -188 -423 126 410

Варианты заданий

Таблица 26. Варианты заданий лабораторной работы №7

Лабораторная работа N 8

Графика на Паскале

Задачи лабораторной работы

Вопросы, изучаемые в работе

• использование процедур и Изучение строения, функций, раздела Graph, применяемого при выводе на экран информации в графической форме.
• Работа с цветом.
• Проектирование размещения графических объектов на экране.

Задание (общее ко всем вариантам)

• Выстроить в подходящей совокупности координат график заданной функции. В нижней строке экрана вывести уравнение, по которому строится диапазон и график трансформации довода. Координатные оси графика должны быть размечены делениями, у которых должны находиться числовые значения.
• Данные задаются константами в тексте программы.
• Результаты расчета выводятся в графической форме на экран.

Неспециализированные пояснения

Графический режим экрана

Дабы применять графику в программах на Турбо-Паскале нужно обучиться планировать размещение на экране выводимой информации (т.е. разобраться в методе вывода графических объектов на экран) и мочь подключать и применять стандартные функции и графические процедуры Турбо-Паскаля. Разглядим последовательно обе эти неприятности.

Для начала направляться твердо усвоить, что экран дисплея может употребляться либо в текстовом либо в графическом режиме, но лишь не в обоих в один момент. Стандартное состояние экрана при работе в Турбо-Паскале (вычисленном на ОС DOS) – в текстовый режим. Наряду с этим никакой графический вывод на экран неосуществим, попытки вызова процедур графики приведут к останову и ошибке программы. По окончании инициализации графики, ненужными будут обращения к процедурам вывода на экран текстовой информации (посредством Write и WriteLn), действительно, без прерываний выполнения и всяких сообщений программы.

Перевод дисплея в графический режим (инициализация графики) позволяет получить доступ к любой точке экрана. Наряду с этим совокупность координат экрана начинается в левом верхнем углу с точки, имеющей координаты 0,0. Ось Х направлена слева направо, ось У – сверху вниз. Любая точка экрана имеет две координаты Х и У и какой-то цвет из допустимой палитры. Такая точка именуется пикселем. В зависимости от состава аппаратных средств ПЭВМ, на экране максимально может помещаться либо 350 (для EGA-адаптера), либо 480 (для VGA-адаптера) строчков по 640 пикселов в каждой строке. Палитра в большинстве случаев содержит 16 цветов.

03-2. Пояснение к лабораторной работе № 3

Интересные записи:

• Познавательные процессы: ощущение, восприятие, представление, воображение
• Прагматика нарративного знания
• Прагматика и стилистика разговорной речи. условия успешного общения
• Практическая работа №1 решение задач на масштабы