Документ взят из кэша поисковой машины. Адрес
оригинального документа
: http://www.atnf.csiro.au/computing/software/gipsy/sheltran/IF.html
Дата изменения: Unknown Дата индексирования: Fri Jan 16 20:38:51 2009 Кодировка: Поисковые слова: images |
IF <logical expression> THEN <statement>... [ ELSEIF <logical expression> THEN <statement>... ] [ ELSE <statement>... ] CIF
When the value is .FALSE., control is passed to the next ELSEIF and this <logical expression> is evaluated.
When the IF and all ELSEIF clauses have a value which is .FALSE., control is passed to the statement following the corresponding ELSE or CIF.
IF KEY.EQ.K1 THEN KODE=1 ELSEIF KEY.EQ.K2 THEN KODE=2 ELSE KODE=-1 CIF IF X.LT.0 THEN X=999.0 CIF