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

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

Чему равно значение переменной 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 

Чему равно значение переменной p? Переменные k, m, n, p – целые двухбайтовые.

	m=2**7-1k=m/2**2n=k+mod(k,10)p=k+n/2

Чему равно значение переменной alfa?Переменные ap, bp, sp, alfa – целые восьмибайтовые.

ap=mod(22,5)bp=2-mod(7,4)bp=ap+sign(ap,bp)sp=dim(ap,bp)alfa=ap+bp+sp

Объявлена подпрограмма

recursive subroutine proc(param, p, A, B, C)    real param    logical p    real A(:), B(:), C(:)    ...  end subroutine proc

Какие вызовы подпрограммы являются верными, если real X(1000), Y(1000), Z(1000)

Чему равно значение переменной sigma?Переменные q1, q2, tetta, sigma – целые однобайтовые.

  q1=101q2=mod(q1,3)**7+1tetta=q2+100sigma=max(tetta,q2,q1)+min(q2,q1)

Объявлена подпрограмма

  subroutine InitST(name, stat, param, index, vector)    character(*) name    logical stat    real param    integer index    complex vector(1000)    ...  end subroutine InitST

Какие вызовы подпрограммы являются верными, если complex Z(1000)

Чему равно значение переменной pos в конце фрагмента программы? Переменные a, b, c, pos - целые четырехбайтовые.

a=2;  b=3;  c=5b=b/2*2c=b**bpos=a+b+c/3+1+2**bpos=-pos