089 Өрнектiң мёнiн есептеу керек.

SUCC (ROUND (5/2)-PRED(3))

A) 0

B) 1

C) 2

D) -1

E)–2

{Дұрыс жауабы}=C

090 Паскаль тiлiнде сёйкес меншiктеу операторын жазу керек

Y=X⁵+COS(X²+1)

A) y:=sqr(sqr(x))*x+cos(sqr(x)+1);

B) y:=sqr(sqr(x))*x+cos(sqr(x))+1;

C) y:=sqr(sqr(x)*x+cos*sqr(x)+1;

D) y:=sqr(sqr(x))*x+cos(sqr(x+1);

E) y:=sqr(sqr(x))+cos*sqr(x)+1;

{Дұрыс жауабы}=A

091 Шартты операторын әолданып келтiрiлген функцияны есептеу керек

A) if x>0 and x<2 then y:=sqr(cos(x))

else y:=1-sin(sqr(x));

B) if(x>0)and (x<2) then y:=sqr(cos(x))

else y:=1-sin(sqr(x));

C) if (x>0)and(x<2) then y:=sqr(cos(x));

else y:=1-sin(sqr(x));

D) If (x>0 )and(x<2) then y:=cos(sqr(x))

else y:=1-sin(sqr(x));

E) If (x>0)and(x<2) then y:=sqr(cos(x))

else y:=1-sqr(sin(x));

{Дұрыс жауабы}=B

092 Келесi операторлар орындал№аннан кейiн айнымалының мёнiн аныәтау керек.

S:=0;I=0;

While i<5 do i:=i+1;

S:=S+1/i;

A) 0,25

B) 21/12

C) 0,2

D) 2,1

E) 217/60

{Дұрыс жауабы}=C

093 Келесi цикл операторының денесi ғанша рет орындалады.

k:=0;

for i:=1 to k + 3 do

k:=k+1;

A) 4

B) 3

C) 6

D) 5

E) 7

{Дұрыс жауабы}=B

094 Келесi баяндаулардың арасында дҢрыс вариантын кәрсету керек.

const n=50;

type

A) слово=packed array [0 .. n-1] of буква;

B) буква='a'..'z';

C) вектор=array[real] of integer;

D) цифры=array[true .. false] of (1,2,3,4);

E) матрица=array[1 .. 50] of integer;

{Дұрыс жауабы}=E

095 A [7,7] массивiнiң керi диагональда орналасған элементтерiнiң арасында№ы ең кiшi элементiн табу керек.

A) min:=a[1,1];

for i:=1 to 8 do

if a[i,8-j] <min then min:=a[i,8-i];

B) min:=a[1,8];

for i:=7 to 1do

if a[i,8-i] <min then:=a[i,8-i];

C) min:=a[8,1];

For j:=7 to 1 do

If:=a[8-j,j]<min then min:=a[8-j,j];

D) Min:=a[1,8];

For j:=7 down to 1 do

If a[8-j,j]<min then min:=a[8-j,j];

E) Min:=a[1,7];

For i:=1 to 7 do

If a[i,8-i]<min then min:=a[i,8-i];

{Дұрыс жауабы}=E

096 a[10,10] массивiнiң жҢп ба№аналарында№ы терiс элементтерiне осы элементтердiң квадраттарын меншiктеу керек.

A) for j:=1 to 5 do

for i:=1 to 10 do if a[i,2*j]<0 then a[i,2*j]:=a[i,2*j]*2;

B) for j:=2 to 10 do

for i:=1 to 10 do

if a[i,2*j]<0 then a[i,2*j]:=sqr(a[i,2*j]);

C) while j<=10 do

for i:=1 to 10 do

if a[i,j]<0 then a[i,j]:=sqr(a[i,j]);

D) for j:=1 to 5 do

for i:=1 to 10 do

if a[i,2*j]<0 then a[i,2*j]:=sqr(a[i,2*j]);

E) j:=2;

while j<=10 do

for i:=1 to 10 do

if a[i,j]<0 then a[i,j]:=sqr(a[i,j]);

{Дұрыс жауабы}=D

097 a[12,12] массивiнiң таә жолдарында№ы элементтерiнiң ең кiшi элементiн табу керек.

A) min:=a[1,1];

for i:=1 to 5 do

for j:=1 to 12 do

if a[2*i+1,j]<min then min:=a[2*i+1,j];

B) min:=a[1,1]; i:=1;

while i<=11 do

for j:=1 to 12 do

if a[i,j]<min then min:=a[i,j];

i:=i+2;

C) min:=a[1,1];

for i:=0 to 5 do

for j:=1 to 12 do

if a[2*i+1,j]<min then min:=a[2*i+1,j];

D) For i:=0 to 6 do

For j:=1 to 12 do

If A[2*i+1, j]<min then min: =A[2*i+1, j];

E) Min: =A[1,1] ;

For i:=0 to 6 do

For j:=1 to 12 do

If A [2*i-1, j] < min then min:=A[2*i-1, j] ;

{Дұрыс жауабы}=C

098 A [5,5] массив наәты элементтерден тҢрады. Осы мас-

сивтi баспа№а шы№ару керек (°рбiр жолда 5 элементтен)

A) For i:=1 to 5 do

For j:=1 to 5 do

Write (A[ i, j]:6:2);

B) For i:=1 to 5 do

For j:=1 to 5 do

Write (A[i , j]);

Writeln;

C) For i:=1 to 5 do

For j:=1 to 5 do

Writeln (A[ i, j]:6:2);

D) For i:=1 to 5 do

Begin

For j:=1 to 5 do

Write (A[ i, j]:6:2);

End;

E) For i:=1 to 5 do

Begin

For j:=1 to 5 do

Write (A[ i, j]:6:2);

Writeln;

End;

{Дұрыс жауабы}=E