Оқулық Қазақстан Республикасы Білім жəне ғылым министрлігі бекіткен Алматы, 2011 1
жүктеу/скачать 4,42 Mb.
|
boribaev-algoritmdeu
| Бекітілген өрістері бар жазбалар. Бекітілген өрістері бар жазбаның диаграммасы 6.7-суретте келтірілген.
Тілдің кез келген мəндерінің типі тəрізді жазбаны екі тəсілмен анықтауға болады: айнымалыларды сипаттағанда, мысалы: Var Zap1,Zap2:record {5 өрістен тұратын екі жазба} F,S:real; {нақты типтегі екі өріс} A,B:integer; {бүтін типті екі өріс} C:char; {символдық типтегі өріс} end; 151 Zap3:record {3 өрістен тұратын жазба} S:string[80]; {ұзындығы 80 байт символдық жол} A:array[1..20] of real; {20 нақты эле-менттен тұратын бірөлшемді жиым} Flag:boolean; {логикалық типтегі өріс} end; ... 6.7-сурет. Жазбаларды жариялаудың синтаксистік диаграммасы жазба типі алдын ала хабарланады, мысалы: Type Zt1=record {« 5 өрістен тұратын жаз-ба» типі} F,S:real; {нақты типтегі екі өріс} A,B:integer; {бүтін типті екі өріс} C:char; {символдық типтегі өріс} end; Zt2=record {« 3 өрістен тұратын жазба « типі} 152 S:string[80]; {ұзындығы 80 байт символдық жол} A:array [1..20] of real; {20 нақты эеле-менттен тұратын бірөлшемді жиым } Flag:boolean; {логикалық типтегі өріс} end; Var Zap1,Zap2:Zt1; {Zt1 типті екі айныма-лы} Zap3:Zt2; ... {Zt2 типті айнымалы} Жазба өрісі ретінде, бастапқыда анықталған немесе жазба ішінде анықталған басқа жазба да қолданылуы мүмкін. Мысалы: Type Human=record {қызметкер жайлы жазба} Fio:record {өріс типі « 3 өрістен тұратын жаз-ба»} Fam, {фамилия} Name, {аты} Otch:string; {жəне қызметкер тегі} end; {Fio} BirthDay:record {өріс типі «3 өрістен тұратын жазба »} Day:1..31; {күн} Month:1..12; {ай} Year:word; {туған жылы} end; {Birthday} end; ... {Human} немесе Type Data=record Day:1..31; Month:1..12; Year:word; end; Famio=record Fam,Name,Otch:string; end; Human=record {типі «қызметкер жайлы жазба»} Fio:Famio; {өріс типі Famio} BirthDay:Data {өріс типі Data} end; ... 153 Программаның жеке айнымалысы жəне жазба жиымы ретінде де сипаттауға болады. Мысалы: Var Sotr:Human; Otdel:array[1..20] of Human; жүктеу/скачать 4,42 Mb. Достарыңызбен бөлісу:
|