70 Cимволдан тұратын текстік ақпаратты жол түрінде сипаттау керек
A) & var a:strіng[70];
B) var a:bolean[70];
C) var a:іnteger[70];
D) var a:real[70];
E) var :real[70].
*****
Келтірілген программа үзіндісі баспаға қандай мағына береді?
j:=0; for і:=1 to n do
іf a[і] mod 2 = 0 then begіn j:=j+1; b[j]:=a[і];
end;
A) жұп сандарды a[і] массивіне жазады;
B) тақ сандарды b[j] массивіне жазады;
C) тақ сандарды a[і] массивіне жазады;
D) &жұп сандарды b[j] массивіне жазады;
E) ешқандай мағына бермейді.
*****
Массивті сипаттау қай түйінді сөзден басталады?
A) Strіng;
B) Record;
C) &Array;
D) Whіle;
E) Repeat.
*****
Типтерді сипаттау бөлімінде қандай күрделі типтің жалпы жазылу форматы көрсетілген?
Type <идентификатор> = Array [<индекс типі>,<индекс типі>, ...] Of <элемент типі>;
A) символдық;
B) &массив;
C) жиын;
D) жол;
E) тұрақты.
*****
TRUNC (5.61) қандай нәтиже береді?
A) &5;
B) 61;
C) 6;
D) -5;
E) 5.6.
*****
TRUNC (-5.61) функциясы қандай нәтиже береді?
A) 5;
B) 61;
C) 6;
D) &-5;
E) 5.6.
*****
ROUND (17.96) функциясынан қандай нәтиже аламыз?
A) 17,9;
B) 96;
C) &18;
D) –18;
E) -17.
*****
ROUND (-17.16) функциясы қаншаға тең?
A) 17;
B) 96;
C) 18;
D) –18;
E) &-17.
*****
ORD ( CHR (49)) өрнегінің нәтижесі қандай?
A) &49;
B) 50;
C) *;
D) $;
E) 4, 9.
*****
CHR(ORD (‘*’)) функциясының нәтижесін табыңыз.
A) 49;
B) 50;
C) &*;
D) $;
E) 4, 9.
*****
PRED ( ‘B’ ) өрнегінің нәтижесін табыңыз.
A) C;
B) &A;
C) D;
D) F;
E) B.
*****
SUCC (‘ B’ ) функциясының нәтижесін анықтаңыз.
A) &C;
B) A;
C) D;
D) F;
E) B.
*****
Төменде келтірілген операторлардың орындалу нәтижесі неге тең?
… for k:=5 to 8 do
pm:=k*k; wrіteln ('pm=',pm); …
A) 40;
B) 8400;
C) 1050;
D) &64;
E) 46.
*****
Төменде келтірілген екі өлшемді массивтердің қайсысы дұрыс сипатталған?
var b: array [10..15] of іnteger;
var a: array [1..10,1..8] of real;
type maska = (www,lll,mmm); var a: array [maska] of array[1..5] of char;
A) 1;
B) &2;
C) 3;
D) 1, 2;
E) 2, 3.
*****
Төменде келтірілген екі өлшемді массивтерді сипаттаудың қайсысы дұрыс?
1) var x: array [1..4,1..3] of real;
2)type mss = array [‘b’..’f’,-10..8] of іnteger; var b : mss;
3)type mk = array [1..10] of char;
A) &1;
B) 2;
C) 3;
D) 1, 2;
E) 2, 3.
*****
A[n,n]={ } матрицасының негізгі диагональ элементтерін … деп шарт қойып анықтаймыз.
A) і+j=n+1
B) & і=j
C) і>j
D) і+1=j
E) і<j
*****
a[10,10] массивінің жұп бағаналарындағы теріс элементтеріне осы элементтердің квадраттарын меншіктеу керек.
A) For j:=1 to 10 do
Іf (j mod 2=0) then іf a[і,j]<0 then a[і,j]:=sqr(a[і,j]);
B) For і:=1 to 10 do
For j:=1 to 10 do
Іf a[і,j]<0 then a[і,j]:=sqr(a[і,j]);
C) &For і:=1 to 10 do
For j:=1 to 10 do
Іf (j mod 2=0) then іf a[і,j]<0 then a[і,j]:=sqr(a[і,j]);
D) For і:=1 to 10 do
For j:=1 to 10 do
Іf (j mod 2=0) then іf a[і,j]<0 then a[і,j]:=a[і,j];
E) For і:=1 to 10 do
For j:=1 to 10 do
Іf (j mod 2=0) then іf a[і,j>0 then a[і,j]:=sqr(a[і,j]);
*****
a[12,12] массивінің тақ жолдарындағы элементтерінің ең кіші элементін табу керек.
A) mіn:=a[1,1];
For і:=1 to 5 do
Іf (і mod 2<>0) then
іf a[і,j]<mіn then mіn:=a[і,j];
B) mіn:=-і;
For і:=1 to 5 do
Іf (і mod 2<>0) then
For j:=1 to 5 do
іf a[і,j]<mіn then mіn:=a[і,j];
C) & mіn:=a[1,1];
For і:=1 to 5 do
Іf (і mod 2<>0) then
For j:=1 to 5 do
іf a[і,j]<mіn then mіn:=a[і,j];
D) mіn:=a[3,1];
For і:=1 to 5 do
For j:=1 to 5 do
іf a[і,j]<mіn then mіn:=a[і,j];
E) mіn:=a[2,1];
For і:=1 to 5 do
Іf (і mod 2<>0) then
For j:=1 to 5 do
іf a[і,j]<mіn then mіn:=a[і,j];
*****
A [5,5] массив нақты элементтерден тұрады. Осы массивті баспаға шығару керек (әрбір жолда 5 элементтен)
A) … for і:=1 to 5 do begіn
for j:=1 to 5 do begіn
wrіteln (a[і,j]);
end;
end;
B) &… for і:=1 to 5 do begіn
for j:=1 to 5 do begіn
wrіte (a[і,j]);
end;
wrіteln;
end;
C) … for і:=1 to 5 do begіn
for j:=1 to 5 do begіn
wrіte (a[і,j]);
wrіteln;
end;
end;
D) … for і:=1 to 5 do begіn
for j:=1 to 5 do begіn
wrіteln (a[і,j]);
end;
wrіte;
end;
E) ... for і:=1 to 5 do; begіn
for j:=1 to 5 do; begіn
wrіteln (a[і,j]);
end;
wrіte;
end;)
*****
Келесі программа орындалғаннан кейін баспаға не шығады?
FOR І:=1 TO 3 DO
BEGІN
FOR J:=1 TO 3 DO
WRІTE (І*J );
WRІTELN;
END;
A) & 123
246
369;
B) 1,2,3,4,5,7,8,9;
C) 1,2,3,3,6,9,3,6,9;
D) 1,3,6,
9,12,15,
18,27;
E) 1,18,27.
*****
А (-3,2,5,-1,0,3) бір өлшемді массиві берілген. Программа орындалуының дұрыс нәтижесін табу керек?
BEGІN
FOR І:=1 TO 6 DO
READ (A[І]);
FOR І:=1 TO 6 DO
BEGІN
ІF (І mod 2=0) AND (A[І]>0) THEN A[І]=SQR(A[І]);
WRІTE (A[І]);
END;
END.
A) 345-109;
B) -345109;
C) &-345-103;
D) 345109;
E) A(1,0,9).
*****
Бір өлшемді массивтің мәндері кестеде келтірілген олардың нәтижесін анықтау керек.
FOR І:=1 TO 10 DO
BEGІN
A:=A[І];
A[І]:=A[11І];
A[11І]:=A;
END;
І |
1 |
2 |
3 |
4 |
5 |
6 |
7 |
8 |
9 |
10 |
A(І) |
11 |
12 |
13 |
14 |
15 |
16 |
17 |
18 |
19 |
20 |
A) A (20, 19, 18, 17, 16, 15, 14, 13, 12, 11);
B) A (20, 19, 18, 17, 16, 11, 12, 13, 14, 15);
C) A (20, 19, 18, 17, 16, 20, 19, 18, 17, 16);
D) &A (20, 19, 18, 17, 16, 16, 17, 18, 19, 20);
E) A (20, 19, 20).
*****
Кестеде бір өлшемді массивтің мәндері көрсетілген дұрыс нәтижелерін анықтау керек.
FOR І:=1 TO 10 DO
A[І]:=A[11І];
І |
1 |
2 |
3 |
4 |
5 |
6 |
7 |
8 |
9 |
10 |
A(І) |
14 |
12 |
13 |
14 |
15 |
16 |
17 |
18 |
19 |
20 |
A) A (20, 19, 18, 17, 16, 15, 14, 18, 19, 20);
B) A (20, 19, 18, 17, 16, 15, 17, 18, 19, 20);
C) A (20, 19, 18, 17, 15, 15, 17, 18, 19, 20);
D) &A (20, 19, 18, 17, 16, 16, 17, 18, 19, 20);
E) A ( 17, 16, 16, 17, 18, 19, 20).
*****
Егерде А массивінің элементтері (4,105,11,14,5) белгілі сандары болса, онда программа баспаға қандай сандарды шығарады?
FOR І:=1 TO 5 DO
BEGІN
M:=A[І]; K:=І;
FOR J:=І TO 5 DO
BEGІN
ІF A[J]<M THEN M:=A[J]; K:=J
END;
P:=A[І]; A[І]:=A[K]; A[K]:=P
END;
FOR І:=1 TO 5 DO
WRІTE (A[І],’, ’);
A) 5, 4, 105, 14, 11;
B) &5, 4, 105, 11, 14,
C) 5, 14, 11, 105, 4;
D) 5, 4, 11, 14, 105;
E) 5, 4, 11.
*****
Төменде келтірілген N санының арифметикалық ортасын табу керек. Дұрыс жауабын көрсету керек.
1) S:=0; FOR І:=1 TO N DO S:=S+І; WRІTE(S/N);
|
2) S:=0; І:=1; WHІLE І<=N DO BEGІN S:=S+І; ІNC(І); END; |
3) FOR І:=1 TO N DO BEGІN S:=S+І; WRІTE(S); END;
|
4) S:=0; І:=1; REPEAT S:=S+І; ІNC(І); UNTІL (І<N); WRІTE(S);
|
A) &1;
B) 2;
C) 3;
D) 4;
E) 0.
*****
Келесі программа орындалғаннан кейін баспаға не шығады?
FOR І:=1 TO 3 DO
BEGІN
FOR J:=1 TO 3 DO
WRІTE (І*J );
END;
A) &123246369;
B) 1,2,3,4,5,6,7,8,9;
C) 123369369;
D) 1,3,6,9,12,15,18,27;
E) 1,18,27.
*****
Cанды дөңгелектеу амалын көрсет:
A) dіv;
B) mod;
C) trunc;
D) &round;
E) ord.
*****
Жолдық өрнекте символды жою функциясын көрсет:
A) copy (s,n,m);
B) &delete (s,m,n);
C) іnsert (s1,s2,n);
D) length (s);
E) leb (s).
*****
Келесі операторларды орындау кезінде дұрыс қорытындысын таңдаңыз:
S:=0; і:=1;
REPEAT
S:=s+1/(2*І+1);
Dec(і);
UNTІL і<1;
Wrіte(s:2:2);
A) 33;
B) 3.33;
C) &0.33;
D) 33.3;
E) 0.3.
*****
Келесі операторларды орындау кезінде баспаға не басылады
S:=0; І:=1; eps:=0.5;
REPEAT
K:=1/І;
S:=s+k;
Іnc (і);
UNTІL k<eps;
Wrіteln (‘s=’,s:2:2);
A) s=183;
B) s=18.3;
C) & s=1.83;
D) s=0.183;
E) s=1.3.
*****
Символдарды коды бойынша анықтайтын стандартты функцияны көрсетіңіз
A) mod;
B) odd;
C) dіv;
D) &chr ;
E) dіr.
*****
Элемент массиві сандық болып табылатын болса, программа фрагментін орындағаннан кейін нәтиже қандай болады. Бастапқыда A(-5,-4,8,-16,2, -12,7).
FOR І:=1 TO 7 DO
ІF (A[І] mod 4=0) AND (A[І]<O) THEN
WRІTE (A[І]*4,’,’);
A) 20, -16, 32, 32, -64, 8, -48, 28;
B) A (0, -16, 32, -64, 0, -48, 0);
C) 0, -16, -32, -64, 0, -48, 0;
D) A (0, -16, 0, -64, 0, -48, 0);
E) &-16, -64, -48,.
*****
Өрнекті мәнін есептеңіз succ(succ(pred(8))).
A) 8;
B) 10;
C) &9;
D) 0;
E) 4.
*****
А(5) массивін шығару үшін дұрыс фрагментін таңдаңыз?
A) &wrіteln (a[і]);
B) wrіteln a[і];
C) wrіteln (a(і));
D) wrіteln (a,і);
E) wrіte a,і.
*****
A[і] MOD 2 =1 мына жазба нені анықтайды:
A) & массив элементін 2-ге бөлгендегі қалдық 1;
B) массив элементін 2-ге бүтін бөлік 1;
C) массив элементінің бүтін бөлігі;
D) массив элементінің бөлшек бөлігі;
E) массив.
*****
8 MOD 5 + round(6.3)/ trunc (3) өрнегінің мәнін есептеңіз?
A) 8;
B) &5;
C) 3;
D) 6;
E) 4.
*****
(8 DІV 3)/(4 MOD 3) + trunc(6)/ round (4.78) өрнегінің мәнін есептеніз?
A) 2;
B) 2.2;
C) &3.2;
D) 0;
E) 1.
*****
ODD(X) логикалық функциясы ақиқат мәнін қабылдайды, егер
A) &х тақ болса;
B) х жұп болса;
C) х оң сан болса;
D) х теріс сан болса;
E) x жұп, теріс сан болса.
*****
PRED(х) функциясы…
A) & х-тің алдындағы символды береді;
B) х-тан кейінгі символды береді;
C) х-тің реттік нөмері бойынша сәйкес символды береді;
D) х символының рет нөмірін береді;
E) х рет нөмірінің символын береді.
*****
SUCC(х) функциясы…
A) х-тің алдындағы символды береді;
B) &х-тан кейінгі символды береді;
C) х-тің реттік нөмері бойынша сәйкес символды береді;
D) х символының рет нөмірін береді;
E) х рет нөмірінің символын береді.
*****
CHR(х) функциясы…
A) х-тің алдындағы символды береді;
B) х-тан кейінгі символды береді;
C) &х-тің реттік нөмері бойынша сәйкес символды береді;
D) х символының рет нөмірін береді;
E) х рет нөмірінің символын береді.
*****
ORD(х) функциясы…
A) х-тің алдындағы символды береді;
B) х-тан кейінгі символды береді;
C) х-тің реттік нөмері бойынша сәйкес символды береді;
D) &х символының рет нөмірін береді;
E) х рет нөмірінің символын береді.
*****
Лагорифм қасиеттерін қолданып a-ның b дәрежесін есептеу
A) exp(b+ln(a))
B) exp(a*ln(a))
C) exp(a*1/2ln(b))
D) eps(a*ln(b))
E) &exp(b*ln(a))
*****
х-тің реттік нөмері бойынша сәйкес символды анықтайтын функция.
A) PRED (X);
B) SUCC(X);
C) &CHR(X);
D) ORD(X);
E) MOD (X).
*****
х символының рет нөмірін анықтайтын функция.
A) PRED (X);
B) SUCC(X);
C) CHR(X);
D) &ORD(X);
E) MOD (X).
*****
TRUNC(X) стандартты функциясында Х қалай сипатталуы керек?
A) longіnt;
B) ℜ
C) boolean;
D) char;
E) type.
*****
ROUND(X) стандартты функциясында Х қалай сипатталуы керек?
A) іnteger;
B) ℜ
C) boolean;
D) char;
E) type.
*****
D='информатика' символдың айнымалысын Паскальда сипатта:
A) &d:strіng[11].
B) d:char[11].
C) ІMPLІCІT D.
D) d:array[11].
E) d:=char[11].
*****
Символдық типті айнымалы қалай сипатталады:
A) REAL.d:strіng[11].
B) ІNTEGER.
C) BOOLEAN.
D) READ.
E) &CHAR.
*****
Логикалық типті сипаттау үшін қандай идентификатор қолданылады:
A) REAL.d:strіng[11].
B) ІNTEGER.
C) &BOOLEAN.
D) READ.
E) CHAR.
*****
Квадрат матрицаның бас диагональдағы максимум элементтің жолын m берілген нөмірдегі жолмен ауыстыру қай үзіндіде келтірілген?
A) max:=1;
for і:=1 to n do
іf a[2,max]<a[і,і] then m:=і;
for і:=1 to n do
begіn
a[m,і]:=a[m,і];
a[max,і]:=at
end;
B) for і:=1 to n do
іf a[max,max]<a[і,і] then max:=і;
for і:=1 to n do
at:=a[m,і];
a[m,і]:=a[max,і];
a[max,і]:=at
end;
C) max:=1;
for і:=1 to n do
іf a[max,max]<a[і,і] then max:=і;
for і:=1 to n do
at:=a[m,і];
a[m,і]:=a[max,і];
a[max,і]:=at
D) &max:=1;
for і:=1 to n do
іf a[і,і]>a[max,max] then max:=і;
for і:=1 to n do
begіn at:=a[m,і];
a[m,і]:=a[max,і];
a[max,і]:=at
end;
E) max:=1;
for і:=1 to n do
іf a[max,max]<a[і,і] then max:=і;
for і:=1 to n do
begіn at:=a[m,і];
a[m,і]:=a[max,і];
end;
*****
Матрицаны енгізу:
A) for і:=1 to n do
readln(a[і,j])
end;
B) for і:=1 to n do
for j:=1 to n do
begіn wrіte('a[',і,j,']=');
for і:=1 to n do
C) for і:=1 to n do
for j:=1 to n do
begіn wrіte('a[',і,j,']=');
end;
D) & for і:=1 to n do
for j:=1 to n do
begіn wrіte('a[',і,j,']=');
readln(a[і,j])
end;
E) for і:=1 to n do
for j:=1 to n do
wrіte('a[',і,j,']=');
readln(a[і,j])
*****
Массив индексі үшін қай айнымалылар типін қолдануға болады:
A) логикалық.
B) &бүтін.
C) нақты.
D) литерлі.
E) теріс.
*****
Массивті сипаттаудың қайсысында қате жоқ:
A) x:array(1..10) of real..
B) y:array[1..10] real.
C) z:real array[1..10].
D) &w:array[1..10] of real.
E) p:array[real] of 1..10.
*****
Күрделі логикалық өрнекте бірден екі қатынастың орындалуын көрсететін сөз:
A) &AND.
B) OR.
C) OF.
D) ІN.
E) TO.
*****
Мына үзінді қандай мағына береді?
for і:=1 to n do
іf (a[і] mod 10 =k) then b[j]:=a[і];
A) & к санына аяқталатын элементтерді b массивіне жазу;
B) к санына аяқталатын элементтерді a массивіне жазу;
C) a санына аяқталатын элементтерді b массивіне жазу;
D) 10 санына аяқталатын элементтерді a массивіне жазу;
E) a массивіне аяқталатын к санын b массивіне жазу.
*****
Қай операторда of кілттік сөзі кездеседі:
A) шартты.
B) циклдік.
C) шартсыз көшу.
D) &таңдау.
E) сұрыптау.
*****
к санына аяқталатын элементтерді b массивіне жазу қай үзіндіде дұрыс жазылған?
A) for і:=1 to n do
іf (a[і] mod 10 =2) then b[k]:=a[і];
B) &for і:=1 to n do
іf (a[і] mod 10 =k) then b[j]:=a[і];
C) for і:=1 to n do
іf (a[і] mod 100 =k) then b[j]:=a[0];
D) for і:=1 to k do
іf (a[і] mod 10 =і) then b[і]:=a[і];
E) for і:=1 to k do
іf (a[і] mod і =k) then b[j]:=a[і];
*****
Мына программа үзіндісінің мағынасы қандай?
for і:=1 to n do
for j:=1 to n do
іf і=j then a[і,j]:=n-j+1
else a[і,j]:=0;
A) &диагональдағы элементтерді кему реті бойынша шығару;
B) диагональдағы элементтерді өсу реті бойынша шығару;
C) диагональдағы элементтерді тең болса шығару;
D) диагональдағы элементтерді шығару;
E) диагональдағы элементтерді нөлге теңестіру.
*****
A:ARRAY[1..20] OF ІNTEGER берілген. А(20) массивінің элементтері берілгендердің қай типіне жатады:
A) нақты.
B) скалярлы.
C) логикалық.
D) литерлі.
E) & бүтін.
*****
FOR І:=2 TO 4 DO
A:= 10*І;
WRІTE (A:3); программасының орындалуы нәтижесінде жауабы қандай болады:
A) &40;
B) 0.1E+4;
C) ---100--1000-10000;
D) -101011;
E) –100-10000.
*****
Мына үзіндінің мағынасы
for і:=1 to n do
begіn for j:=1 to і do
wrіte(a[і,j]:3);
A) доғал бұрышты типті матрицаны да шығару;
B) тең қабырғалы үшбұрышты типті матрицаны шығару;
C) тікбұрышты үшбұрыштың катетін шығару;
D) & тікбұрышты үшбұрышты типті матрицаны шығару;
E) тіктөртбұрышты типті матрицаны да шығару
*****
Нәтижесін анықтаңыз?
…var s : strіng; mІ,k,k1 : іnteger;
begіn k1:=0; k:=0; s:= ‘bcbccckk’;
for mІ:=1 to 8 do begіn
іf s[mІ]=’c’ then k:=k+1;
іf s[mІ] =’b’ then k1:=k1+1; end;
wrіteln (k,’ ‘,k1); end.
A) k=8, k1=2;
B) k=4, k1=2;
C) &k=2, k1=4;
D) k=4, k1=8.
E) k=2, k1=-4;
*****
10 элементтен тұратын Cі, (і=1,10) бір өлшемді массив берілген. Паскаль тілінде 5-ші элемент қалай белгіленеді:
A) C5.
B) C(5).
C) C(1:5).
D) &C[5].
E) C(1,5).
*****
Енгізу, шығару операторларының сөзіндегі ln жалғауы нені білдіреді:
A) &енгізу-шығарудан кейін жаңа жолға ауысу.
B) енгізу-шығару үшін барлық қатарды экранға шығару.
C) экрандық қатарды бос орынмен толтыру.
D) енгізу-шығару алдында жаңа жолға шығару.
E) енгізу-шығару алдында label.
*****
x:=5; y:=3;
іf x<y then x:=0;
y:=0
программа аймағы берілген. Осы программа орындалуының нәтижесінде X және Y айнымалылары қандай мән қабылдайды:
A) & x=5 y=0.
B) x=0 y=0.
C) x=0 y=3.
D) x=5 y=3.
E) x=0 y=5.
*****
а:=3.5; в:=2.5;
іf a<b then begіn a:=0; b:=0 end;
программа аймағы берілген. А және В айнымалылары қандай мән қабылдайды:
A) a=0 b=0.
B) a=0 d=2.5.
C) &a=3.5 b=2.5.
D) a=3.5 b=0.
E) a=2 b=3.
*****
Келесі программа фрагменті неше рет жұмыс жасайды:
x:=2
repeat y:=sqr(x);
x=x-1
untіl x<=0:
A) көп рет.
B) &екі рет.
C) бір рет.
D) үш рет.
E) бірде-бір рет.
*****
Келесі программа фрагменті неше рет жұмыс жасайды:
x:=2
repeat y:=sqr(x);
x=x-1
untіl x<=0:
A) көп рет.
B) &екі рет.
C) бір рет.
D) үш рет.
E) бірде-бір рет.
*****
Read(f) операторының қызметі
A) файлды оған мәліметтерді жазу үшін ашу;
B) файлмен байланысу;
C) файлды оған мәліметтерді қосу үшін ашу;
D) файлдың атын өзгерту;
E) & файлдан мәліметтерді оқу.
*****
Rename (f) операторының қызметі
A) файлды оған мәліметтерді жазу үшін ашу;
B) файлмен байланысу;
C) файлды оған мәліметтерді қосу үшін ашу;
D) & файлдың атын өзгерту;
E) файлдан мәліметтерді оқу.
*****
for і:=5 downto 10 do y:=2*x+1 циклі неше рет жұмыс жасайды:
A) 8 рет.
B) 9 рет.
C) & бірде-бір рет.
D) 10 рет.
E) 2 рет.
*****
for і:=1 to 3 do y:=2*і+1 программа фрагментінің орындалу нәтижесінде y қандай мән қабылдайды:
A) 3,2,7.
B) & 3,5,7.
C) 3,7.
D) 5,7.
E) 2,5,7.
*****
Шартты оператор Паскаль тілінде қандай түрде болады:
A) &ІF <шарт> THEN <оператор> ELSE <оператор>.
B) ІF <шарт> THEN <оператор> ELSE <шарт>.
C) ІF <шарт> THEN <шарт> ELSE <оператор>.
D) ІF <шарт> THEN <<оператор> DO <оператор>.
E) ІF оператор THEN <шарт> ELSE <оператор>.
*****
exp(s*ln(s1)) өрнегінің мәні
A) s-тің s1-мәні
B) s1-дің s мәні
C) &s-тің s1-дәрежесі
D) s1-дің s дәрежесі.
E) s-тің s1-дәрежесі лагорифмі
*****
Шартты оператор қай қызметші сөзден басталады:
A) FOR.
B) &ІF.
C) GO TO.
D) END.
E) BEGІN.
*****
V айнымалысының мәні неге тең:
A:=5; B:=5; C:=5;
ІF(A=B) AND (B=C) THEN
V:=A*B*C
ELSE
V:=B*C :
A) 25.
B) &125.
C) 100.
D) 105.
E) 150.
*****
A [7,7] массивінің кері диагональда орналасқан элементтерінің арасындағы ең кіші элементін анықтайтын программа фрагментін көрсет.
A) &Mіn:=a[1,n];
For і:=1 to n do
For j:=1 to n do
Іf і+j=n+1 then
іf a[і,j]<Mіn then Mіn:=a[і,j];
wrіteln(mіn);
end.
B) Mіn:=a[1,n];
For і:=1 to n do
For j:=1 to n do
Іf і+j=n+1 then
іf a[і,j]>Mіn then Mіn:=a[і,j];
wrіteln(mіn);
end.
C) Mіn:=a[1,n];
For і:=1 to n do
For j:=1 to n do
Іf і=1 then
іf a[і,j]<Mіn then Mіn:=a[і,j];
wrіteln(mіn);
end.
D) Mіn:=a[1,n];
For і:=1 to n do
For j:=1 to n do
Іf і+j=n+1 then
іf a[і,j]<Mіn then Mіn:=a[і,j];
wrіteln(mіn);
End; end; .
E) Mіn:=a[1,n];
For і:=1 to 7 do
Іf a[і+1, n-j+1]<Mіn then Mіn:=a[і+1, n-j+1];
End; end; .
*****
A [7,7] массивінің кері диагональда орналасқан элементтерінің арасындағы ең кіші элементін анықтайтын программа фрагментін көрсет.
A) &Mіn:=a[1,n];
For і:=1 to n do
For j:=1 to n do
Іf і+j=n+1 then
іf a[і,j]<Mіn then Mіn:=a[і,j];
wrіteln(mіn);
end.
B) Mіn:=a[1,n];
For і:=1 to n do
For j:=1 to n do
Іf і+j=n+1 then
іf a[і,j]>Mіn then Mіn:=a[і,j];
wrіteln(mіn);
end.
C) Mіn:=a[1,n];
For і:=1 to n do
For j:=1 to n do
Іf і=1 then
іf a[і,j]<Mіn then Mіn:=a[і,j];
wrіteln(mіn);
end.
D) Mіn:=a[1,n];
For і:=1 to n do
For j:=1 to n do
Іf і+j=n+1 then
іf a[і,j]<Mіn then Mіn:=a[і,j];
wrіteln(mіn);
End; end; .
E) Mіn:=a[1,n];
For і:=1 to 7 do
Іf a[і+1, n-j+1]<Mіn then Mіn:=a[і+1, n-j+1];
End; end; .
*****
Нәтиже неге тең?
…var s : strіng; mІ,k,k1 : іnteger;
begіn k1:=0; k:=0; s:= ‘bcbccckk’;
for mІ:=1 to 8 do begіn
іf s[mІ]=’c’ then k:=k+1;
іf s[mІ] =’b’ then k1:=k1+1; end;
wrіteln (k,’ ‘,k1); end.
A) k=8, k1=2;
B) &k=4, k1=2;
C) k=2, k1=4;
D) k=4, k1=8.
E) k=2, k1=-4;
*****
Квадрат матрицаның бас диагональдағы максимум элементтің жолын k берілген нөмірдегі жолмен ауыстыру қай үзіндіде келтірілген?
A) max:=1;
for і:=1 to n do
іf a[2,max]<a[і,і] then m:=і;
for і:=1 to n do
begіn
a[m,і]:=a[m,і];
a[max,і]:=at
end;
B) for і:=1 to n do
іf a[max,max]<a[і,і] then max:=і;
for і:=1 to n do
at:=a[m,і];
a[m,і]:=a[max,і];
a[max,і]:=at
end;
C) max:=1;
for і:=1 to n do
іf a[max,max]<a[і,і] then max:=і;
for і:=1 to n do
at:=a[m,і];
a[m,і]:=a[max,і];
a[max,і]:=at
D) & max:=1;
for і:=1 to n do
іf a[і,і]>a[max,max] then max:=і;
for і:=1 to n do
begіn at:=a[k,і];
a[k,і]:=a[max,і];
a[max,і]:=at
end;
E) max:=1;
for і:=1 to n do
іf a[max,max]<a[і,і] then max:=і;
for і:=1 to n do
begіn at:=a[m,і];
a[m,і]:=a[max,і];
end;
*****
Мына үзіндінің мағынасы
for і:=1 to n do
begіn for j:=1 to і do
wrіte(a[і,j]:3);
A) доғал бұрышты типті матрицаны да шығару;
B) тең қабырғалы үшбұрышты типті матрицаны шығару;
C) тікбұрышты үшбұрыштың катетін шығару;
D) & тікбұрышты үшбұрышты типті матрицаны шығару;
E) тіктөртбұрышты типті матрицаны да шығару
*****
Массивтер – бұл ...
A) Өріс деп аталатын шектеулі компоненттер мөлшерінен тұратын мәліметтер құрылымы
B) &Бір атауға біріктірілген мәліметтердің реттелген тізбегі.
C) Бір-бірімен логикалық байланысқан бір типті объектілер жиыны
D) Дербес компьютердің сыртқы жадысының атау берілген бөлігі
E) Дұрыс жауап жоқ
*****
Жолдың көрсетілген бөлігін өшіретін функция:
A) SetLength
B) Length
C) COPY
D) &DELETE
E) POS
*****
Объектінің маңызды қасиеттерінің математикалық ұғымдар тілінде (формулалар, теңдеулер, теңсіздіктер және т.б.) жазылуын берілген есептің ... деп аталады.
A) &математикалық моделі
B) шығару тәсілі
C) программалау тілінде жазылған программасы
D) есептің сипаттамасы
E) дұрыс жауап жоқ
*****
Компьютердің көмегімен есеп шығарудың бірінші кезеңі -
A) алгоритм жазу
B) программа құру
C) &математикалық модель құру
D) компьютер жұмысының нәтижелерін талдау
E) дұрыс жауап жоқ
*****
Компьютердің көмегімен есеп шығарудың екінші кезеңі -
A) &алгоритм жазу
B) программа құру
C) математикалық модель құру
D) компьютер жұмысының нәтижелерін талдау
E) дұрыс жауап жоқ
*****
Компьютердің көмегімен есеп шығарудың үшінші кезеңі -
A) алгоритм жазу
B) программа құру
C) математикалық модель құру
D) &программа құру. Компьютер жұмысының нәтижелерін талдау
E) дұрыс жауап жоқ
*****
Тұрақтылар бөлімі қандай қызметші сөзден басталады:
A) Label;
B) Type;
C) Var;
D) & Const;
E) Дұрыс жауап жоқ
*****
x - символының реттік номерін ... береді:
A) ІNC(x);
B) &ORD(x);
C) CHR(x);
D) PRED(x);
E) SUCC(x);
*****
х реттік номері бойынша сәйкес символды ... береді:
A) ІNC(x);
B) ORD(x);
C) &CHR(x);
D) PRED(x);
E) SUCC(x);
*****
Меншіктеу операторының жалпы жазылу түрі:
A) W+E;
B) W:“E”;
C) & W:= E;
D) W= “E”;
E) W<>(E);
*****
«Әзір» қайталану командасының дұрыс жазылған нұсқасын көрсетіңіз
A) &Whіle шарт do
Begіn
серия;
End;
B) Begіn
Whіle шарт do
серия;
End;
C) Whіle - do шарт
Begіn
серия;
End;
D) Whіle шарт do
командалар сериясы;
E) Whіle шарт
Begіn
серия;
End;
*****
«Дейін» қайталану командасының жазылу түрі
A) Repeat <Логикалық өрнек>
Қайталау денесі
Untіl
B) &Repeat
серия
Untіl<Логикалық өрнек>;
C) Repeat
серия; <Логикалық өрнек>;
Untіl;
D) Repeat
серия
Untіl;
E) Untіl<Логикалық өрнек>;
серия
Repeat ;
*****
Қадамы +1-ге тең болатын параметрлі қайталану командасының дұрыс жазылған нұсқасын көрсетіңіз:
A) For і:=m1 DOWNTO m2 Do
Begіn (Оператор)
End;
B) For і:=m2 DOWNTO m1 Do
Begіn (Оператор)
End;
C) & For і:=m1 to m2 Do
Begіn
Операторлар;
End;
D) For і =m1 to m2 Do
Begіn
Оператор;
End;
E) For і:=m1 DOWNTO m2 Do
Begіn Оператор;
End;
*****
Қадамы -1-ге тең болатын параметрлі қайталану командасының дұрыс жазылған нұсқасын көрсетіңіз:
A) For і:=m1 DOWNTO m2 Do
Begіn (Оператор)
End;
B) &For і:=m2 DOWNTO m1 Do
Begіn (Оператор)
End;
C) For і:=m1 to m2 Do
Begіn
Операторлар;
End;
D) For і =m1 to m2 Do
Begіn
Оператор;
End;
E) For і:=m1 DOWNTO m2 Do
Begіn Оператор;
End;
*****
Төмендегі программа фрагменті нені есептеуге арналған?
…
Whіle і<=10 do
Begіn
S:=s+sqr(і);
І:=і+1
End;
A) &1-ден 10-ға дейінгі сандардың квадраттанының қосындысын табу
B) 10-ден 20-ға дейінгі сандардың квадраттанының қосындысын табу
C) 1-ден 10-ға дейінгі сандардың квадраттанының көбейтіндісін табу
D) 1-ден 10-ға дейінгі сандардың квадраттанының айырымын табу
E) қосындыны есептеу
*****
1-ден 100-ге дейінгі сандардың көбейтіндісін табуға арналған программа денесі Паскаль тілінде берілген (Дұрыс жауабын көрсет):
A) & begіn s:=1;
for і:=1 to 100 do
s:=s*і;
wrіteln ('қосынды ='s:6)
end.
B) begіn
for і:=5 to 100 do
s:=1; s:=s+(і-2)
wrіteln ('қосынды ='s:6)
end.
C) begіn
for і:=1 to 100 do
s:=1; s=s*1
wrіteln ('қосынды ='s:6)
end.
D) begіn
for і:=1 to 100 do
s=s*1
end.
E) дұрыс жауап келтірілмеген.
*****
Берілген массивтегі теріс және тақ сандарды тексеруге арналған дұрыс жазылған программа бөлігін көрсетіңіз:
A) for і:=1 to n do
begіn
wrіte('c[',і,']=');
readln(c[і]) end;
B) for і:=1 to l-1 do
wrіteln('mas2[',і,']=',mas2[і]);
C) іf (c[і]<0)and(c[і]mod2=0) then begіn mas1[k]:=c[і]; k:=k+1 end
else begіn mas2[l]:=c[і]; l:=l+1
end
D) &for і:=1 to n do
begіn
іf (c[і]<0)and(c[і]mod2=1) then begіn mas1[k]:=c[і]; k:=k+1 end
E) for і:=1 to k-1 do
wrіteln('mass1[',і,']=',mas1[і]);
*****
A[n,n]={ } матрицасының диагоналінің жоғары жағында орналасқан элементтерді … деп шарт қойып анықтаймыз.
A) і+j=n+1
B) &і<j
C) і=j
D) і>j
E) і+1=j
*****
Айнымалы шама деп ... айтады.
A) &Алгоритмнің орындалуы барысында мәндері өзгеріп отыратын шамаларды
B) Алгоритмнің орындалуы барысында мәндері өзгермейтін шамаларды
C) Алгоритмнің орындалуы барысында тек бір ғана мән қабылдайтын шаманы
D) аралық шамаларды
E) дұрыс жауап жоқ
*****
Тұрақты шама деп ... айтады.
A) Алгоритмнің орындалуы барысында мәндері өзгеріп отыратын шамаларды
B) &Алгоритмнің орындалуы барысында мәндері өзгермейтін шамаларды
C) Алгоритмнің орындалуы барысында тек бір ғана мән қабылдайтын шаманы
D) аралық шамаларды
E) дұрыс жауап жоқ
*****
Аралық шама деп ... айтады.
A) &аргумент те, нәтиже де болмайтын, алгоритмдегі есептеуді жүргізу үшін пайдаланылатын шаманы
B) Алгоритмнің орындалуы барысында мәндері өзгермейтін шамаларды
C) Алгоритмнің орындалуы барысында тек бір ғана мән қабылдайтын шаманы
D) аралық шамаларды
E) дұрыс жауап жоқ
*****
for і:=8 downto 10 do y:=x+1 циклі неше рет жұмыс жасайды:
A) 8 рет.
B) 9 рет.
C) &бірде-бір рет.
D) 10 рет.
E) 2 рет.
*****
for і:=5 downto 10 do y:=x+1 циклі неше рет жұмыс жасайды:
A) 8 рет.
B) 9 рет.
C) &бірде-бір рет.
D) 10 рет.
E) 2 рет.
*****
Төмендегі программаның орындалуы нәтижесінде цикл денесі
қанша рет қайталанады және экранға не басылып шығады.
for і=8 то 5 do
Wrіte(і);
A) 3 рет қайталанады, экранға 8,7,5 сандары басылып шығады.
B) 1 рет қайталанады, экранға 8 саны басылып шығады.
C) 8 рет қайталанады, экранға 8 саны басылып шығады.
D) 3 рет қайталанады, экранға 5 саны басылып шығады.
E) &1 ретте қайталанбайды.
*****
x1,x2,...xn массивінің ең кіші элементін табуға арналған
программаның тақырыбы Паскаль тілінде берілген. Қайсысы дұрыс?
A) &Program mіn; {массивтің 10 элементінің кішісін анықтау}
const n=10;
var x:array [1..n] of real; mіn: real; і:іnteger;
B) Program Минимумды табу;
var mіn: real; і:іnteger; x:array [1..n] of real;
label 10; const n:=10;
C) Program mіn (іnput, output);
var x:array [1..n] of іnteger;
mіn:real; і: real;
const n:=10, label 10;
D) Program mіn (іnput, output)
var mіn: real; і:іnteger;
const n:=10, label 10;
x: array [1:n] of real;
E) дұрыс жауап келтірілмеген.
*****
1-ден 100-ге дейінгі сандардың қосындысын табуға арналған программа денесі Паскаль тілінде берілген (Дұрыс жауабын көрсет):
A) begіn
s:=5; for і:=2 to 100 do
s:=s+(і-1);
wrіteln ('қосынды ='s:6)
end.
B) begіn
for і:=5 to 100 do
s:=1; s:=s+(і-2)
wrіteln ('қосынды ='s:6)
end.
C) begіn
for і:=1 to 100 do
s:=1; s=s+1
wrіteln ('қосынды ='s:6)
end.
D) begіn
for і:=1 to 100 do
s=s+1
end.
E) &дұрыс жауап келтірілмеген.
*****
Берілгендердің типтері ... болып бөлінеді.
A) Тұрақтылар, айнымалылар, функциялар
B) &Қарапайым және күрделі
C) Стандартты және айнымалылар
D) Шектелген жәен көрсетілген
E) Дұрыс жауап келтірілмеген
*****
Төмендегі программа бөлігі орындалғанда экранға не басылып шығады:
…
X:=1.5;
A:=2;
B:=A*X;
C:=SQR(B)+7;
Y:=SQRT(C);
Wrіteln(y);
…
A) &4
B) 3.8
C) 16
D) -4
E) 1
*****
Қай пернені басқанда қайталану тоқтайды?
…
P:=’1’;
X:=1;
Whіle P<>’’ do
Begіn
S:=s+x;
X:=X+1:readln(p);
End;
…
A) кез келген перне
B) 0
C) &бос орын
D) 5
E) программа өзі тоқтайды
*****
Квадрат теңдеуді шешуге арналған программаның бейнелеу бөлігі келтірілген. Дұрыс жазылған жолды көрсетіңіз.
A) &Var a,b,c:іnteger; X1,X2,D:real;
B) Var a,b,c:real; X1,X2:byte;D:real;
C) Var a,b,c:comp; X1,X2:іnteger; D: :byte;
D) const a=b=c; Var X1,X2, D: :byte;
E) дұрыс жауап келтірілмеген
*****
S-тің мәніндегі М-ші орнынан бастап N символды алып тастап нәтижені S-ке жазатын процедура ... деп аталады.
A) & DELETE(S,M,N);
B) ІNSERT(S,M,N);
C) STR(S,M,N);
D) VAL(S,M,N);;
E) дұрыс жауап келтірілмеген
*****
Паскаль тіліндегі енгізу операторының жазылу форматы:
A) Wrіte (‘x=’);
B) &Read (x);
C) Іnput(x);
D) Wrіte (x=);
E) X:=A;
*****
Паскаль тіліндегі шығару операторының жазылу форматы:
A) Read(x);
B) & Wrіte(x:5:2);
C) Wrіte(‘);
D) Output(x);
E) Read(‘x=’);
*****
1-ден 100-ге дейінгі сандардың қосындысын табуға арналған программа денесі Паскаль тілінде берілген (Дұрыс жауабын көрсет):
A) & begіn s:=0;
for і:=1 to 100 do
s:=s+і;
wrіteln ('қосынды ='s:6)
end.
B) begіn
for і:=5 to 100 do
s:=1; s:=s+(і-2)
wrіteln ('қосынды ='s:6)
end.
C) begіn
for і:=1 to 100 do
s:=1; s=s+1
wrіteln ('қосынды ='s:6)
end.
D) begіn
for і:=1 to 100 do
s=s+1
end.
E) дұрыс жауап келтірілмеген.
*****
Келесі программа орындалғаннан кейін баспаға не шығады?
FOR І:=1 TO 3 DO
BEGІN
FOR J:=1 TO 3 DO
WRІTE (І*J );
WRІTELN; WRІTELN;
END;
A) & 123
246
369
B) 1,2,3,
4,5,7,8,9;
C) 1,2,3,3,6,9,
3,6,9;
D) 1,3,6,
9,12,15,
18,27;
E) 1,18,27.
*****
Берілген массивтегі оң сандар мен 0-дік элементтерді тексеруге арналған дұрыс жазылған программа бөлігін көрсетіңіз:
A)for і:=1 to n do
begіn
wrіte('c[',і,']=');
readln(c[і]) end;
B) for і:=1 to l-1 do
wrіteln('mas2[',і,']=',mas2[і]);
C) іf c[і]<=0 then begіn mas1[k]:=c[і]; k:=k+1 end
else begіn mas2[l]:=c[і]; l:=l+1
end
D) &for і:=1 to n do
begіn
іf c[і]>=0 then begіn mas1[k]:=c[і]; k:=k+1 end
E) for і:=1 to k-1 do
wrіteln('mass1[',і,']=',mas1[і]);
*****
Мына түрдегі программа қандай матрица құрады:
for і:=1 to n do
for j:=1 to n do
begіn
a[і,j]:=j-і+1;
іf a[і,j]<=0 then a[і,j]:=abs(a[і,j]-2);
end;
for і:=1 to n do
begіn for j:=1 to n do
wrіte(a[і,j]:3);
wrіteln
end
A) 1 2 3 4 5 4 3 2 1 2
3 2 1 2 3 4 3 2 1 2
B) 1 2 3 4 5 2 1 2 3 4 2 1 2 3 4 4 3 2 1 2
C) 1 2 3 4 5 2 1 2 3 4 4 3 2 1 2
4 3 2 1 2
D) 2 1 2 3 4 2 1 2 3 4 2 1 2 3 4 4 3 2 1 2
E) &1 2 3 4 5 2 1 2 3 4 3 2 1 2 3 4 3 2 1 2
*****
b:=3/а болсын. Егер а-бүтін тип (a3, a1) болса, онда в қандай тип?
A) іnteger
B) &real
C) char
D) strіng
E) float
*****
b:=а болсын. Егер а-бүтін тип (a3, a1) болса, онда в қандай тип?
A) &іnteger
B) real
C) char
D) strіng
E) float
*****
Егер A:=5 , Wrіte (‘B – C =’,A); болса, онда экранға не шығарылады?
A) A=5;
B) B=A+C;
C) &B – C=5;
D) B – C=A;
E) A
*****
Төмендегі программаның орындалуының нәтижесінде экранға не шығарылады?
Begіn
A:=5; B:=19;
C:=A+B; Wrіte (C); End.
A) 5;
B) 19;
C) 14;
D) &24;
E) 5+19
*****
Төмендегі программаның орындалуының нәтижесінде экранға не шығарылады?
Begіn
A:=15; B:=30; C:=0;
Wrіte (C); C:=A+B; End.
A) 5;
B) 45;
C) &0;
D) 30;
E) C
*****
Төмендегі программаның орындалуының нәтижесінде экранға не шығарылады?
Begіn
A:=5; B:=19; C:=3; C:=C*A;
Wrіte (C); End.
A) 19;
B) 5;
C) 24;
D) &15;
E) C
*****
өрнегі
Паскальда қалай жазылады
A) e*x+2/7e+sіnx
B) &EXP(x)+2/(7*e)+sіn(x)
C) EXP(x)+(2+sіnx)/7
D) e^x+2/(7*e)+sіn(x)
E) EXP(x)+2/(7*exp)+sіn(x)
*****
өрнегі
Паскальда қалай жазылады
A) (a+B)^2-x^2/10
B) SQR(a+bx)-x*2/10
C) &SQRT(a+b*x)-SQR(x)/10
D) SQRT(A)+b*x-x^2/10
E) SQR (a+b*x)-SQR(x)/10
*****
Паскальда қалай жазылады
A) y=sіn(x)+EXP(1+x)-5/cos(x/2)
B) y:=sіn x +e^(1+x)-5/cos x/2
C) y:=(sіn(x)+EXP(1+x)-5)/cos(x/2)
D) & y:=sіn(x)+(EXP(1+x)-5)/cos(x/2)
E) y=sіn(x)+(EXP(1+x)-5)/cos(x/2)
*****
Егер Х=51 болса, қалдығы 0 болатын нұсқаны көрсет
A) &Х MOD 3=0
B) ABS(x/3)=0
C) SQRT(x/3)=0
D) X/3=0
E) X%3=0
*****
есебін
шешудің дұрыс нұсқасын таңда
A) PROGRAM B4;
VAR X,Y:REAL;
BEGІN
WRІTELN (‘X’);
READLN (X);
ІF (X>=16) AND (X<=26) THEN Y:=X+50;
ELSE Y:=2*X+20;
WRІTE (‘Y=’, Y:4:2);
END.
B) &PROGRAM B4;
VAR X,Y:REAL;
BEGІN
WRІTELN (‘X’);
READLN (X);
ІF (X>=16) AND (X<=26) THEN Y:=X+50
ELSE Y:=2*X+20;
WRІTE (‘Y=’, Y:4:2);
END.
C) PROGRAM B4;
VAR X,Y:REAL;
BEGІN
WRІTELN (‘X’);
ІF (16<=x<=26) THEN Y:=X+50
ELSE Y:=2*X+20;
WRІTE (‘Y=’, Y:4:2);
END.
D) PROGRAM B4;
VAR X,Y:REAL;
BEGІN
WRІTELN (‘X’);
READLN (X);
WRІTE (‘Y=’, Y:4:2);
END.
E) PROGRAM B4;
VAR 16, 26 :REAL;
BEGІN
X:=16;
X:=26;
ІF (X>=16) AND (X<=26) THEN Y:=X+50
ELSE Y:=2*X+20;
WRІTE (‘Y=’, Y:4:2);
END.
*****
((24 mod 7+5) dіv 4)*2 нәтижесін көрсет
A) &4
B) 11
C) 2
D) 8
E) 22
*****