B) тармақталушы c) сызықтық
D) көмекші
E) дұрыс жауабы жоқ
178. Программа бөлігі орындалғаннан кейін айнымалы s –тің мәні неше болады:
int i,s=1;;
for(i=1;i<5;i++);
s*=i;
cout<<"s="<<s;
A) 5
B)24
C)14
D)6
E)120
179. Келесі фрагментте қандай алгоритм жазылған
int s=0;
for(int i=1;i<10;i++)
if (a[i]%2==0) s+=a[i];
A) массивтің барлық элементтерінің қосындысы
B)массивтің оң элементттерінің қосындысы
C) массивтің жұп элементтерінің қосындысы
D)массивтің тақ элементтерінің қосындысы
E массивтің теріс элементтерінің қосындысы
180. Программа нәтижесінде қандай жауап аламыз
int i,s=0,a[10]={1, 2 ,3, 4, 5, 6, 7, 8, 9, 10};
for(i=1;i<10;i++)
if (i%2==0)s+=a[i];
A) 25
B)24
C)30
D)20
E)15
181. Программа нәтижесі не береді
int i,j,k,m,p, a[5]={4,105,11,14,5};
for(i=1;i<=4;i++) {
m=a[i] ;k=i;
for(j=i;j<=5;j++){
if (a[j]<m) {m=a[j],k=j;} }
p=a[i];a[i]=a[k];a[k]=p;
for(i=0;i<5;i++)
cout<<a[i]<<" "; }
A) 4,105,11,14,5
B) 105,14,11,5,4
C) 4,11,105,14,5
D) 1,2,3,4,5
E) 4,5,11,14 ,105
182. Төмендегі программа нәтижесі не береді?
int f1(int *pa,int t)
{
int i,sum=0;
for(i=1;i<=t;i++)
sum+=*(pa+1);
return(sum);
}
int main( ) {
int i,s, b[10]={5,6,14,12,30,5,9,7,15,5};
clrscr() ;
s=f1(b,10) ;
printf("s=%d",s);
A) 30
B)60
C)15
D)5
E)14
183. Төмендегі программа нәтижесі не береді?
int i,s,*pa, b[10]={5,6,14,12,30,5,9,7,15,5};
clrscr() ;
pa=b;
int s=0;
for(i=1;i<=10;i++)
s+=*(pa+1);
printf("s=%d",s);
A) 30
B)15
C)60
D)5
E)14
184. A[17] массивінің жұп позицияда орналасқан ең үлкен элементін анықтаудың дұрыс вариантын көрсету керек.
A) max=a[0];
for (i=2;i<=8;i++)
if(a[2*i]>max) max=a[2*i];
B) ) max=a[1];
for (i=2;i<=17;i++)
if(a[i]>max) max=a[i];
C) ) max=a[0];
for (i=2;i<=8;i++)
if(a[2*i]>max) max=a[i];
D) ) max=a[0];
for (i=2;i<=17;i++)
if(a[2*i]>max) max=a[2*i];
E) ) max=a[2];
for (i=2;i<=8;i++)
if(a[i]>max) max=a[2*i];
185. Төмендегі қолданушы функциясын пайдаланудың дұрыс вариантын көрсетіңіз:
int f1(int *pa,int t)
{
int i,sum=0;
for(i=1;i<=t;i++)
sum+=*(pa+1);
return(sum);
}
A) int i,s,* b[10]={5,6,14,12,30,5,9,7,15,5};
s=f1(b,10) ;
B) int i,s, b[10]={5,6,14,12,30,5,9,7,15,5};
s=f1(*b,10) ;
C) int i,s, b[10]={5,6,14,12,30,5,9,7,15,5};
s=f1(b,10) ;
D) int i,s*, b[10]={5,6,14,12,30,5,9,7,15,5};
s=f1(b,10) ;
E) int i,s, b[10]={5,6,14,12,30,5,9,7,15,5};
s=f1(b*,10) ;
186. A[10,10] массивінің жұп бағаналардағы теріс элементерді (сол элементтердің) квадраттарымен ауыстыру керек
A) ) for(j=0;j<5;j++)
for(i=0;i<10;i++)
if (a[i][j]<0) a[i][j]=pow(a[i][j],2) ;
B) ) for(j=0;j<10;j++)
for(i=0;i<10;i++)
if (a[i][2*j]<0) a[i][2*j]=pow(a[i][2*j],2) ;
C) ) for(j=0;j<5;j++)
for(i=0;i<10;i++)
if (a[i][j]<0) a[i][2*j]=pow(a[i][2*j],2) ;
D) for(j=0;j<5;j++)
for(i=0;i<10;i++)
if (a[i][2*j]<0) a[i][2*j]=pow(a[i][j],2) ;
E) ) for(j=0;j<5;j++)
for(i=0;i<10;i++)
if (a[i][2*j]<0) a[i][2*j]=pow(a[i][2*j],2) ;
187. A[5,5] массивтің бас және кері диоганалдағы элементтерді квадраттаудың дұрыс фрагментін көрсету керек.
A) for(i=0;i<=4;i++)
{a[i][i]=pow(a[i][i],2); a[i][5-i]=pow(a[i][5-i],2);} ;
B) for(i=0;i<=4;i++)
{a[i][i]=pow(a[i][i],2); a[i][4-i]=pow(a[i][4-i],2);} ;
C) for(i=0;i<=4;i++)
{a[i][i*2]=pow(a[i][i*2],2); a[i][4-i]=pow(a[i][4-i],2);} ;
D) for(i=0;i<=4;i++)
{a[i][j]=pow(a[i][j],2); a[i][4-j]=pow(a[i][4-j],2);} ;
E) for(i=0;i<=4;i++)
{a[j][i]=pow(a[j][i],2); a[j][4-i]=pow(a[j][4-i],2);} ;
188. Келесі программа орындалғанда
void f1(int x,int y);
int main(int argc, char* argv[])
{
int c,d;
cin>>c>>d;
f1(c,d);
getch() ;
return 0;
}
void f1(int x,int y)
{ int z;
z=x;x=y;y=z;
cout<<"x="<<x<<"y="<<y;
return ;
}
Баспаға не шығады, егер енгізілетін сандар 6 және 5 болса
A) x=6 y=5
B) x=6 y=6
C) x=5 y=5
D)x=5 y=6
E)x=5 x=6
189. Факториалды есептейтін функцияның дұрыс вариантын таңдау керек.
A) int f1(int x)
{int f=0;
for (int i=1;i<=x; i++)
f*=i;
return (f);
}
B) int f1(int x)
{ float f=1;
for (int i=1;i<=x; i++)
f*=i;
return (f);
}
C) int f1( float x)
{int f=1;
for (int i=1;i<=x; i++)
f*=i;
return (f);
}
D) int f1(int x)
{int f=1;
for (int i=1;i<=x; i++)
f*=i;
return (f);
}
E) void f1(int x)
{int f=1;
for (int i=1;i<=x; i++)
f*=i;
return (f);
}
190. Келесі программа орындалғанда баспаға не шығады?
int main(int argc, char* argv[]) {
int i,j; int b[5];
int l=0;
for(i=0;i<=5;i++)
if (i%2==1) { b[l]=pow(i,2) ; l++;}
for(i=0;i<=2;i++)
cout<<b[i]<<" ";
getch();
return 0;
}
A)1 2 3
B)1 9 25
C)25 16 9 4 1
D)3 2 1
E)1 4 9 16 25
191.fp=fopen(name, mode) мұндағы name-файлдың адресін көрсететін аты, mode-файл қандай режімде қолданылатынын көрсететін параметр. Файлды оқу үшін ашуға(файл бұрын ашылған болуы тиіс) қандай параметр қолданылады?
A) «r»
B) «w»
C) «r+»
D) «w+»
E) «a»
192. fp=fopen(name, mode) мұндағы name-файлдың адресін көрсететін аты, mode-файл қандай режімде қолданылатынын көрсететін параметр. Файл соңына мәлімет қосып жазу үшін оны ашуға қандай параметр қолданылады?
A) «r»
B) «w»
C) «r+»
D) «w+»
E) «a»
193. fp=fopen(name, mode) мұндағы name-файлдың адресін көрсететін аты, mode-файл қандай режімде қолданылатынын көрсететін параметр. Бос файлды информация жазу үшін ашуға қандай параметр қолданылады?
A) «r»
B) «w»
C) «r+»
D) «w+»
E) «a»
194. fp=fopen(name, mode) мұндағы name-файлдың адресін көрсететін аты, mode-файл қандай режімде қолданылатынын көрсететін параметр. Файлдан информация оқу және оған информация жазу үшін ашуға қандай параметр қолданылады?
A) «r»
B) «w»
C) «r+»
D) «w+»
E) «a»
195. fp=fopen(name, mode) мұндағы name-файлдың адресін көрсететін аты, mode-файл қандай режімде қолданылатынын көрсететін параметр бос файлдан информация оқу және оған мәлімет жазу үшін файл (бұрын файл болса,ол өшіріледі) ашуға қандай параметр қолданылады?
A) «r»
B) «w»
C) «r+»
D) «w+»
E) «a»
196. Басы, соңы қандай символдың көмегімен белгіленеді
A) тікбұрыш
B) шеңбер
C) ромб
D) эллипс
E) параллелограмм
197.
өрнегінің дұрыс жазылған нұсқасы
A)
B)
C)
D)
E)
198. Процедураны хабарлайтын қызметші
A) TYPE
B) ATAУ
C) END
D) FUNCTION
E) PROCEDURE
199. TRUNC(5.8)тең
A) 5
B) 6
C) 5.5
D) 5.8
E) 0.8
200. Жолдық өрнекте символды жою функциясы
A) DELETE
B) POS
C) INSERT
D) COPY
E) LENGTH
201. Функцияны хабарлайтын қызметші сөз
A) CONST
B) FUNCTION
C) TYPE
D) PROCEDURE
E) END
202. Келесі есепті шешудің дұрыс жауабын көрсетіңіз: экран центрінде көлденең сызық сызатын программа құрыңыз.
A) Line (0, GetMaxX,GetMaxY,0)
B) Line (GetMaxX, GetMaxY, GetMaxX,GetMaxY)
C) Line (0,Round( GetMaxY/2), GetMaxX, Round(GetMaxY/2))
D) Line (0, GetMaxY,GetMaxX,0)
E) Line (0, Round(GetMaxX/2), GetMaxY,0)
203. Жазба типінің сипатталуы
A) тип аты = ARRAY OF өрістер тізімі
B) тип аты = WITH OF өрістер тізімі
C) тип аты = RECORD өрістер тізімі END
D) тип аты = WRITE OF өрістер тізімі
E) тип аты = SET OF базалық тип
204. Көрсеткіш мәні болып табылады
A) көрсеткіштер
B) айнымалылар
C) массивтер
D) айнымалылар адрестері
E) матрицалар
205. 14 MOD 4 нәтиже қандай
A) 1
B) 3
C) 2
D) 4
E) -4
206. Фон-түс бояулар процедурасы
A) Color
B) ReadKEY
C) TextColor
D) WhereX
E) TextBackground
207. Смволдар түсін бояу процедурасы
A) TextColor
B) Color
C) ReadKEY
D) WhereX
E) TextBackground
208. Кестеде бір өлшемді массивтің мәндері көрсетілген дұрыс нәтижелерін анықтаңыз
FOR I:=1 TO 10 DO
A[I]:=A[11-I];
I |
1 |
2 |
3 |
4 |
5 |
6 |
7 |
8 |
9 |
10 |
A(I) |
14 |
12 |
13 |
14 |
15 |
16 |
17 |
18 |
19 |
20 |
A) 20,19,18,17,16,15,17,18,19,15
B) 20,19,18,17,16,15,14,13,12,14
C) 20,19,18,17,16,16,17,18,19,20
D) 14,12,13,14,15,16,17,18,19,20
E) 10,8,9,7,6,5,4,3,2,1
209. Егерде А массивінің элементтері(4,105,11,14,5) белгілі сандар болса, онда программа баспаға шығаратын сандары
FOR I:=1 TO 4 DO
BEGIN
M:=A[I]; K:=I;
FOR J:=I TO 5 DO
IF A[J]<M THEN begin M:=A[J];K:=J; end;
P:=A[I];A[I]:=A[K];A[K]:=P
END;
FOR I:=I TO 5 DO
WRITE(A[I]);
A) 4,105,11,14,5
B) 105,14,11,5,4
C) 4,11,105,14,5
D) 1,2,3,4,5
E) 4,5,11,14 ,105
210. Матрицаның тақ бағандарында орналасқан оң жұп элементтердің қосындысын есептеудің процедурасын сипаттайтын программаның дұрыс фрагментін көрсетіңіз.
A) Procedure sum(x:mas;S:integer);
Begin
S:=0;
For i:=1 to n do
For j:= 1 to n do
If j mod 2< > 0 then
If (x[i,j] > 0) and (x[i,j] mod 2=0) then
S:=S+x[i,j];
End;
B) Procedure sum(x:mas;var S:integer);
Begin
S:=0
For i:=1 to n do
For j:= 1 to n do
If j mod 2<>0 then
If (x[j,i]>0) and (x[j,i] mod 2=0) then
S:=S+1;
End;
C) Procedure sum(x:mas;var S:integer);
Begin
S:=0
For i:=1 to n do
For j:= 1 to n do
If j mod 2<>0 then
If (x[i,j]>0) and (x[i,j] mod 2=0) then
S:=S+x[i,j];
End;
D) Procedure sum(x:mas):var S:integer;
Begin
S:=0
For i:=1 to n do
For j:= 1 to n do
If j mod 2<>0 then
If (x[i,j]>0) and (x[i,j] mod 2=0) then
S:=S+x[i,j];
End;
E) Procedure sum(x:mas;var S:integer);
Begin
S:=0
For i:=1 to n do
For j:= 1 to n do
If j mod 2<>0 then
If (x[i,j]>0) and (x[i,j] mod 2=0) then
S:=x[i,j];
End;
211. Келесі есепті шығарудың дұрыс жауабын белгілеңіз: сол жақ жоғарғы бұрышының координаталары (50,40),ал оң жақ төменгі бұрышының координаталары (250,120) болатын боялған тік төртбұрышты сызу сызыңыз.
A) Bar(40,50,250,120)
B) Rectangle(50,40,250,120)
C) Bar(50,40,250,120)
D) Bar(50,40,120,250)
E) Bar(50,120,40,250)
212. Бос жиын -
A) бос жиын деген болмайды
B) бұл бір типтегі компоненттерден тұратын берілгендер құрылымы
C) символдар тізбегі
D) тек қана нөл санынан тұратын жиын
E) элементтері жоқ жиын
213. Жиындар типінің сипатталуы
A) тип аты = SET OF базалық тип
B) тип аты = WITH OF өрістер тізімі
C) тип аты = ARRAY OF өрістер тізімі
D) тип аты = RECORD өрістер тізімі END
E) тип аты = WRITE OF өрістер тізімі
214. Программаның келесі фрагменті баспаға шығады
Var
x,y:^integer;
begin
new(x); x^:=15; y:=x; write(y^);write(x^+10);
Dispose(x);
End;
A) y^25
B) 15 25
C) x 25
D) 15 x^+10
E) y^ x^+10
215. F файлынан берілгендерді оқу поцедурасы
A) Read(f, айнымалының тізімі)
B) Reset(f, айнымалының тізімі)
C) Write(f, айнымалының тізімі)
D) End
E) Rewrite (f, айнымалының тізімі)
216. PROGRAM a7
VAR X,Y:INTEGER;
BEGIN
X:=3;
REPEAT
Y:=X/3;
WRITE(Y);
X:=X+3;
UNTIL X>6;
END;
Программа нәтижесі
A) 2
B) 3
C) 3;6
D) 1
E) 1;2
217. A[2,2] массивінің жұп жолдарында орналасқан элементтерінің арасындағы ең үлкен элементін табу керек.
A) MAX:=A[2,1];
FOR I:=2 TO 6 DO
FOR J:=1 TO 12 DO
IF A[2*I,J]>MAX THEN MAX:=A[2*I,J];
B) MAX:=A[2,1]; I:=2;
WHILE I<12 DO
BEGIN
FOR J:=1 TO 12 DO
IF A[I,J]>MAX THEN MAX:=A[I,J];
I:=I+2
END;
C) MAX:=A[2,1];
I:=2;
WHILE I<=12 DO
FOR J:=1 TO 12 DO
IF A[I,J]>MAX THEN MAX:=A[I,J];
D) MAX:=A[2,1];
FOR I:=1 TO 6 DO
FOR J:=1 TO 12 DO
IF A[2*I,J]>MAX THEN MAX:=A[2*I,J];
E) MAX:=A[2,1];
FOR I:=1 TO 6 DO
FOR J:=1 TO 12 DO
IF A[2+I,J]>MAX THEN MAX:=A[2+I,J];
218. Программаның келесі фрагменті баспаға шығады
Type t=array [1..n] of integer;
Var
b:^t;
begin
new(b);
read (b^[1]); k:=b^[1];
for i:=2 to n do
begin
read (b^[i]);
if b^[i] < k then k:=b^[i]
end;
writeln (b^[k]);
end.
A) b1, b2,…,bn сандарының ішіндегі ең үлкенін баспаға шығарады
B) b1, b2,…,bn сандарының ішіндегі ең үлкенін нөміріне тең b[k] санын баспаға шығарады
C) b^[k] санының адресін баспаға шығарады
D) b1, b2,…,bn сандарының ішіндегі ең кішісінің нөміріне тек b[k] санын баспаға шығарады
E) b1, b2,…,bn сандарының ішіндегі ең кішісін баспаға шығарады
219. PROGRAM a18;
CONST X=-0.5;
VAR Z: REAL;
BEGIN
IF (X>-1) AND (X<=0) THEN Z:=SQR(X)
ELSE Z:=11.1;
WRITE(Z:4:2)
END.
A) 2.5
B) 11.1
C) 1.11
D)-0.5
E) 0.25
220. N бүтін сандардан тұратын тізімді құрастыратын программа фрагментін таңда. Типтелген көресеткіш келесідей хабарланады.
Type
Tp=^posl;
Posl=record
A:integer;
Next:tp;
End;
Var p,g:tp;i:integer;
A) p:=nil;
for i:=1 to n do
begin
read(g^.a);g^.next=p; p:=g;
end;
B) p:=nil;
for i:=1 to n do
begin
read(g^.a);
C) p:=nil;
for i:=1 to n do
begin
new(g);
read(g^.a);g^.next=p; p:=g;
end;
D) p:=nil;
for i:=1 to n do
begin
new(g);
read(g.a);g .next=p; p:=g;
end;
E) p:=nil;
for i:=1 to n do
begin
new(g);
read(g^.a);g^.next=p;
end;
221. Оператор WRITE(a:7:3)
A) a-ға 10 орын, оның 3 бөлшек бөлігіне белгіленеді
B) а-ға 7 орын, оның 3 бүтін бөлігіне белгіленеді
C) а-ға 3 орын, оның 7 бөлшек бөлігіне белгіленеді
D) а-ға 10 орын, оның 7 бөлшек бөлігіне белгіленеді
E) а-ға 7 орын, оның 3 бөлшек бөлігіне белгіленеді
222. PROGRAM a3;
VAR Z,W:INTEGER;
BEGIN
Z:=4;
REPEAT
W:=Z/2;
WRITE(W);
Z:=Z+2;
UNTIL Z>6;
END.
Программа нәтижесі
A) 2;4
B) 2;3
C) 4;1
D) 3;2
E) 6;3
223. Жазу үшін файлды ашу процедурасы
A) RESET()
B) ASSIGN()
C) ERASE()
D) CLRSCR()
E) REWRITE()
224. PROGRAM a19;
CONST V=0;
VAR W:INTEGER;
BEGIN
IF V>0 THEN W:=EXP(3*LN(V))
ELSE IF V<0 THEN W:=SQR(V)
ELSE W:=EXP(V);
WRITE(W);
END.
Программа нәтижесі
A) 0
B) 0.1
C) 1
D) 1.57
E) 3.14
225. Шарт төменгідей символдың көмегімен белгіленеді.
A) Шеңбер
B) Ромб
C)Тікбұрыш
D)Эллипс
E) Параллелограмм
226. Енгізу, шығару төменгідей символдың көмегімен белгіленеді
A) Шеңбер
B)Тікбұрыш
C) Ромб
D) Параллелограмм
E) Эллипс
227.TRUNC (26.8) неге тең
A)26
B) 28
C) 27
D) 26,8
E) 26,7
228. Шартты өту операторы
A) FOR-TO-DO
B) CASE-OF-END
C) IF-THEN-ELSE
D) WHILE-DO
E) REPEAT-UNTIL
229. Жолдық өрнекте символды жою функциясы
A) PQS
B) DELETE
C) COPY
D) LENGTH
E) INSERT
230. Функцияны хабарлайтын қызметші сөз
A) TYPE
B) PROCEDURE
C) CONST
D) FUNCTION
E) END
231. Келесі есепті шешудің дұрыс жауабын көрсетінің: радиусы 150-ге тең центірінің координаталары (120,100) болатын шеңбер сызыңыз.
A) Circle (100,120,150)
B) Circle (150,120,100)
C) Circle (120,100,150)
D) Circle (120,100,150)
E) Circle (150,120,100)
232. Жазба типінің сипатталуы
A) Тип аты = SET OF базалық тип
B) Тип аты = ARRAY OF өрістер тізімі
C) Тип аты = RECORD өрістер тізімі END
D) Тип аты =WRITE OF өрістер тізімі
E) Тип аты = WITH OF өрістер тізімі
233. Көрсеткіш мәні болып табылады
A) Айнымалылар
B) Көрсеткіштер
C) Айнымалылар адрестері
D) Массивтер
E) Матрицалар
234. 3,0 санының типі
A) CHAR
B) BOOLEAN
C) STRING
D) INTEGER
E) REAL
235. Шарт ЖАЛҒАН болғанда жұмыс істейтін цикл
A) REPEAT…UNTIL
B) WHILE…DO
C) CASE…OF END
D) IF..THEN ELSE
E) WITH..DO
236. Экранды тазалау процедурасы
A) GOTOXY
B) CLRSCR
C) DISPLEY
D) KEYPRESSED
E) DELAY
237. Программа фрагментінің орындалу нәтижесін таңданыз
Var
N: integer; c,s:string;
Begin
N:=pos(‘abc’,’abefabcdeabc’);
Writeln(‘n=’,n);
C:=copy(’abefabcdeabc’,6,3);
Writeln(‘c=’,c);
S:=’abcd’;
Insert(‘123’,s,3);
Writeln(‘s=’,s);
End;
A) N=5
C=abc;
S=ab123cd
B) N=5
C=bcd;т
S=123abcd
C) N=5
C=bcd
S=ab123cd
D) N=10
C=bcd
S=ab123cd
E) N=5
C=fabcde
S=ab123cd
238. Егер де массивтің элементтері келесідей болса, A(3,14,-3,6,-9,5,12) онда келтірілген программа нәтижесі
FOR I:=1 TO 7 DO
IF (A[I] MOD 3=0) AND (A[I]>0) THEN WRITELN(A[I]*2);
A) 6,12,24
B) 6,(6,12,(18,24
C) 3,-3,6,-9,12
D) 6,28,12,10,24
E) 6,3,12,18,2
239. Программаның орындалу нәтижесін көрсетініз
Program pr;
Var a,b:integer; s:real;
Procedure SR(x,y:integer;var S:real);
Begin
S:=(x+y)/2;
End;
Begin
A=2; b=3;
Sr(A,S,b);
Writeln(S);
End.
A) 3.0
B) 5
C) 2.5
D) Титердің сәйкес келмеуі
E) S
240. Процедура және функциядан тұратын графикалық операциялардың орындалуын қамтамасыз ететін модуль
A) CRT
B) DOS
C) GRAPH
D) SCR
E) SYSTEM
241. Байланыстыру операторы келесі түйінді сөздерден тұрады:
A) WHILE…DO
B) CASE…OF
C) REPEAT…UNTIL
D) WITH…DO
E) IF…THEN
242. Жиындардың бірігуі
A) A+B
B) A/B
C) A-B
D) A*B
E) A in B
243. Программаның келесі фрагменті баспаға шыгады
Var
x,y:^integer;
begin
new(y); y^:=5; y^:=2*y^+sqr(y^); x:=y; write(x^+10); Dispose(x);
End.
A) 45
B) y+10
C) 15
D) x^+10
E) 35
244. F файлына айнымалыларды жазу процедурасы
A) Read(f, айнымалылар тізімі)
B) Write(f, айнымалылар тізімі)
C) Rewrite(f, айнымалылар тізімі)
D) End
E) Reset(f, айнымалылар тізімі)
245. PROGRAM a3;
VAR Z,W:INTEGER;
BEGIN
Z:=4;
REPEAT
W:=Z/2;
WRITE(W);
Z:=Z+2;
UNTIL Z>6;
END.
Программаның нәтижесі
A) 2;3
B) 3;2
C) 6;3
D) 2;4
E) 4;1
246.Программа бөлігі орындалғаннан кейін айнымалы s –тің мәні неше болады:
int i,s=1;;
for(i=1;i<5;i++)
s*=i;
cout<<"s="<<s;
A) 120
B)24
C)14
D)6
E)25
247. Программаның келесі фрагменті баспаға шығады
Type t=array [1..n] of integer;
Var
b:^t;
begin
new(b);
read(b^[1]); k:=b^[1];
for i:=2 to n do
begin
read(b^[i]);
if b^[i] < k then k:=b^[i]
end;
writeln(b^[k]);
end.
A) b1,b2,…,bn сандарының ішіндегі ең үлкенінің номеріне тең b[k] санын баспаға шығарады
B) b^[k] санының адресін баспаға шығарады
C) b1,b2,…,bn сандарының ішіндегі ең кішісін баспаға шығарады
D) b1,b2,…,bn сандарының ішіндегі ең кішісінің номеріне тең b[k] санын баспаға шығарады
E) b1,b2,…,bn сандарының ішіндегі ең үлкеннін баспаға шығарады
248. PROGRAM a15;
VAR C,D: INTEGER;
BEGIN
C:=0;
REPEAT
D:=SQR(SQRT(C));
WRITE(D);
C:=C+5;
UNTIL (C>5)
END.
Программа нәтижесі
A) 0;5
B) 5
C) 25
D) 0
E) 5;10
249. N бүтін сандардан тұратын тізімді құрастыратын программа фрагментін таңда. Типтелген көрсеткіш келесідей хабарланады
Type
Tp=^posl;
Posl=record
A:integer;
Next:tp;
End;
Var p,g:tp; i:integer;
A) p:=nil;
for i:=1 to n do
begin
read(g^.a);g.^.next=p; p:=g;
end;
B) p:=nil;
for i:=1 to n do
begin
new(g);
read(g^.a);g.^.next=p; p:=g;
end;
C) p:=nil;
for i:=1 to n do
read(g^.a);
D) p:=nil;
for i:=1 to n do
begin
new(g);
read(g^.a);g.^.next=p;
end;
E) p:=nil;
for i:=1 to n do
new(g);
begin
read(g^.a);g.^.next=p; p:=g;
end;
250. Келесі оператор орындалғаннан кейін D айнымалының мәні
D=0; I:=1;
WHILE I<25 DO
I:=I+2;
D:=D+1/(2*I+1);
A) 1/51
B) 0.03
C) 1/49
D) 1/47
E) 0.02
251. PROGRAM a9;
VAR U,W: real;
BEGIN
U:=2;
WHILE U<=6 DO
BEGIN
W:=U/2;
WRITE(W);
U:=U+4;
END;
END.
Программа нәтижесі
A) 3
B) 6
C) 2
D) 13
E) 1;3
252. Жазу үшін файлды ашу процедурасы
A) RESET()
B) ERASE()
C) REWRITE()
D) CLRSCR()
E) ASSIGN()
253. PROGRAM a7;
VAR X,Y:INTEGER;
BEGIN
X:=3;
REPEAT
Y:=X/3;
WRITE(Y);
X:=X+3;
UNTIL X > 6;
END.
A) 1;2
B) 3;6
C) 2
D) 1
E) 3
254. Шарт қандай символдың көмегімен белгіленеді?
А) шеңбер
B) ромб
C) параллелограм
D) тікбұрыш
E) эллипс
255. Енгізу, шығару қандай символдың көмегімен белгіленеді?
А) ромб
B) эллипс
C) параллелограм
D) тікбұрыш
E) шеңбер
256. Нақты типтерді бүтін мәнге ауыстыру функциясы
A) ABS(X)
B) TRUNC(X)
C) EXP(X)
D) LN(X)
E) ROUND(X)
257. Келесі есептер шешімдерінің дұрыс фрагментін анықтау керек
if (x>0 || x<=4) f=sin(PIx)+pow(x*x+6,1/5)
else if x>4 f=ln(x)+sqr(3*x+7)
if (x>0 && x<=4) f=sin(PI*x)+pow(x*x+6,1/5)
else if (x>4) f=log(x)+sqrt(3*x+7)
if (x>0 && x<=4) f=sin(PI*x)+pow(x*x+6,1/5)
else if (x>4) f=log(x)+sqr(3*x+7)
if (x>0 & x<=4) f=sin(PI*x)+pow(x*x+6,1/5)
else if (x>4) f=log(x)+sqrt(3*x+7)
if (x>0 ! x<=4) f=sin(PIx)+pow(x*x+6,1/5)
else if x>4 f=ln(x)+sqrt(3*x+7)
258. Жолдық тип STRING[N] … сипатталады:
A) ARRAY [1..N] OF CHAR
B) PACKED ARRAY [1..N] OF INTEGER
C) PACKED ARRAY [1..N] OF CHAR
D) PACKED [1..N] OF CHAR
E) PACKED ARRAY [1..N] OF REAL
259. Процедурадағы формальды параметрлер қалай аталады?
А) процедура денесіне енгізілген, идентификаторлары;
В) айнымалылар, программа бөлімінде баяндалған;
С) процедура операторлар мәнінің сипаттау бөлімінде;
D) тұрақтылар, программалар бөлімінде;
E) дұрыс жауабы жоқ
260. INITGRAPH функциясы
A) адаптер жұмысының графикалық режимін инициализациялайды
B) көрсеткіштің сол сәттегі көлденең және тік координаталарын
анықтайды
C) адаптердің графикалық режимдегі жұмысын аяқтап экранның текстік
жұмысын іске қосады
D) экранның сол сәтте жұмыс істеп отырған режиміндегі көлденең және тік
E) координаталарының ең максималды мәнін анықтайды
261. Өрнекті есептегендегі дұрыс вариантын көрсетіңіз?
[4..10]-[5..14]*[9..19]+[3..9]
A) [3..10]
B) [6..9]
C) [3..9]
D) [4..10]
E) [5..19]
262. Динамикалық айнымалыға жадыны бөліп беретін процедураны таңда:
А) Dispose
В) Heaporg
С) Heapptr
D) Heapend
E) new
263. Массивті сипаттайтын қызметші сөз:
А) FILE..OF
В) SET..OF
С) OF…ARRAY
D) RECORD…END
E) ARRAY..OF
264. Шартты операторын қолданып келтірілген функцияны есептеу керек
А) if (x>0) and (x<2) then y:=sqr(cos(x))
else y:=1-sin(sqr(x));
В) if (x>0) and (x<2) then y:=sqr(cos(x));
else y:=1-sin(sqr(x));
С) 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:=sqr(cos(x))
else y:=1-sqr(sin(x));
E) If (x>0) and (x<2) then y:=cos(sqr(x))
else y:=1-sin(sqr(x));
265. Келесі операторлар орындалғаннан кейін айнымалының мәнін анықтау
керек.
S:=0; I:=0;
While i<5 do i:=i+1;
S:=S+1/i;
A) 0,25
B) 21/12
C) 217/60
D) 2,1
E) 0,2
266. Егер де А массивінің элементтері (4,105,11,14,5) белгілі сандары болса,
онда программа баспаға қандай сандарды шығарады?
FOR I:=1 TO 4 DO
BEGIN
M:=A[I]; K:=I;
FOR J:=I TO 5 DO
BEGIN
IF A[J]<M THEN BEGIN M:=A[J]; K:=J; END;
P:=A[I]; A[I]:=A[K]; A[K]:=P;
END;
FOR I:=1 TO 5 DO
WRITE(A[I]);
A)105,14,11,5,4
B) 4,105,11,14,5
C)1,2,3,4,5
D)4,11,105,14,5
E)4,5,11,14,105
267. Элемент массиві сандық болып табылатын болса программа фрагментін орындау кезінде қорытындысында не басылады
(-5,-4,8,-16,2,-12,7)
FOR I:=1 TO 7 DO
IF (A[I] mod 4=0) AND (A[I]<0) THEN
WRITE (A[I]*4,’,’);
A)-16,-64,-48
B)20,16,-48
C)-5,32,8
D)-4,-16,-12
E)20,32,8,28
268. Программаның орындалу нәтижесін көрсетіңіз
Program pr;
Var a,b:integer; s:real;
Procedure Sr(x,y:integer; var S:real;)
Begin
S:=(x+y)/2;
End;
Begin
a=2, b=3;
sr(a,S,b);
writeln(S);
End.