лек9структур05прогр

Сентябрь 3, 2022

Главная
Алгебра
лек9структур05прогр

Содержание

2. ПОЛНАЯ СТРУКТУРА ПРОГРАММЫ PROGRAM ; Блок подключаемых модулей; Блок описания меток перехода; Блок определения констант; Блок
3. СТРУКТУРА ПРОГРАММЫ PROGRAM ; USES ; LABEL ; CONST ; TYPE ; VAR ; ; BEGIN
4. Метка - числовое значение от 1 до 9999 или идентификатор LABEL 1, 40, M1, EPS; LABEL
5. TYPE =(список_компонентов); … =(компоненты, входящие в данный тип); Пример: TYPE NEDEL=(PN,VT,SP,4T,PT,SB,VS); FAMILY=(FATHER, MATHER, SON); VAR A1,
6. Определение процедур и функций Заголовок Тело подпрограммы Структура описания заголовка процедуры: PROCEDURE ( ); VAR PROCEDURE
7. PROGRAM AstepX; VAR A1,A2,X1,X2,Z:real; Function ST(A, x: real): real; Begin ST:=Exp (X*Ln(A)) End; BEGIN READ (X1,X2,a1,a2);
9. Скачать презентацию

Слайд 2

ПОЛНАЯ СТРУКТУРА ПРОГРАММЫ
PROGRAM <имя программы>;
Блок подключаемых модулей;
Блок описания

меток перехода;
Блок определения констант;
Блок определения типов;
Блок описания переменных;
Блок определения процедур и функций;
BEGIN
Блок исполняемых операторов
END.
-

Слайд 3

СТРУКТУРА ПРОГРАММЫ
PROGRAM <имя программы>;
USES <список библиотечных модулей>;
LABEL <список

меток в основном блоке>;
CONST < определение констант>;
TYPE <определение типов>;
VAR <определение глобальных переменных>;
<определение процедур>
<определение функций>;
BEGIN
<основной блок программы>
END.

USES CRT, DOS, GRAPH;

Модуль SYSTEM
-

Слайд 4

Метка - числовое значение от 1 до 9999 или идентификатор
LABEL 1,

40, M1, EPS;

LABEL <метка1>,<метка2>,…<меткаN>;

3, 03,003 считаются одинаковыми

CONST <имя1>=<константа1>; <имя2>=<константа2>;

CONST <имяК>:<тип>=<константаK>;
<имяR>:<тип>=<константаR>;

Например: CONST
NIK=100;
AN= -NIL;
A=‘XYZ‘;

d1:integer=24;
d2:boolean=false;
d= ‘----‘;
-

Блок описания меток

Блок описания констант

Слайд 5

TYPE <идентификатор1>=(список_компонентов);
…
<идентификаторN>=(компоненты, входящие в данный тип);
Пример: TYPE NEDEL=(PN,VT,SP,4T,PT,SB,VS);

FAMILY=(FATHER, MATHER, SON);

VAR A1, A2, ..., An: <тип1>; ...
B1, B2, ..., Bn: <типК>;

VAR A, B, C: INTEGER;
D, M: REAL;

R:NEDEL;
Mas:array[1..13] of byte;

CONST K=10; L=5;
VAR A: ARRAY [1..K] OF INTEGER;
D, B:ARRAY[1..K,1..L] OF REAL;
-

Блок определения типов

Блок описания переменных

Слайд 6

Определение процедур и функций
Заголовок Тело подпрограммы
Структура описания заголовка процедуры:
PROCEDURE <имя>(<список формальных

параметров>);

VAR

PROCEDURE <имя>;

PROCEDURE SUMMA(A: REAL; B:INTEGER; VAR S,P:REAL )

Структура описания заголовка функции имеет вид
FUNCTION <имя>(<список формальных параметров>):<тип>;

Пример.
FUNCTION SUMMA (x,y: REAL): REAL;
VAR a,b:real;{описания локальных переменных}
BEGIN
read(a,b); ... ...
END;

Функция возвращает единственное значение в основную программу через имя функции

<имя функции>:=<выражение>

SUMMA:=X+Y+A*B

Слайд 7

PROGRAM AstepX;
VAR A1,A2,X1,X2,Z:real;
Function ST(A, x: real): real;
Begin
ST:=Exp (X*Ln(A))
End;
BEGIN
READ (X1,X2,a1,a2);

Z:=ST(A1,X1)+ST(A2,X2);
WRITELN(`Z=`,Z:10:4)
END.

Z=A1x1+A2x2

Ax

Длина строки 126 символов. Объем текста файла – 64К

{текст комментария} либо (*комментарий*)

(*внешний охватывает{внутренний} комментарий*)
-