74. 2.5.2. Программы линейной структуры. Операторы ветвления.

75. Операторы цикла

0. 1. Какой оператор служит в Turbo Pascal для задания цикла с постусловием?

   0. 1) if;

   1. 2) for;

   2. 3) while;

   3. 4) repeat/until.

Ответ: 4.

0. 2. Какой тип цикла не используется для вычисления суммы ряда с заданной точностью?

1. 0. 1) цикл с предусловием (while);

   1. 2) цикл с постусловием (repeat/until);

   2. 3) цикл с заданным числом повторений (for).

Ответ: 3.

3. Какое значение примет переменная s после завершения цикла?

x:=0; y:=20; s:=0

while (x<=y) and (x<=s) do

begin

y:= y div 2;

s:=sqr(y);

x:=x+1;

end

0. 1) 1;

1. 2) 2;

2. 3) 4;

3. 4) 25.

Ответ: 3.

4. Какое значение примет переменная с после завершения цикла?

s:=1; k:=2;c:=2;

for i:=1 to 10 do

if s<>(i mod (k+1)) then c:=c+i

0. 1) 30;

1. 2) 37;

2. 3) 35;

3. 4) 27.

Ответ: 3.

5. Какое условие соответствует данному фрагменту программы?

k:=0;

for j:=1 to m do

if (a[j]>0) and (j mod 2=0) then k:=k+1

0. 1) подсчитать количество положительных элементов массива a[m];

1. 2) подсчитать количество положительных элементов массива a[m], стоящих на четных местах;

2. 3) подсчитать количество положительных и четных элементов массива a[m];

3. 4) подсчитать количество положительных и нечетных элементов массива a[m].

Ответ: 2.

6. Какое значение примет переменная k после завершения цикла?

k:=0

for i:=1 to n do

for j:=1 to m do

k:=k+1;

0. 1) m;

1. 2) m+n;

2. 3) m*n;

3. 4) n.

Ответ: 3.

0. 7. Сколько раз выполниться данный цикл?

x:=2;

while x<=30 do

begin y:=sqr(x);

x:=y div 2;

end

1. 2 раза;

2. 4 раза;

3. бесконечное число раз;

4. 6 раз.

Ответ: 3.

0. 8. Сколько раз выполниться цикл и какое значение примет переменная b?

a:=2; b:=25; c:=16; d:=b*3;

while (d div 3) >= sqr(a) do

begin d:=d-c;

c:=c-(c mod a);

end;

b:=b-(c+d)

0. 1) 5 раз, b=-5;

1. 2) 3 раза, b=6;

2. 3) 2 раза, b=14;

3. 4) 3 раза, b=7.

Ответ: 2.

0. 9. Сколько раз выполниться данный цикл?

x:=0;

repeat

y:=x*pi;

z:=sin(y);

x:=x+1;

until x>=1

0. 1) 1 раз;

1. 2) бесконечное число раз;

2. 3) 2 раза;

3. 4) не выполниться ни разу.

Ответ: 1.

0. 10. Какой фрагмент Pascal-программы неверно описывает процесс вычисления переменной с?

0. 1) If (x-y)>=1 then c:=exp(1/3*(x+y))+sin(x) ;

If (x-y)>-3 and (x-y)<0 then c:=ln(sqr(x+y))+cos(x) else

c:=exp(x+y);

0. 2) If (x-y)>=1 then c:=exp(1/3*(x+y))+sin(x) else

If (x-y)>-3 and (x-y)<0 then c:=ln(sqr(x+y))+cos(x) else

c:=exp(x+y);

0. 3) If (x-y)>=1 then c:=exp(1/3*(x+y))+sin(x) else

If (x-y)>-3 and (x-y)<0 then c:=ln(sqr(x+y))+cos(x) ;

c:=exp(x+y);

0. 4) If (x-y)>=1 then c:=exp(1/3*(x+y))+sin(x) ;

If (x-y)>-3 and (x-y)<0 then c:=ln(sqr(x+y))+cos(x) ;

If (x-y)>=0 and (x-y)<1 c:=exp(x+y).

Ответ: 3.

0. 11. Какой оператор надо вставить в данный фрагмент программы, чтобы вычислить сумму элементов на главной и побочной диагоналях двумерного массива a[n,n]?

s:=0;

for i:=1 to n do

for j:=1 to n do

…….

s:=s+ a[i,j];

0. 1) if (i=j) and (j=n+1-i ) then;

1. 2) if (i<=j) or (i>=j ) then;

2. 3) if (i=j) or (j=n+1-i) then;

3. 4) if (i=j) or (j=n-i) then.

Ответ: 3.

0. 12. Какой формуле соответствует приведенное выражение?

Y:=exp(4*ln(x+a))*(1+sin(x+a)/cos(x+a))/(ln(sqrt(x))/ln(a))

0. 1)

1. 2)

2. 3)

3. 4)

Ответ: 1.

0. 13. Какой фрагмент Pascal-программы служит для вычисления переменной у?

0. 1) y:=(sin(x+a)^3)/(1+sin(x+a+b)/cos(x+a+b));

1. 2) y:=(sin(x+a)^3)/(1+tan(x+a+b));

2. 3) y:=exp(3*ln(sin(x+a))/(1+sin(x+a+b)/cos(x+a+b));

3. 4) y:=exp(ln(3*sin(x+a)))/(1+sin(x+a+b)/cos(x+a+b)).

Ответ: 3.

0. 14. Какой из приведенных ниже фрагментов служит для вывода двумерного целочисленного массива a[3,4] в общепринятой (матричной) форме?

   0. 1) for i:=1 to 3 do

begin for j:=1 to 4 do

write (a[i,j]:5);

writeln;

end;

0. 2) for i:=1 to 3 do

begin for j:=1 to 4 do

readln (a[i,j]:5);

read;

end;

0. 3) for i:=1 to 3 do

for j:=1 to 4 do

write (a[i,j]:5);

writeln;

0. 4) for i:=1 to 3 do

for j:=1 to 4 do

begin write (a[i,j]:5);

writeln;

end.

Ответ: 1.

0. 15. Какой оператор надо вставить в данный фрагмент программы, чтобы вычислить сумму положительных элементов, стоящих над главной диагональю двумерного массива a[n,n]?

s:=0;

for i:=1 to n do

…….

if a[i,j]>0 then s:=s+ a[i,j]

0. 1) for j:=1 to n do;

1. 2) for j:=i+1 to n do;

2. 3) for j:=i to n do;

3. 4) for j:=n downto i do.

Ответ: 2.