Для организации совместного доступа к файлу используется спецификатор

Правильный ответ:

• # Чему равно значение переменной param в конце работы фрагмента программы? implicit none integer :: param=1 integer(2) scalar associate (param=>10) scalar=param+1 end associate param=param+1
• # Функция протабулирована на отрезке от до с шагом . Сколько значений функции попадет в область и ?
• # Сколько раз переменная k увеличится на 2? k = 1 do select case (k) case (5:16,18:19) k=k+2 case (1:4) k=k+1 case (20) exit case (17) k=k-7 end select end do
• # Укажите верные объявления процедур
• # Объявлена подпрограмма subroutine InitST(name, stat, param, index, vector) character(*) name logical stat real param integer index complex vector(1000) ... end subroutine InitST Какие вызовы подпрограммы являются верными, если complex Z(1000)