Что можно сказать о следующих строках удачно скомпилированной программы ?

write(1,"(i4)",rec=100) param  rewind(1)

Выберите верные утверждения

Что можно сказать о следующих строках удачно скомпилированной программы ?

open(2,file='c:\data.txt',action='WRITE')  write(2,*) 10, 20, 50  rewind(2)

Выберите верные утверждения

Что можно сказать о следующих строках удачно скомпилированной программы ?

  logical ex  inquire (file='F:\geom.inf', exist = ex)  if (ex) open(1,file='G:\copy.txt', action='write', form='binary')

Выберите верные утверждения

Что можно сказать о следующих строках удачно скомпилированной программы в среде 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')

Выберите верные утверждения

Чему равно значение переменной param в конце работы фрагмента программы?

implicit noneinteger :: param=1integer(2) scalar  associate (param=>10)    scalar=param+1    param=param+1  end associate param=param+1

Чему равно значение переменной param в конце работы фрагмента программы?

implicit noneinteger :: param=1integer(2) scalar  associate (param=>10)    scalar=param+1  end associate param=param+1

Чему равно значение переменной param в конце работы фрагмента программы?

implicit noneinteger paraminteger(2) scalar  associate (sparam=>10)    scalar=sparam+1    param=param+1  end associate param=param+1

Какое значение содержит ссылка ptr1 в конце работы фрагмента программы?

    integer, pointer :: ptr1, ptr2  integer, target :: value = 300, param = 500  value=value*10  ptr1=>param  ptr2=>value  ptr1=ptr2+1  param=param*10 

Фрагмент программы преобразует файл 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

Чему равно значение переменной betta? Переменные tk, param, s0, betta – целые двухбайтовые.

param=5 + 9/4 + mod(9,4)param=-param/2s0=2**3**2tk=s0/parambetta=sign(s0,tk)