7.Аралық бақылау тапсырмалары (1 және 2)
1-аралық бақылау тапсырмалары
1. [-20, 50] арасындағы кездейсоқ бүтін сан шығару операторы қалай жазылады?
a) random(70)+20
b) random(50)-20
c) random(70+20)
d) random(70)-20
2. х айнымалысын форматтап шығару вариантын көрсет:
a) write(x)
b) write(‘x=4:2’,x)
c) write(‘x=’,x:6:2)
d) writeln(x)
3. sqrt(exp(2*ln(5))) өрнегінің мәні неге тең?
a) 2
b) 5
c) 32
d) 25
4. sqr(exp(3*ln(2))) өрнегінің мәні неге тең?
a) 36
b) 81
c) 64
d) 16
5. Нақты типке не жатады:
1. word
2. real
3. double
4. byte
5. extended
a) 1-5
b) 1,2,5
c) 2,3,5
d) 1,4
6. inc (x) функциясы не орындайды?
a) х -ті 1-ге кемітеді
b) х -ті 1-ге көбейтеді
c) х -ті 1-ге бөледі
d) х -ті 1-ге арттырады
7. inc(x);x:=x*1;x:=sqr(x); нәтижеде x-тің мәні неге тең болады?
a) 2
b) 0
c) 4
d) 1
8. формуласының Паскаль тілінде жазылуы: 3 5 x ctgx y
a) у:= cos(x)/sin(x)+exp((5/3)*ln(x))
b) у:= ctan(x)+exp((5/3)*ln(x))
c) у:= ctg(x)+exp((3/5)*ln(x))
d) у:= sin(x)/cos(x)+exp((5/3)*ln(x))
9. (6 div 3) mod 2 өрнегінің нәтижесі неге тең?
a) 0
b) 3
c) 2
d) 1
10. Жалақы мөлшері S-тең. Оның 10 процентін есептеу формуласының дұрыс жазылуы:
a) s*100/10
b) s/100
c) s*10/100
d) s*10
11. Ақпарат өлшемі S кбайтпен берілген тең. Оны байтқа айналдыру формуласының дұрыс жазылуы:
a) s/(1024*1024)
b) s/1024
c) s*1024
d) s*1000
12. Екі қабырғасы мен олардың арасындағы бұрышы берілген үшбұрыш ауданын табу формуласының дұрысын көрсет:
a) S:=1/2* a*b*sin (x*PI/180)
b) S:=( a*b*sin (x)) /2
c) S:=2* a*b*sin (x*PI/180)
d) S:=1/2* a*b*sin x
13. Төмендегі программа нені анықтайды?
read( x1, у1, х2, у2);
d:= SQRT (sqr(x2-x1)+sqr(y2-y1));
write(d);
a) жазықтықтағы 4 нүктенің ара қашықтығын
b) кеңістіктегі екі нүктенің ара қашықтығын
c) жазықтықтағы екі нүктенің ара қашықтығын
d) нүктеден координаталар басына дейінгі қашықтықты
14. Радиусы берілген шеңбердің ұзындығын және , осы шеңбермен шектелген дөңгелектің ауданын табу программасының дұрысы қайсы?
a) begin readln(R); L:=4*pi*R; S:=pi*sqr(r); write(L,S); end.
b) begin readln(R); L:=2*pi*R*R; S:=pi*sqr(r); write(L,S); end.
c) begin readln(R); L:=2*pi*R; S:=pi*sqr(r); write(L,S); end.
d) begin readln(R); L:=2*pi*R; S:=pi*sqrt(r); write(L,S); end.
15. x:=5; s:=6.7; x mod 2+round(S) өрнегінің нәтижесі неге тең?
a) 9
b) 1
c) 8
d) 2.5
16. Берілген нүктенің ішкі радиусы 2-ге сыртқы радиусы 4-ке тең сақинаға тиістілігін тексеретін шарттың қайсысы дұрыс?
a) (sqr(x)+sqr(y)>4) and (sqr(х)+sqr(y)<16)
b) (sqr(x)+sqr(y)>2) and (sqr(х)+sqr(y)<4)
c) (sqr(x)+sqr(y)<4) and (sqr(х)+sqr(y)<16 )
d) (sqr(x)+sqr(y)>4) or (sqr(х)+sqr(y)<16)
17. Қабырғалары a,b,c үш санға тең үшбұрыштың болатындығын тексеретін дұрыс шартты көрсет
a) а>b+с
b) ( а>b+с) or (b>а+c) or (c>b+a)
c) а
d) (а>b+с) and (b>а+c) and (c>b+a)
18. Төмендегі программа нәтижесінде экранға не шығады?
х:=5; у:=4;
if x mod 2=0 then begin x:=sqr(x); y:= sqr(y); end
else begin х:=х*2; у:=у*2 end;
write (х, у);
a) 25, 16
b) 10, 8
c) 10, 16
d) 25, 8
19. Төмендегі программада цикл неше рет қайталанады?
х:=1;
while х<= 10 do begin
writeln(х);
х:=х+2;end;
a) 5
b) 10
c) 4
d) 3
20. Төмендегі программа нәтижесінде не табылады?
for х:=11 to 99 do
if (x mod 3=0) or (x mod 5=0) then S:=S+1;
write(S);
a) Барлық екі таңбалы сандардың ішінен 3-ке немесе 5-ке бөлінетін сандардың саны;
b) Барлық екі таңбалы тақ сандардың ішінен 3-ке немесе 5-ке бөлінетін сандардың саны;
c) Барлық екі таңбалы сандардың ішінен 3-ке немесе 5-ке бөлінетін сандардың қосындысы;
d) Барлық екі таңбалы сандардың ішінен 3-ке және 5-ке бөлінетін сандардың қосындысы;
21. Программаның орындалу нәтижесінде k-ның мәні неге тең болады?
for х:=1 to 10 do
if x mod 9=0 then k: =k+1
write(k);
a) 4
b) 3
c) 2
d) 1
22. Екі натурал санның ең үлкен ортақ бөлгішін табу алгоритмі қалай аталады?
a) Паскаль
b) Ада Лавлейс
c) Беббидж
d) Евклид
23. Келесі программа фрагменті нені табады?
Begin
Readln(a,b);
While a<>b do
If a>b then a:=a-b else b:=b-a;
write(а);
End.
a) берілген екі санның үлкенін
b) бір- біріне тең емес екі санның айырмасын
c) берілген екі санның ең кіші ортақ еселігін
d) берілген екі санның ең үлкен ортақ бөлгішін
24. Келесі программа не анықтайды?
var a: array [1..10] of real;
i, p: integer; x: real;
begin
for i:=1 to 10 do
read (a[i]);
x:=a[1]; p: =1;
for i:=1 to 10 do
if a[i]>x then begin x:=a[i]; p:=i; end;
writeln (х)
End.
a) массивтің х-ке тең элементінің индексін табады.
b) минимум элементті табады
c) максимум элементті табады
d) массивтің x-ке тең элементін табады
25. Келесі программа нені орындайды?
var s:string; k:byte;
begin read(s);
for i:=1 to length(a) do
if s[i]='c' then inc(k);
writeln(k); end.
a) Сөйлемдегі 'с' әрпінен басталатын сөздерді санайды
b) Сөздегі берілген символды әрпін санайды
c) Сөздегі с әрпін санайды
d) Сөздегі с әрпін экранға шығарады
26. Төмендегі функция нені анықтайды?
function PP(a,b:byte):byte;
begin
if aend;
a) екі бүтін санның ең үлкенін
b) екі бүтін санның ең үлкен ортақ бөлгішін
c) екі нақты санның ең үлкенін
d) екі бүтін санның ең кішісін
27. Төмендегі процедура нені анықтайды?
procedure PP(a,b:byte;var p:byte);
begin
while a<>b do
if a>b then a:=a-b else b:=b-a;
p:=b;
end;
a) екі бүтін санның ең кішісін
b) екі бүтін санның ең үлкенін
c) екі бүтін санның ең кіші ортақ еселігін
d) екі бүтін санның ең үлкен ортақ бөлгішін
28. Жиындардың айырмасы неге тең? [1..5,9,12], [1,2,3,4,5,6..12]
a) [1..12]
b) [6..11]
c) [9,12]
d) []
29. a және b жиындарының қиылысуы қандай жиын болады:
a: = [x,y,z,β,α]; b: = [k,l,m,n,];
a) [ ]
b) [x,y,z ,β,α,k,l,m,n]
c) [x]
d) 0
30. Келесі функция орындалғаннан кейін s жолының мәні неге тең болады?
a:=’Programmist’; s:=copy (a,5,7);delete (s,4,4); writeln(s);
a) ‘mist’
b) ‘Progra’
c) ‘rammist’
d) ‘ram’
31. a:=’12’; b:=’12345’; insert(a, b, 3); нәтижесінде b жолының мәні неге тең болады?
a) 1234512
b) 12125
c) 1231245
d) 1212345
32. 640х480 шешімді графиктік режимде экранның оң жақ төменгі бөлігіне нүкте салу операторы
a) PutPixel (40,250, red);
b) PutPixel (630,250, red);
c) PutPixel (630,10, red) ;
d) PutPixel (40,40, red);
33. Берілген а символдық жолын төңкеру фрагменті:
a) for i:=1 to length(a) do b:=b+copy(a,i,1);
b) for i:=1 to length(a) do b:=copy(a,i,1)+b;
c) for i:=1 to length(a) do b:=copy(a,i,1);
d) for i:=1 to length(a) do b:=copy(a,i,1)+a;
34. p:=1;
For i:=1 to n do
p:=p*i; программа фрагменті нені анықтайды?
a) n санның көбейтіндісін табады
b) массивтің көбейтіндісін табады
c) i санның қосындысын табады
d) n санның факториалын табады
35. Кідірісті ұйымдастыратын Delay(n) процедурасында n мәнінің өлшем бірлігі:
a) секунд
b) миллисекунд
c) минут
d) макросекунд
36. Файлға жазу үшін қолданылатын процедура:
a) rewrite
b) erase
c) rename
d) read
37. Файлдық айнымалы мен дискілік файл аты арасында байланыс орнату операторы:
a) assign
b) text
c) file
d) file of
38. Программаның келесі бөлігі нені анықтайды:
Type wirt=record
c,d:byte;
e:word
end;
Var a,b:wirt;
a) массивті
b) жиынды
c) жазбаны
d) файлды
39. Жазбада өрістерді біріктіру үшін қолданылатын қызметші сөз:
a) set of
b) with..do
c) record
d) include
40. Паскальда ішкі программаның неше түрі бар?
a) 6
b) 2
c) 3
d) 4
Жауаптары: 1-d, 2-c, 3-b,4-c, 5-c, 6-d, 7-d, 8-a, 9-a, 10-c, 11-c, 12-a, 13-c, 14-c, 15-c, 16-a, 17-d, 18-b, 19-a, 20-a, 21-d, 22-d, 23-d, 24-c, 25-c, 26-a,27-d, 28-d, 29-a, 30-d, 31-d, 32-b, 33-b, 34-d, 35-b, 36-a, 37-a, 38-c, 39-b, 40-b.
16>
Достарыңызбен бөлісу: |