МЕНЮ


Фестивали и конкурсы
Семинары
Издания
О МОДНТ
Приглашения
Поздравляем

НАУЧНЫЕ РАБОТЫ


  • Инновационный менеджмент
  • Инвестиции
  • ИГП
  • Земельное право
  • Журналистика
  • Жилищное право
  • Радиоэлектроника
  • Психология
  • Программирование и комп-ры
  • Предпринимательство
  • Право
  • Политология
  • Полиграфия
  • Педагогика
  • Оккультизм и уфология
  • Начертательная геометрия
  • Бухучет управленчучет
  • Биология
  • Бизнес-план
  • Безопасность жизнедеятельности
  • Банковское дело
  • АХД экпред финансы предприятий
  • Аудит
  • Ветеринария
  • Валютные отношения
  • Бухгалтерский учет и аудит
  • Ботаника и сельское хозяйство
  • Биржевое дело
  • Банковское дело
  • Астрономия
  • Архитектура
  • Арбитражный процесс
  • Безопасность жизнедеятельности
  • Административное право
  • Авиация и космонавтика
  • Кулинария
  • Наука и техника
  • Криминология
  • Криминалистика
  • Косметология
  • Коммуникации и связь
  • Кибернетика
  • Исторические личности
  • Информатика
  • Инвестиции
  • по Зоология
  • Журналистика
  • Карта сайта
  • Шпаргалки по Fortrany

    Шпаргалки по Fortrany

    Автоматические массивы

    В процедуре может быть задан локальный массив, размеры которого могут

    меняться при разных вызовах процедуры.

    Такие массивы, так же как и локальные строки переменной длины (разд. 10.4),

    относятся к автоматическим объектам.

    Рекурсивные процедуры

    Фортран поддерживает рекурсивные вызовы внешних, модульных и внутренних

    процедур.

    Процедура называется рекурсивной, если она обращается сама к себе или

    вызывает другую процедуру, которая, в свою очередь,

    вызывает первую процедуру. В первом случае рекурсия называется прямой, во

    втором - косвенной.

    Оператор объявления рекурсивной процедуры должен предваряться префиксом

    RECURSIVE. Внутри рекурсивной

    процедуры интерфейс к этой процедуре является явным (см. разд. 16.4.3).

    Пример. Разработать подпрограмму subst, которая в данной строке заменяет

    все вхождения подстроки sub1

    на подстроку sub2. Так, если дана строка 'abc1abc2abc3' и sub1 = 'abc', a

    sub2 = ' d', то результатом должна быть строка ' dl d2 d3'.

    program stgo

    character(len = 20) :: st = 'abc1abc2abc3'

    call subst(st, 'abc', d')

    ! subst содержит прямую

    write(*, *) st

    ! рекурсию d1 d2 d3

    end

    recursive subroutine subst(st, subl, sub2)

    character(len = *) st, sub1, sub2

    ! Длина каждой строки определяется

    integer ip ! длиной соответствующего

    ip = index(st, sub1)

    ! фактического параметра

    if(ip > 0) then

    st = st(:ip - 1) // sub2 // st(ip + len(subl):)

    call subst(st, subl, sub2) ! Рекурсивный вызов подпрограммы

    endif

    ! выполняется до тех пор,

    пока

    end ! не выполнены все замены subl на sub2

    Если функция содержит прямую рекурсии, то есть непосредственно вызывает

    сама себя, результату необходимо дать имя,

    отличное от имени Функции. Это выполняется путем добавления в заголовок

    функции предложения RESULT.

    В случае косвенной рекурсии имя результирующей пе-Ременнрд и имя функции

    могут совпадать.

    Символьные типы данных

    Символьный тип данных позволяет задать объект, состоящий из

    последовательности символов.

    Такую последовательность мы будем строкой. Символьный тип данных могут

    иметь объекты: переменные,

    константы и функции. Символьный тип является встроенным типом данных для

    него существует одна

    встроенная операция - операция конкатенации (обозначается двумя слешами

    //), позволяющая выполнять

    объединение отдельных строк или подстрок символов. Объявление

    символьных.данных выполняется

    оператором CHARACTER, например:

    character :: ch = 'а' ! Символьная переменная длиной в 1 символ

    character(len = 20) st ! Символьная переменная из 20 символов

    st = 'Example' ! Присвоим значение символьной переменной

    st == st // '_' // ch ! Возвращает: Example_a

    Оператор CHARACTER содержит в скобках данные о длине символьного объекта.

    Если длина не задана,

    то по умолчанию она принимается равной единице.


    Приглашения

    09.12.2013 - 16.12.2013

    Международный конкурс хореографического искусства в рамках Международного фестиваля искусств «РОЖДЕСТВЕНСКАЯ АНДОРРА»

    09.12.2013 - 16.12.2013

    Международный конкурс хорового искусства в АНДОРРЕ «РОЖДЕСТВЕНСКАЯ АНДОРРА»




    Copyright © 2012 г.
    При использовании материалов - ссылка на сайт обязательна.