wayground logo

Free Printable Worksheets

NEW

Font size

S
M
L
XL
Worksheets

история

Total questions: 21

Worksheet time: 11mins

Name
Class
Date
1.

Var A,B :Integer ;C:Real;

X:Boolean

айнымалыларды сипатталган болса,төмендегі операторлардың қайсысы дұрыс емес

a)

C:A+B+4,1;

b)

X:A=B;

c)

X:A=C;

d)

A:X;

e)

C:A;

2.

өрнекті есептеу кезіндегі жауаптардың дұры вариантын таңдаңыз? [5..9,17..20]*[8..18]-[8,9]

a)

[7..9]

b)

[15..20]

c)

[17,18]

d)

[5..9,19,20]

e)

[5..9]

3.

Қолдану нәтижесі жол строка болатын стандартты функцияны көрсетіңіз

a)

POS

b)

HIGH

c)

LENGTH

d)

VAL

e)

CONCATE

4.

Логикалық коньюнция оператор амалын анықтаңыз

a)

and

b)

or

c)

not (or)

d)

'concat'

e)

дұрыс жауабы жоқ

5.

Басы ,соңы қандай символдың көмегімен белгіленеді

a)

ромб

b)

тіктөртбұрыш

c)

шеңбер

d)

эллипс

e)

параллеграмм

6.

программа фрагментінің орындалу нәтижесін таңда

S:='abc*12*d'; St:="; i:=1;

while (s[i]<>'*'do

begin

St:=St+S[i]+S[i];

Inc (i);

End;

writeln (St);

a)

abc *12

b)

aabbcc1122dd

c)

abc12d

d)

aabbcc

e)

abc

7.

өрнектің мәнін есептеу керек

0 div 11+36 div 13- 4 mod 11

a)

4

b)

-1

c)

2

d)

-2

e)

3

8.

келесі қай нұсқаудың жазылу форматын береді ?

<айнымалы>:<өрнек>;

a)

шартты нұсқауы

b)

меншіктеу нұсқауы

c)

таңдау нұсқауы

d)

шартсыз көшу нұсқауы

e)

көшу нұсқауы

9.

программа фрагментінің орындалу нәтижесін таңдау

var

n,cod :integer;

begin

s:='3456';

val (s,n,cod);

writeln ('n=',n'cod=' ,cod );

s:='32.45';

val (s,n,cod);


writeln ('n=',n'cod=' ,cod );

a)

n=3456 cod=0

n=0 cod =3

b)

n=32.45 cod=0

n=0 cod=3

c)

n=3456 cod=0

n=0 cod=3

d)

n='3456' cod=0

n=0 cod= 3

e)

n=3245 cod =0

n=0 cod =3

10.

программа фрагментінің орындалу нәтижесін таңда

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=bcd;

S=ab123cd

n=5

b)

C=bcd ;

S=ab123cd

n=5

c)

C=bcd;

S=123abcd

n=10

d)

C=bcd

S=ab123cd

n=5

e)

C=fabcde;

S=ab123cd

n=5

11.

программаның орындалатын бөлігі қандай түйінді сөзбен басталады

a)

VAR

b)

CONST

c)

LABEL

d)

TYBE

e)

BEGIN

12.

ORD () функциясы-

a)

аргументтің келесі мәнін

b)

аргументтің мәнін қайтарады

c)

аргумент мәнінің реттік номерін

d)

ешқандай мән шығармайды

e)

аргументтің алдынғы мәні

13.

төмендегі әрекеттердің нәтижесінде с айнымалылардың мәні неге тең болады?

a:=4

b:=2

c:= a+b/2

a)

1

b)

3

c)

16

d)

6

e)

5

14.

false and True арасындағы қатынастардың қайсысы дұрыс

a)

False=True

b)

False >=True

c)

False <=True

d)

False >True

e)

False <True

15.

Нәтижесі неге тең ?

...var n :integer ;

begin n :=1000; writeln (n div 10); end.

a)

0

b)

10.00

c)

1000

d)

10

e)

100

16.

Компилятор -бұл

a)

жинағыштың түрі

b)

программалау тілі

c)

операциялық жүйе

d)

жоғары деңгейлі тілден машиналық тілге аударатын арнайы жүйелік программа

e)

арнайы резидентті жүйелік драйвер

17.

Қандй айнымалы атауы дұрыс жазылмағанa

a)

a'

b)

a453

c)

aLfa

d)

a2

e)

ob3

18.

Var N: integer ;X: Real;

айнымалылардың сипатталған болса,төмендегі операторлардың қайсысы дұрыс емес

a)

Writeln (x:8:4).

b)

ReadLn ('N?',N).

c)

Read (x).

d)

WriteLn ('N?,'N).

e)

Wtite ('X:=',X).

19.

a және b айнымалысының мәнін табыңыз : a:=17 div 5; b:=2div 5.

a)

2 4;

b)

7 0;

c)

3 0;

d)

4 2;

e)

3 2 ;

20.

Келесі операторлар орындалғасын S айнымалысының мәнін анықтаңыз:

S:=1; n:=1;

ForI:=2 to n do S:=S+1/I;

a)

1.5

b)

2.5

c)

2

d)

0.0

e)

1.0

21.

Текетегі әріптерден басқа символдарды жою керек және барлық кіші әріптерді сәйкес үлкен әріптермен ауыстыру керек.

for i:=1 to length (s) do

if (ord (s[i]>=97 ) and (ord (s [i] <=127)then

st := St+upcase (s[i])

a)

Else

if (ord (s[i]>=65) and (ord (s[i] <=90 )then

St :=s[i]+St;

writeln (St);

for i:=1 to length (s) do

if (ord (s[i]>=97 ) and (ord (s [i] <=127)then

st := St+upcase (s[i])

b)

Else

if (ord (s[i]>=65) or (ord (s[i] <=90 )then

St :=s[i]+St;

writeln (St);

for i:=1 to length (s) do

if (ord (s[i]>=97 ) and (ord (s [i] <=127)then

st := St+upcase (s[i])

c)

Else

if (ord (s[i]>=65) and (ord (s[i] <=90 )then

St :=St +s[i];

writeln (st);

for i:=1 to length (s) do

if (ord (s[i]>=97 ) and (ord (s [i] <=127)then

St := upcase (s[i])

d)

Else

if (ord (s[i]>=65) and (ord (s[i] <=90 )then

St :s[i];

writeln (st);

for i:=1 to length (s) do

if (ord (s[i]>=97 ) and (ord (s [i] <=127)then

St := St+upcase (s[i])

e)

Else

if (ord (s[i]>=65) and (ord (s[i] <=90 )then

St :=St +s[i];

writeln (st);