Ограниченные типы

Сентябрь 3, 2022

Главная
Алгебра
Ограниченные типы

Содержание

2. ПОЛНАЯ СТРУКТУРА ПРОГРАММЫ PROGRAM ; Блок подключаемых модулей; Блок описания меток перехода; Блок определения констант; Блок
3. СТРУКТУРА ПРОГРАММЫ PROGRAM ; USES ; LABEL ; CONST ; TYPE ; VAR ; ; BEGIN
4. Метка - числовое значение от 0 до 9999 или идентификатор LABEL 1, 40, M1, EPS; LABEL
5. TYPE =(список_компонентов); … =(компоненты, входящие в данный тип); Пример: TYPE NEDEL=(PN,VT,SP,4T,PT,SB,VS); FAMILY=(FATHER, MATHER); VAR A1, A2,
6. Определение процедур и функций Структура описания заголовка процедуры: PROCEDURE ( ); VAR PROCEDURE ; PROCEDURE SUMMA(A:
7. PROGRAM AstepX; VAR A1,A2,X1,X2,Z: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
9. Скачать презентацию

Слайд 2

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

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

Слайд 3

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

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

USES CRT, DOS, GRAPH;

Модуль SYSTEM

Слайд 4

Метка - числовое значение от 0 до 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);

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

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

R:NEDEL;
M:array[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
... ...
END;

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

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

Слайд 7

PROGRAM AstepX;
VAR A1,A2,X1,X2,Z: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К

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

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