- •012 Өрнектiң мёнiн есептеу керек.
- •023 Өрнектiң мёнiн есептеу керек
- •089 Өрнектiң мёнiн есептеу керек.
- •090 Паскаль тiлiнде сёйкес меншiктеу операторын жазу керек
- •091 Шартты операторын әолданып келтiрiлген функцияны есептеу керек
- •099 Өрнектiң мёнiн есептеу керек
- •102 Келтiрiлген программа ғандай Нәтиженi баспа№а шы№арады.
023 Өрнектiң мёнiн есептеу керек
[ 3.. 14 ] * [ 4, 14.. 61 ] + [ 5.. 11] – [ 6.. 16 ] * [ 7]
A) [3.1..4.9, 5.5…7.5]
B) [‘a’..’k’,’z’]
C) [‘>=’,’<’,’=’]
D) [ 4..6,8..11,14]
E) [5..9,9.1..9.9]
{Дұрыс жауабы}=D
024 Келесi конструкциялардың ғайсы жиын болып саналады (Паскаль тiлiнiң ережесi бойынша)
A) [3.1..4.9, 5.5…7.5]
B) [‘a’..’k’,’z’]
C) [‘>=’,’<’,’=’]
D) [ [ ], [7] ]
E) [5.. 9, 9.1 .. 9.9]
{Дұрыс жауабы}=B
025 К айнымалысына келесi информацияны меншiктеу керек: конус биiктiгi –5.7, оның негiздегi дәңгелектiң радиусы – 2.3, центрi (0, 1.5) нңктеде орналасған. К айнымалының баяндауы келтiрiледi:
TYPE КОНУС= RECORD
ВЫСОТА: REAL;
ОСНОВ: RECORD
РАДИУС :REAL;
X, Y : REAL
END; END;
VAR K: КОНУС;
A) WITH K DO
BEGIN ВЫСОТА:= 5.7; РАДИУС:= 2.3; X:= 0; Y:= 1.5
END;
B) WITH K DO
BEGIN ВЫСОТА:= 5.7;
WITH ОСНОВ DO
BEGIN РАДИУС : = 2.3; X: = 0; Y: = 1.5 END;
C) WITH K DO
BEGIN ВЫСОТА:= 5.7; РАДИУС:= 2.3;
WITH ОСНОВ DO
BEGIN X: = 0; Y: = 1.5 END;
D) WITH K DO
BEGIN ВЫСОТА:= 5.7; РАДИУС:= 2.3;
WITH ОСНОВ DO
BEGIN X: = 0; Y: = 1.5 END;
END;
E) WITH K, ОСНОВ DO
BEGIN ВЫСОТА:= 5.7; РАДИУС:= 2.3; X:= 0; Y:= 1.5 END;
{Дұрыс жауабы}=E
026 70 Символдан тҢратын текстiк информацияны жол тңрiнде баяндау керек
A) VAR STR1: PACKED ARRAY [ 1 … 70 ] OF CHAR;
B) VAR STR1: STRING (70);
C) VAR STR1: ARRAY [1 … 70] OF CHAR ;
D) VAR STR1: STRING [70];
E) VAR STR1: PACKED ARRAY(1 … 70) OF CHAR;
{Дұрыс жауабы}=D
027 КнигA айнымалысына келесi информацияны меншiктеу керек:
Автор – Петров О. П.; кiтаптың аты – Физика. Баспаның аты – Наука, баспа№а шыәған жылы – 1975. Сонымен ғатар, Книга2 айнымалысына да осындай информацияны меншiктеу керек. Тек баспа№а шыәған жылын 1980 ж. ауыстыру ғажет.
Книга1, Книга2 айнымалыларының баяндалуы келтiрiледi.
TYPE КНИГА = RECORD АВТОР, НАЗВ, ИЗДАТ = STRING [20];
ГОД_ИЗД; 1960..1995
END;
VAR КНИГ1, КНИГ2: КНИГА;
А) WITH КНИГ1 DO АВТОР: = ‘; ГОД_ИЗД: = 1975;
ИЗДАТ : = ‘ НАУКА’; ГОД_ИЗД: = ‘ ФИЗИКА’;
КНИГ2. ; ГОД_ИЗД: = 1980;
B) WITH КНИГ1 DO
BEGIN
АВТОР: = ‘ПЕТРОВ О. Н. ‘ ; НАЗВ; = ‘ФИЗИКА’;
ИЗДАТ : = ‘ НАУКА’; ГОД_ИЗД: = 1975;
END;
КНИГ2: = КНИГ1; КНИГ2. ; ГОД_ИЗД: = 1980;
C) WITH КНИГ1 DO
BEGIN АВТОР: = ‘ПЕТРОВ О. Н. ‘ ; НАЗВ; = ‘ФИЗИКА’;
ИЗДАТ : = ‘ НАУКА’; ГОД_ИЗД: = 1975;
КНИГ2. ; ГОД_ИЗД: = 1980;
END;
D) WITH КНИГ2 DO
BEGIN
АВТОР: = ‘ПЕТРОВ О. Н. ‘ ; НАЗВ; = ‘ФИЗИКА’;
ИЗДАТ : = ‘ НАУКА’; ГОД_ИЗД: = 1975;
END;
КНИГ1: = КНИГ2; КНИГ1. ГОД_ИЗД: = 1980;
E) WITH КНИГ1 DO
BEGIN
АВТОР: = ‘ПЕТРОВ О. Н. ‘ НАЗВ; = ‘ФИЗИКА’;
ИЗДАТ : = ‘ НАУКА’ ГОД_ИЗД: = 1975;
END;
КНИГ1: = КНИГ2; КНИГ1. ГОД_ИЗД: = 1980;
{Дұрыс жауабы}=B
028 Келесi программа орындал№аннан кейiн баспа№а не шы№ады?
PROGRAM PRINT2( INPUT, OUTPUT);
TYPE STR2 = PACKED ARRAY [1.. 10] OF CHAR;
VAR I: INTEGER; T2: STR2;
PROCEDURE P2(VAR S2: STR2);
BEGIN I: = 1;
WHILE S2 [I] < ‘ 8’ DO
BEGIN S2 [ I ]: =SUCC( S2[ I ]; I: = I+1 END;
END;
BEGIN I: = 1; T2: = ‘ 1230489756’; P2( T2);
WRITELN (t2[ I ])
END.
А) 9
B) 4
C) 8
D) 6
E) 7
{Дұрыс жауабы}=C
029 Xn мёнiн есептейтiн степ (x, n) функциясын баяндау керек (х- наәты типтi; n – натурал типтi) сонан кейiн осы функцияны келесi b = 2.7k+ (A+ 1)-k есептеу ңшiн пайдалану ғажет
A) PROGRAM ВЫЧСТЕП ;
TYPE НАТУР = 1 … MAXINT ;
VAR A,B: REAL; K: НАТУР;
FUNCTION СТЕП ( X: REAL; N: НАТУР) : REAL;
VAR I: INTEGER; Y: REAL;
BEGIN
Y: = 1;
FOR I: = 1 TO N DO
Y: = Y * X;
СТЕП: = Y
END;
BEGIN
READ ( K, A);
B: = СТЕП( 2.7, K) + 1/ СТЕП( A+ 1, K);
WRITELN(‘ B = ‘, B: 3: 7)
END.
B) PROGRAM ВЫЧСТЕП
TYPE НАТУР = 1 … MAXINT ;
VAR A,B: REAL; K: НАТУР;
FUNCTION СТЕП ( X: REAL; N: НАТУР) : REAL;
VAR I: INTEGER; Y: REAL;
BEGIN
Y: = 1;
FOR I: = 1 TO N DO
Y: = Y * X;
СТЕП: = Y
END;
BEGIN
READ ( K, A);
B: = СТЕП( 2.7, K) + 1/ СТЕП( A+ 1, K);
WRITELN(‘ B = ‘, B: 7: 3 )
END.
C) PROGRAM ВЫЧСТЕП ;
TYPE НАТУР = 1 … MAXINT ;
VAR A,B: REAL; K: НАТУР;
FUNCTION СТЕП ( X: REAL; N: НАТУР) : INTEGER;
VAR I: INTEGER; Y: REAL;
BEGIN
Y: = 1;
FOR I: = 1 TO N DO
Y: = Y * X;
СТЕП: = Y
END;
BEGIN
READ ( K, A);
B: = СТЕП( 2.7, K) + 1/ СТЕП( A+ 1, K);
WRITELN(‘ B = ‘, B: 7)
END.
D) PROGRAM ВЫЧСТЕП;
TYPE НАТУР = 1 … MAXINT ;
VAR A,B: REAL; K: НАТУР;
FUNCTION СТЕП ( X: REAL; N: НАТУР) : REAL;
VAR I: INTEGER; Y: REAL;
BEGIN
Y: = 1;
FOR I: = 1 TO N DO
Y: = Y * X;
СТЕП: = Y
END;
BEGIN
READ ( K, A);
B: = СТЕП( 2.7, K) + 1/ СТЕП( A+ 1, K);
WRITELN(‘ B = ‘, B: 7: 3 )
END.
E) PROGRAM ВЫЧСТЕП ;
TYPE НАТУР = 1 … MAXINT ;
VAR A,B: REAL; K: НАТУР;
FUNCTION СТЕП ( X: REAL; N: НАТУР) : REAL;
VAR I: INTEGER; Y: REAL;
BEGIN
Y: = 0;
FOR I: = 2 TO N DO
Y: = Y * X;
СТЕП: = Y
END;
BEGIN
READ ( K, A);
B: = СТЕП( 2.7, K) + 1/ СТЕП( A+ 1, K);
WRITELN(‘ B = ‘, B: 7: 3 )
END.
{Дұрыс жауабы}=E
030 Келтiрiлген программа баспа№а ғандай сандарды шы№арады?
PROGRAM PAR ;
VAR C, D: INTEGER;
PROCEDURE Q( X,Y: INTEGER);
PROCEDURE P( X,Y: INTEGER);
BEGIN Y: = X+1 END;
BEGIN
C: = 2; D: = 0; P(SQR( C) + C,D); WRITELN(D);
C: = 2; D: = 0; Q(SQR(C) + C, D); WRITELN(D); END.
A) 2 3
B) 6 7
C) 0
D) 7 7
E) 0 0
{Дұрыс жауабы}=C
031 Жазбалармен жҢмыс iстеу операторын бастаудың тңйiндi сәзi:
A) for
B) with
C) repeat
D) while
E) case
{Дұрыс жауабы}=B
032 Жиын№а жататынды№ын тексеру:
A) to
B) of
C) in
D) do
E) дҢрыс жауабы жоә
{Дұрыс жауабы}=C
033 Жал№ан шарт бойынша ғайталау операторының соңы;
A) until
B) else
C) repeat
D) while
E) for
{Дұрыс жауабы}=A
034 Массивтi баяндау ғай тңйiндi сәзден басталады?
A) array
B) vector
C) record
D) packed
E) string
{Дұрыс жауабы}=A
035 Жазбаны баяндау ғай тңйiндi сәзден басталады?
A) array
B) pointer
C) record
D) real
E) file
{Дұрыс жауабы}=C
036 Жал№ан шарт бойынша ғайталау операторының басы
A) until
B) else
C) repeat
D) while
E) for
{Дұрыс жауабы}=C
037 Repeat .. Until нҢсғауының жалпы жазылу тңрi дҢрыс па?
Repeat
<НҢсғау1>
<нҢсғау2>
................
Until <әрнек>;
A) Иё
B) жоә
C) бiлмеймiн
D) сёйкес емес
E) дҢрыс жауабы жоә
{Дұрыс жауабы}=A
038 Келесi ғай ғайталау нҢсғауының жазылу форматын бередi?
FOR <айнымалы>:=<бастапғы мёнi>TO{DOWNTO} <со”№ы мёнi> DO <нҢсғау>
A) алдын – ала шарт бойынша ғайталау
B) келесi шарт бойынша ғайталау
C) бiлмеймiн
D) параметрлiк ғайталау
E) дҢрыс жауабы жоә
{Дұрыс жауабы}=D
039 Келесi ғай нҢсғаудың жазылу форматын бередi?
<айнымалы>:= <әрнек>;
A) кәшу нҢсғауыны”
В) меншiктеу нҢсғауы
C) шартты нҢсғауды”
D) та”дау нҢсғауыны”
E) дҢрыс жауабы жоә
{Дұрыс жауабы}=B
040 Келесi ғай нҢсғаудың толыә жазылу форматын бередi?
IF <логикалыә әрнек> THEN <нҢсғау> [ELSE <нҢсғау>;]
A) кәшу нҢсғауының
B) меншiктеу нҢсғауының
С) шартты нҢсғаудың
D) таңдау нҢсғауының
E) дҢрыс жауабы жоә
{Дұрыс жауабы}=C
041 Келесi ғай нҢсғаудың толыә жазылу форматын бередi?
WHILE <логикалыә әрнек> DO <нҢсғау>
A) кәшу нҢсғауының
B) меншiктеу нҢсғауының
С) алдын-ала шарт бойынша ғайталау нҢсғауының
D) таңдау нҢсғауының
E) дҢрыс жауабы жоә
{Дұрыс жауабы}=C
042 Келесi ғай нҢсғаудың толыә жазылу форматын бередi?
CASE <селектор> OF
<Const1> : <нҢсғау>;
<Const2> : <нҢсғау>;
........................................
[ELSE <нҢсғау>;]
End; {Case}
A) кәшу нҢсғауыны”
B) меншiктеу нҢсғауыны”
C) шартты нҢсғауды”
D) та”дау нҢсғауыны”
E) дҢрыс жауабы жоә
{Дұрыс жауабы}=D
043 Келесi ғай нҢсғаудың толыә жазылу форматын бередi?
GOTO <белгi>;
A) кәшу нҢсғауының
B) меншiктеу нҢсғауының
C) алдын-ала шарт бойынша ғайталау нҢсғауының
D) таңдау нҢсғауының
E) дҢрыс жауабы жоә
{Дұрыс жауабы}=A
044 Типтердi баяндау бәлiмiнде ғандай кңрделi типтiң жалпы жазылу форматы кәрсетiлген?
Type <идентификатор> = Array [<индекс типi>,<индекс типi>, ...] Of <элемент типi>;
A) массив
B) жазба
C) файл
D) жиын
E) дҢрыс жауабы жоә
{Дұрыс жауабы}=A
045 Нәтиже неге тең?
1) TRUNC (5.61) 2) TRUNC (-5.61)
A) 1) 5 жёне 2) - 6
B) 1) 6 жёне 2) - 5
C) 1) 6 жёне 2) -6
D) 1) 5 жёне 2) – 5
E) 1)4 жёне 2) 6
{Дұрыс жауабы}=D
046 Нәтиже неге тең?
1. ROUND (17.96) 2. ROUND (-17.16)
A) 17 жёне -17
B) 17 жёне -18
C) 18 жёне -18
D) 18 жёне -17
E) 4 жёне 6
{Дұрыс жауабы}=D
047 Нәтиже неге тең?
1. ORD ( CHR (49)) 2. CHR ( ORD (‘*’)
A) 49 жёне ‘*’
B) 49 жёне *
C) 50 жёне “
D) 50 жёне ‘‘
E) 49 жёне +
{Дұрыс жауабы}=B
048 Нәтиже неге тең?
1 . PRED ( ‘B’ ) 2. SUCC (‘ B’ )
A) C A
B) A C
C) A D
D) D C
E) А С
{Дұрыс жауабы}=B
049 Тәменде әрнек тңрiнде келтiрiлген тҢжырымдамалардың ғайсысы дҢрыс жазыл№ан?
А мёнi ( 0,3 ) аралы№ында жатпайды:
( A<= 0) OR (A>= 3)
А мёнi ( -2,0 ) аралы№ында жатады:
( A>=-2 ) AND (A>=0)
A) тек 1.
B) 1 жёне 2
C) тек 2
D) 1-де , 2-де дҢрыс емес
E) дҢрыс жауабы жоә
{Дұрыс жауабы}=A
050 CASE операторын әолданудың дҢрыс вариантын таңдаңыз?
A) CASE l OF
1;3;5: WRITELN (‘таә’);
2;4;6: WRITELN (‘жҢп’);
END;
B) CASE l OF;
1,3,5: WRITELN (‘таә’);
2;4;6: WRITELN (‘жҢп’);
END;
C) CASE l OF
1,3,5: WRITELN (‘таә’);
2,4,6: WRITELN (‘жҢп’);
END;
D) CASE l OF
1,3,5: WRITELN (таә);
2,4,6: WRITELN (жҢп);
END;
E) CASE l OF
1,3,5: WRITELN (‘таә’);
2,4,6: WRITELN (‘жҢп’);
{Дұрыс жауабы}=C
051 Жазба тектi деректердегi мёлiметтер тектерi ёртңрлi болуы мңмкiн бе?
A) жоә
B) тек бiр тектi
C) Иё
D) наәты тектi бола алмайды
E) дҢрыс жауабы жоә
{Дұрыс жауабы}=C
052 Тәменде келтiрiлген ғайталау операторының орындалу Нәтижесiнде S айнымалысының мёнi неге тең ?
.. var S,i : integer; sim: char; lop : boolean;
s :=0; for i:=5 to 7 do s:=s+1;
s :=0; for i:=10 downto 6 do s :=s+1;
s := 0; for sim :=’A’ to ‘D’ do s :=s+1;
s :=0; for lop:=false to true do s:= s+1;
A) 1) 6 2) 5 3) 4 4) 2
B) 1) 3 2) 4 3) 4 4) 1
C) 1) 3 2) 5 3) 4 4) 2
D) 1) 2 2) 5 3) 3 4) 1
E) 1) 4 2) 2 3) 4 4) 1
{Дұрыс жауабы}=C
053 Тәменде келтiрiлген программа бәлiгi келесi тҢжырымдаманы дҢрыс суреттей ме?
Наәты тектi X жёне Y айнымалыларының кiшiсiн нәлмен, әзара тең болса екеуiн де нәлмен алмастырып әорытындылау керек.
If x < y then x := 0
else if x > y then y :=0
else begin x :=0; y := 0 end;
A) дҢрыс емес
B) дҢрыс
C) аәпарат толыә емес
D) бiлмеймiн
E) дҢрыс жауабы жоә
{Дұрыс жауабы}=B
054 Тәменде келтiрiлген шартты операторлардың ғайсысы дҢрыс емес?
1. if a < b then a := a*a else b :=b * b;
2. if x and y then s:=s+1; else s := s - 1 ;
3. if k <> m then k := m;
4. if 5 then s := s+5;
if ( a = b ) and p then p:= p+10.5;
A) барлы№ы дҢрыс емес
B) 1,2 жёне 3
C) 4 жёне 5
D) 2, 4 жёне 5
E) 4,2 жёне 3
{Дұрыс жауабы}=D
055 өрнектiң Нәтижесi неге тең?
CHR (ORD( ‘2’ ))
A) ‘50’
B) 50
C) 2
D) ‘2’
E) дҢрыс жауабы жоә
{Дұрыс жауабы}=C
056 Нәтиже неге тең?
ORD (CHR (50))
A) ‘50’
B) 50
C) 2
D) ‘2’
E) дҢрыс жауабы жоә
{Дұрыс жауабы}=E
057 Логикалыә коньюнция оператор амалын аныәтаңыз:
A) not (or)
B) or
C) and
D) 'concat'
E) дҢрыс жауабы жоә
{Дұрыс жауабы}=C
058 Тәменде келтiрiлген меншiктеу операторларының ғайсысы келесi шартты ғана№аттандырады?
var x,y: integer;
A) x:=3 ; y:=4
B) x:=’3’; y:=’4’
C) x:= not y
D) x:= y/2
E) x:=y/3
{Дұрыс жауабы}=A
059 Тәменде келтiрiлген операторларының орындалу барысында ғандай Нәтиже әорытындыланады?
...k:= 53; case k mod 5 of
0: writeln (‘ k= 5m’);
1: writeln (‘k=5m+1’);
2: writeln (’k=5m+2);
3: writeln(‘k=5m+3’); end;
A) k=5m
B) k=5m+1
C) k=5m+2
D) k=5m+3
E) k=5m+4
{Дұрыс жауабы}=D
060 Тәменде келтiрiлген сипаттаулардың ғайсысы дҢрыс?
1. const a=2..30; b:=’b’; pi=3,14159;
2. type otrezok = (1..30);
3. type gorod = (moskwa;tomsk;omsk;baky);
4. type bukwy = (‘a’,’b’,’c’,’d’);
5. type zifra=(0,1,2,3,4,5,6,7,8,9);
A) 1 жёне 2
B) 1 жёне 3
C) 4 жёне 5
D) барлы№ы дҢрыс емес
E) 1 жёне 4
{Дұрыс жауабы}=C
061 Тәменде келтiрiлген ғайталау операторының орындалу барысында ғандай Нәтиже әорытындыланады?
… var k: integer;
begin
k:=0; while k<=8 do
begin k:=k+2;
write (k:2);
end end.
A) 108642
B) 246810
C) 2 4 6 8 10
D) 10 8 6 4 2
E) 10 5 4 8 2
{Дұрыс жауабы}=D
062 Тәменде келтiрiлген жазбалардың ғайсысы дҢрыс?
1. Odd (17) 2. Cos (32.1) 3. Cos [5]
A) 1 жёне 2
B) 1
C) 1 жёне 3
D) 2
E) дҢрыс жауабы жоә
{Дұрыс жауабы}=A
063 Тәменде келтiрiлген жазбалардың ғайсысы дҢрыс емес?
Sin 0.2 2. Succ (3.2) 3. Pred (7)
A) 1 жёне 2
B) 1 жёне 3
C) 2 жёне 3
D) 1
E) дҢрыс жауабы жоә
{Дұрыс жауабы}=A
064 А жёне В тҢжырымдамаларының дҢрысты№ын келесi логикалыә амал арғылы аныәтайтын тҢжырымдама :
A) A and B
B) Not (A or B)
C) A or B
D) not (A or B not b)
E) дҢрыс жауабы жоә
{Дұрыс жауабы}=A
065 x=0.1, y= - 0.2 бол№анда№ы Нәтиже неге тең?
…var x,y,mm: real;
if x > y then mm:=y else mm := x;
writeln ( mm);end.
A) 0.2
B) 0.1,-0.2
C) -0.1
D) 0.1
E) –0.2
{Дұрыс жауабы}=A
066 Нәтиже неге тең?
…var n: integer;
begin n:=1000; writeln ( n div 10 ); end.
A) 100
B) 10.00
C) 10
D) 0
E) 1000
{Дұрыс жауабы}=A
067 Нәтиже неге тең?
…Var x: char;
begin x:=chr ( ord('9') + 1);
writeln (x); end.
A) 9
B) ‘9’
C) 10
D) 4
E) 8
{Дұрыс жауабы}=C
068 Нәтиже неге тең?
…var s : string; mI,k,k1 : integer;
begin k1:=0; k:=0; s:= ‘bcbccckk’;
for mI:=1 to 8 do begin
if s[mI]=’c’ then k:=k+1;
if s[mI] =’b’ then k1:=k1+1; end;
writeln (k,’ ‘,k1); end.
A) 1 3
B) 2 2
C) 4 2
D) 10 8
E) 2 4
{Дұрыс жауабы}=C
069 Нәтиже неге тең?
…var x,y,z: real;
begin x:=2; y:= 4; z:=-0.1;
if ( x>=y) and (y>=z) then x:= 2*x else y:= abs(y);
writeln ('x=',x,'y=',y,'z=',z); end.
A) x=2,y=4,z=-0.1
B) x=2,y=8,z=-0.1
C) x=4,y=16,z=0.2
D) x=2,y=16,z=-0.4
E) дҢрыс жауабы жоә
{Дұрыс жауабы}=A
070 Нәтиже неге тең?
… var n : integer;
begin n:= 1000; writeln ( n mod 23 ); end;
A) 2
B) 11
C) 23,9
D) 100
E) 10.0
{Дұрыс жауабы}=B
071 Тәменде келтiрiлген наәты сандардың ғайсыларының жазылуы дҢрыс емес?
1,81 2. 6 0.56 4. 7,77
A) 1 жёне 4
B) 1 жёне 2
C) 2 жёне 4
D) 2 жёне 4
E) 2 жёне 1
{Дұрыс жауабы}=A
072 Тәменде келтiрiлген операторлардың орындалу Нәтижесi неге тең?
… for k:=5 to 8 do
begin pm:=k*k; writeln ('pm=',pm); end;…
A) pm=25
pm=36
pm=49
pm=64
B) pm=64
pm=49
pm=36
pm=25
C) pm=25
pm=64
pm=49
pm=100
D) pm=25,36,49,64
E) дҢрыс жауабы жоә
{Дұрыс жауабы}=A
073 Тәменде келтiрiлген тҢраәтылардың ғайсысы тектелген тҢраәты?
var1=’A’; 2. time = 11.49; 3. seek = 0.6;
4. tenge:real = 92.1; 5. god: integer = 1998;
A) 4 жёне 5
B) 2 жёне 3
C) барлы№ы тектелген
D) 4
E) дҢрыс жауабы жоә
{Дұрыс жауабы}=A
074 Тәменде келтiрiлген екi әлшемдi массивтердiң ғайсысы дҢрыс сипатталма№ан?
1. var b: array [10..15] of integer;
2. var a: array [11..10],[1..8] of real;
3. type maska = (www,lll,mmm); var a: array [maska] of array[1...5] of char;
A) 2
B) 2 жёне 3
C) 1 жёне 3
D) барлы№ы
E) дҢрыс жауабы жоә
{Дұрыс жауабы}=B
075 Массив A:array [-5..5] of char ; болып сипаттал№ан. Тәменде келтiрiлген массив элементтерiн енгiзу-әорытындылау операторы дҢрыс па?
Var i: integer;
begin
for I:= - 5 to 5 do
begin
readln (a[i]); writeln(a[I]); end; end.
A) иё
B) жоә
C) аәпарат толыә емес
D) массив әлшемi дҢрыс емес
E) дҢрыс жауабы жоә
{Дұрыс жауабы}=A
076 Тәменде келтiрiлген екi әлшемдi массивтердi сипаттаудың ғайсысы дҢрыс?
1. var x: array [1..4,1..3] of real;
2. type mss = array [‘b’..’f’,-10..8] of integer; var b : mss;
3. type mk = array [1..10] of char;
A) 1 жёне 2
B) 2 жёне 3
C) 1, 2 жёне 3
D) 3
E) 2
{Дұрыс жауабы}=A
077 Тәменде сипаттал№ан массивтердiң ёрғайсысы неше элементтен тҢрады?
1. var mb: array [‘A’..’C’,2..5] of real;
2. var mc: array[false..true] of array [1..5] of char;
3. type ww=(m1,m2,m3,m4);
var zap: array [ww] of array [ww] of boolean;
A) 6 7 8
B) 12 7 8
C) 12 10 16
D) 12 12 8
E) 7 12 16
{Дұрыс жауабы}=C
078 Тәменде келтiрiлген ғайталау операторының орындалу барысында ғандай Нәтиже әорытындыланады?
For c:=’Z’ downto ‘A’ do write (c);
A) ZA
B) ZYXWVUTSRQPONMLKJIHGFEDCBA
C) ABCDEFGHIJKLMNOPQRSTUVWXYZ
D) AZ
E) Z-A
{Дұрыс жауабы}=B
079 Тәменде келтiрiлген айнымалылардың ёртңрлi мёндерi ңшiн әорытындылау операторының орындалу барысында ғандай Нәтиже шы№ады?
…var CH : char; writeln(CH);
1. CH := ‘A’; 2. CH : = #65;
A) 1)’A’ 2) 65
B) 1) 65 2) ‘A’
C) 1) А 2) А
D) 1)’A’ 2) ‘A’
E) дҢрыс жауабы жоә
{Дұрыс жауабы}=C
080 Келесi тек ненi сипаттайды?
type sss = array [‘A’..’C’] of array [1..4] of boolean;
A) вектор
B) символдар жолын
C) логикалыә шамалар матрицасын
D) логикалыә шамалар жолын
E)дҢрыс жауабы жоә
{Дұрыс жауабы}=C
081 Іайталау операторын кәрсетiнiз.
A) goto
B) case
C) read
D) whil .. do
E) Repeat until
{Дұрыс жауабы}=E
082 Таңбалардың келесi сипатталуының ғайсысы дҢрыс?
A) label 4,8,12;
B) 4;8;12: label;
C) label : 4,8,12;
D) 0,14,17: label;
E) дҢрыс жауабы жоә
{Дұрыс жауабы}=A
083 ТҢраәтылар ғалай сипатталады?
A) барлыә айнымалылар сипаттал№ан№а дейiн;
B) барлыә айнымалылар сипаттал№аннан кейiн;
C) процедуралар мен функцияларды” сипаттау бәлiмiнде;
D) негiзгi программа бәлiмiнде;
E) программа денесiнен кейiн;
{Дұрыс жауабы}=A
084 Процедурада№ы формальды параметрлер ғалай аталады?
А) процедура денесiне енгiзiлген, идентификаторлары;
B) процедура операторлар мёнiнiң сипаттау бәлiмiнде;
C) айнымалылар, программа бәлiмiнде баяндал№ан;
D) ТҢраәтылар, программалар бәлiмiнде;
E) дҢрыс жауабы жоә
{Дұрыс жауабы}=A
085 Тәменде келтiрiлген тҢжырымдамалардың ғайсысы әрнек тңрiнде дҢрыс жазыл№ан?
1. А –ның мёнi келесi аралыәтардың бiрiнде жатады: [-5,-4], [0,2],[3.2,7]
(( A>=-5) and (a<=-4)) or ((A>=0) and (A<=2)) or ((A>=3.2) and (A<=7))
2. А (x,y) нңктесi центрi координаталар әсiнiң басында жататын бiрлiк шеңбердiң бойында немесе сыртында жатыр X*X+Y*Y >=1
A) 1- дҢрыс, 2 – дҢрыс емес
B) екi жазылу да дҢрыс емес
С) екi жазылу да дҢрыс
D) 1- дҢрыс емес,2 – дҢрыс
E) дҢрыс жауабы жоә
{Дұрыс жауабы}=C
086 Тәменде келтiрiлген меншiктеу операторларының ғайсысы дҢрыс жазыл№ан?
ЕГЕР A,I,J,K : integer; X, Y, Z : real; B : boolean;
1. X := Y + sin ( sin(z));
2. A := ( X<Y ) or ( B and ( I<>K));
3. X := I + J - B;
4. I := I + K / J.
A) 1 жёне 3
B) 2 жёне 4
C) 1 жёне 2
D) 3 жёне 4
E) 4 жёне 1
{Дұрыс жауабы}=C
087 Аәпараттардың негiзгi әлшем бiрлiгi ретiнде не алынады?
A) 1 бод
B) 1 бар
C) 1 байт
D) 1 литр
E) дҢрыс жауабы жоә
{Дұрыс жауабы}=C
088 Тәменде келтiрiлген программаның орындалу Нәтижесi?
var: x,y: integer;
begin y:=5; x:=0;
while x< 6 do
begin y:=y + x; x:= x + 2; end.
A) 5
B) 6
C) 11
D) 9
E) 10
{Дұрыс жауабы}=C
