Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:

Тема 5

.pdf
Скачиваний:
6
Добавлен:
12.04.2015
Размер:
127.6 Кб
Скачать

Тема 5. Переменная величина. Типы данных

Раздел объявления меток: Label <список меток>;

Например:

Label 1,3,5,88,90;

Раздел объявления констант:

Const <список констант>;

Например:

Const m = 4,h = 0.1;

Раздел объявления типов:

Type <список типов>;

Например:

Type vector = array [1..3] of real; Day = 1 .. 31;

Раздел объявления переменных:

Var <список переменных>;

Например:

Var a:real; b,h,s: integer; f: char;

c,d : array [1..3] of real; d1 : 1 .. 31;

Тема 5. Переменная величина. Типы данных

Раздел объявления процедур: Procedure<список процедур>;

Раздел объявления функций: Function<список функций>;

Тело программы: begin

<список операторов>; end.

Например:

Begin

Writelen(`введи числа x и y`); Readln(`x, y`);

Z: = x +y;

Writeln(`z = x +y =`, z);

End.

Тема 5. Переменная величина. Типы данных

Например:

Программа нахождения суммы двух чисел:

Program PR1 (input; output)

uses crt; {подключение модуля CRT} var x, y, z: real;

begin

clrscr; {Процедура очистки экрана} Writelen(`введи числа x и y`); Readln(`x, y`);

Z: = x +y;

Writeln(`z = x +y =`, z); Repeat until keypressed; End.