17.Fortran тіліндегі мәліметтер типі. Мәліметтер инициализациясы.

1. Бүтін – INTEGER (стандартты түрі), BYTE, INTEGER(1), INTEGER(2), INTEGER(4)

Сәйкесінше байт саны 4, 1, 1, 2, 4.

2. Нақты – REAL (стандартты түрі), REAL(4), REAL(8), DOUBLE PRECISION

Сәйкесінше байт саны - 4, 4, 8, 8. KIND=8 болғанда нақты мәліметтер екіжақты дәлдік береді.

3. Комплексті – COMPLEX (стандартты түрі), COMPLEX(4), COMPLEX(8).

Сәйкесінше байт саны – 8, 8, 16. Жадының бір жағы шын, ал екіншісі жалғанға бөлінеді.

4. Логикалық – LOGICAL (стандартты түрі), LOGICAL(1), LOGICAL(2), LOGICAL(4)

Сәйкесінше байт саны – 4, 1, 2, 4. Бірінші байт 0 (.FALSE), немесе 1 (.TRUE) мәнін қабылдайды. Қалған байттар– null.

5. Символды (мәтіндік) – CHARACTER, CHARACTER(n).

Символды тип үшін KIND түрі әрдайым 1-ге тең. Символды объектке берілетін байт саны сәйкесінше 1 немесе n. 1 n 32767.

Мәліметтерді инициализациялау және жариялау мысалдары

Бүтін типті мәліметтерді жариялау:

а) integer d1, d2

data d1, d2 /34, 100/ ! стандартты түрдегі бүтін типті d1 және d2 айнымалылар жарияланды және data операторымен ынтагерлік білдірді (инициированы);

б) integer(2) d1/4/, d2/5/ ! бүтін типті (KIND=2) d1, d2 айнымалылары жарияланды, бұл жерде :: бөлгішінің міндетті емес;

в) integer(1):: d1=4, d2=5 ! мұндай түрде жазылса :: бөлгіші болады;

г) integer, parameter:: m = 4,n = 5 ! атаулы константалары жарияланды;

д) integer, pointer:: p ! p сілтемесі – динамикалық айнымалы жарияланды;

integer, target:: k = 5 ! k адрес иесі жарияланды ( target атрибутымен);

p =>k ! адрес иесіне тіркелген сілтеме.

Нақты типті мәліметтерді жариялау

а) real d/123.5/, c/1.E-6/ ! стандартты түрдегі екі нақты типті d және c айнымалылары жарияланған;

б) real(8):: a = 2D0, b = 0.35D4, c ! a, b, c айнымалылары екіеселі дәлдікпен жарияланған;

в) integer, parameter:: c = 4;

real(c) a, b ! түрдің мәні атаулы c тұрақтысы ретінде жазылды;

г) real, pointer:: c, d ! c және d сілтемелерін жариялау;

real, target:: e=10 ! e адрес иесін жариялау және ынтагерлік ету (инициирование);

allocate(c) ! c айнымалы сілтемесіне жады бөлу ;

d =>e ! e адрес иесіне d сілтемесін тіркеу.

Комплексті типті мәліметтерді жариялау

а) complex:: C1, C2 = (10.5, 11.3) ! KIND = 4 стандартты түрдегі C1, C2 комплексті айнымалылары жарияланды;

б) complex (8):: C1=(10.5D0, -1.13D1), C2 ! KIND = 8 түрдегі C1, C2 комплексті айнымалылары жарияланды;

Логикалық мәліметтерді жариялау

а) logical g1, g2

data g1,g2 /.true., .false./ ! g1, g2 логикалық айнымалылары жарияланды және data операторына бастамашыылық етті (инициированы);

б) logical:: g1 = .true., g2 = .false.

Символды мәліметтерді жариялау

а) character(15):: st1=’example’, st2*20/’example_2’/ ! объявлены и инициированы две символьные переменные st1 длиной 15 символов и st2 длиной 20 символовұзындығы 15 символ st1 және ұзындығы 20 символ st2 екі символды айнысалылар жарияланып, бастамашылық етті;

б) character(*), parameter:: st = ’example’ ! * символы атаулы тұрақтыны табу үшін ұзындық есебіне қолданылады, бұл жағдайда ұзындық тұрақты символдарының санына тең;

в) character:: bell = ’\a’c –bell символды айнымалысы жарияланды, оған СИ-тұрақтысы тіркелген;