База ответов ИНТУИТ

Введение в программирование больших вычислительных задач на современном Фортране с использованием компиляторов Intel

<<- Назад к вопросам

Что можно сказать о следующих строках удачно скомпилированной программы ?
open(2,file='c:\data.txt',action='WRITE')  write(2,*) 10, 20, 50  rewind(2)
Выберите верные утверждения

(Ответ считается верным, если отмечены все правильные варианты ответов.)

Варианты ответа
файловый указатель перемещен на две записи назад
файл открыт в режиме прямого доступа
создано устройство В/В с номером 2, связанное с файлом C:\data.txt(Верный ответ)
файл C:\data.txt открыть в режиме только для записи(Верный ответ)
другие процессы могут работать с файлом в режиме "только запись"
файл открыт в режиме исключающем запись данных
файл открыт в режиме последовательного доступа(Верный ответ)
в файл C:\data.txt записаны целые числа(Верный ответ)
файловый указатель перемещен на начало первой записи(Верный ответ)
оператор open будет выполнен с ошибкой, файл должен существовать
Похожие вопросы
Что можно сказать о следующих строках удачно скомпилированной программы ?
  logical ex  inquire (file='F:\geom.inf', exist = ex)  if (ex) open(1,file='G:\copy.txt', action='write', form='binary')
Выберите верные утверждения
Что можно сказать о следующих строках удачно скомпилированной программы ?
write(1,"(i4)",rec=100) param  rewind(1)
Выберите верные утверждения
Что можно сказать о следующих строках удачно скомпилированной программы в среде Windows?
 open(8, asynchronous='YES', form='BINARY')  write(8,asynchronous='NO') A, B(:,:,10:1000,-1:90)  wait(2)  write(8,asynchronous='NO') C(:,10:1000:2,:,:,:,:)
Выберите верные утверждения
Что можно сказать о следующих строках удачно скомпилированной программы ?
  if (.NOT.(eof(1)) read(1) base  read(1) A  close(1,status='DELETE')
Выберите верные утверждения
Фрагмент программы преобразует файл vector.txt ^^^1^^^4^^^5^^^8^^^9^^^0^^^7 в файл spisok.dat с данными 0001000400050008000900000007? Расположите строки в верном порядке.
1)  read(1,"(A28)") ch2)  ch(k:k+2)='000'3)  write(1,"(A28)") ch4)  character ch*285)  open(1,file='C:\spisok.dat')6)  rewind(1)7)  end do8)  ires = RENAMEFILEQQ ('vector.txt','spisok.dat')9)  do k=1,28,4
Фрагмент программы преобразует файл vector.txt ^^^1^^^4^^^5^^^8^^^9^^^0^^^7 в файла spisok.dat с данными 0001000400050008000900000007.Введите номера строк, разделяя ; в порядке выполнения программы
1)  read(1,"(A4)",rec=k) ch2)  end do3)  character ch*44)  do k=1,75)  write(1,"(A4)",rec=k) ch6)  ch(1:3)='000'7)  open(1,file='vector.txt', access='direct', recl=4, form='formatted') 
Фрагмент программы преобразует файл vector.txt ^^^1^^^4^^^5^^^8^^^9^^^0^^^7 в файл spisok.dat с данными 0001000400050008000900000007.Введите номера строк, разделяя ; в порядке выполнения программы
1)  open(1,file='vector.txt', access='direct', recl=1, form='formatted') 2)  read(1,"(A)",rec=k) ch3)  do k=1,284)  character ch5)  end do6)  if (ch=='^') write(1,"(A)",rec=k) '0'7)  ires = RENAMEFILEQQ ('vector.txt','spisok.dat')
В операторе write(*,*) вместо второго символа "*" можно использовать
Для вывода на экран ^^^^^^^^^^54321 (^ - означает пробел) можно воспользоваться следующими операторами write.
Для вывода на экран ^^^^^^^^^^54321 (^ - означает пробел) можно воспользоваться следующими операторами write.