Шпаргалки по Fortran — страница 2

  • Просмотров 6351
  • Скачиваний 466
  • Размер файла 28
    Кб

конструкция DO [имя:] DO БОК END DO (имя] задает бесконечный цикл. Поэтому такой цикл должен содержать по край­ней мере один оператор, например EXIT [имя], обеспечивающий выход из этого цикла. Имя конструкции, если оно присутствует, должно появляться в операторах DO и END DO. Рекомендуемая форма DO-цикла с параметром: [имя:] DO dovar = start, stop [, inc] БОК END DO [имя] dovar - целая переменная, называемая переменной цикла или параметром цикла; start, stop - целые

скалярные выражения, задающие диапазон изменения dovar; inc - целое скалярное выражение, задающее лаг изменения dovar. Значение inc не может быть равным нулю. Если параметр inc отсутствует, то он принимается равным единице. Рекомендуемая форма DO WHILE-цикла: [имя] DO WHILE(ЛB)? БОК END DO [имя] Если DO WHILE-цикл не содержит операторов прерывания цикла, БОК выполняется до тех пор, пока истинно скалярное ЛВ. DO-цикл, DO-цикл с параметром и DO WHILE-цикл могут быть

рваны операторами GOTO, EXIT и CYCLE, а также в результате выполнения оператора RETURN, обеспечивающего возврат из подпрограммы. Оператор EXIT [имя} передает управление из DO-конструкции на первый следующий за kohi рукцией выполняемый оператор. Если имя опущено, то EXIT обеспечив; выход из текущего цикла, в противном случае EXIT обеспечивает выход цикла, имя которого присутствует в операторе EXIT. Оператор CYCLE [имя] передает управление на начало

DO-конструкции. При этом оператор расположенные между CYCLE и оператором END DO конца цикла, не выполняются. Если имя опущено, то CYCLE обеспечивает переход на начало текущего цикла, в противном случае CYCLE обеспечивает переход на начало цикла, имя которого присутствует в операторе CYCLE. Условный логический оператор IF IF(ЛВ) оператор Если истинно ЛВ, то выполняется оператор, в противном случае управ­ление передается на последующий оператор

программы. Конструкция IF THEN ENDIF [имя-.]IF(ЛВ) THEN БОК END IF [имя] БОК выполняется, если истинно ЛВ. Если присутствует имя конструк­ции, то оно должно быть и в первом и в последнем операторе конструкции, например: swap: if(x < у) then hold = х; х = у; у = hold end if swap Замечание. Если БОК содержит один оператор, то лучше использовать оператор IF(ЛВ) оператор Конструкция IF THEN ELSE ENDIF [имя:] IF(ЛВ) THEN БОК1 ELSE [имя] БОК1 END IF [имя] В случае истинности ЛВ выполняется БОК1 и

выполняется БОК2, если ЛВ ложно. Имя конструкции, если оно задано, должно обязательно присут­ствовать и перед IF, и после END IF. Конструкция IF THEN ELSE IF [имя:] IF(ЛВ) THEN БОК1 ELSE IF(ЛВ2) THEN [имя] БОК2 … [ELSE [имя] БОКn END IF [имя] В случае истинности ЛВ1 выполняется БОК1 и управление передается на следующий за END IF оператор. Если ЛВ1 ложно, то управление пере­дается на следующий ELSE IF, то есть вычисляется значение ЛВ2 и, если оно истинно, то выполняется