ВУЗ:
Составители:
Рубрика:
58
TYPE Pupil
fio AS STRING * 20
age AS INTEGER
sex AS STRING * 6
class AS INTEGER
classname AS STRING * 1
END TYPE
Определив собственный тип данных, вы можете использовать его
для объявления переменных этого типа.
DIM Schoolchildrens AS Pupil
DIM Group(1 TO 25) AS Pupil
Доступ к компонентам (свойствам) переменной пользовательского
типа осуществляется путем указания точки после имени переменной.
Schoolchildrens.fio = "Иванов Иван"
Schoolchildrens.age = 15
Schoolchildrens.sex = "male"
Schoolchildrens.class = 10
Schoolchildrens.classname = "А"
PRINT Schoolchildrens.fio, Schoolchildrens.age, Schoolchildrens.sex, School-
childrens.class, Schoolchildrens.classname
Пример простой программы:
REM использование комбинированных типов
REM описание типа ученик
TYPE Pupil
fio AS STRING * 20
age AS INTEGER
sex AS STRING * 6
class AS INTEGER
classname AS STRING * 1
END TYPE
REM объявление массива из 3 элементов типа ученик
DIM Group(1 TO 3) AS Pupil
Group(1).fio = "Иванов Иван"
Group(1).age = 15
Group(1).sex = "male"
Group(1).class = 10
Group(1).classname = "А"
Group(2).fio = "Петрова Маша"
PDF created with FinePrint pdfFactory Pro trial version www.pdffactory.com
TYPE Pupil
fio AS STRING * 20
age AS INTEGER
sex AS STRING * 6
class AS INTEGER
classname AS STRING * 1
END TYPE
Определив собственный тип данных, вы можете использовать его
для объявления переменных этого типа.
DIM Schoolchildrens AS Pupil
DIM Group(1 TO 25) AS Pupil
Доступ к компонентам (свойствам) переменной пользовательского
типа осуществляется путем указания точки после имени переменной.
Schoolchildrens.fio = "Иванов Иван"
Schoolchildrens.age = 15
Schoolchildrens.sex = "male"
Schoolchildrens.class = 10
Schoolchildrens.classname = "А"
PRINT Schoolchildrens.fio, Schoolchildrens.age, Schoolchildrens.sex, School-
childrens.class, Schoolchildrens.classname
Пример простой программы:
REM использование комбинированных типов
REM описание типа ученик
TYPE Pupil
fio AS STRING * 20
age AS INTEGER
sex AS STRING * 6
class AS INTEGER
classname AS STRING * 1
END TYPE
REM объявление массива из 3 элементов типа ученик
DIM Group(1 TO 3) AS Pupil
Group(1).fio = "Иванов Иван"
Group(1).age = 15
Group(1).sex = "male"
Group(1).class = 10
Group(1).classname = "А"
Group(2).fio = "Петрова Маша"
58
PDF created with FinePrint pdfFactory Pro trial version www.pdffactory.com
