Font size
S
M
L
XL
WorksheetsAT~3
Total questions: 110
Worksheet time: 2hrs 50mins
Name
Class
Date
1.
Элементтер тізімі компоненті
a)
ListView
b)
ToolBar
c)
CoolBar
d)
TreeView
2.
Курсорды обьектке орналастырғандағы көрінісін қандай қасиет анықтайды
a)
Cursor
b)
Topcursor
c)
Cussorenabled
d)
Mouscursor
3.
Delphi-де бүтін сандар қандай қызметші сөзбен сипатталады?
a)
Integer
b)
Char
c)
Real
d)
Boolean
4.
Delphi-де Real сөзі қандай типтегі сандарды сипаттайды
a)
нақты сандар
b)
символдар
c)
бутін сандар
d)
натурал
5.
Delphi-де символдык мәндер кандай кызметші сөзбен сипатталады:
a)
Char
b)
Integer
c)
Real
d)
Boolean
6.
Delphi-де логикалық берілгендер қандай сөзбен сипагталады:
a)
Boolean
b)
Integer
c)
Real
d)
Char
7.
Delphi-де жолдық шамалар қандай сөзбен сипатталады
a)
String
b)
Integer
c)
Real
d)
Boolean
8.
Айнымалылар типі программаның қандай бөлігінде сипатталады:
a)
Var
b)
Uses
c)
Type
d)
Begin
9.
Бүтін санды бүтін санга бөлгендегі бүтін бөлікті табу үшін қандай қызметші сөз колданылады:
a)
Div
b)
Ог
c)
Mod
d)
Аnd
10.
Бүтін санды бүтін санға бөлгендегі қалдықты анықтайтын қызметші сөз:
a)
Mod
b)
Or
c)
Div
d)
And
11.
Егер х mod 2 = 0 болса, х қандай сан болады:
a)
жұп
b)
тақ
c)
ноль
d)
еселі
12.
х саны тақ болады, егер
a)
xMod2=l
b)
хМос12 = 0
c)
х Div 2-0
d)
xDiv2= 1
13.
Егер х mod 2 = 1 болса, онда х саны
a)
тақ
b)
жұп
c)
Ноль
d)
Еселі
14.
Егер у саны жұп болса, онда
a)
у Mod 2 = 0
b)
у Mod 2 = 1
c)
у Div2 = 0
d)
у Div 2= 1
15.
Delphi-де Х санын 12-ге меншіктейтін оператордың дұрыс жазылуын көрсетіңіз:
a)
х:=12
b)
х=12
c)
12=х
d)
х=:12
16.
Логикалық айнымалының қабылдайтын мәндерін көрсетіңіз:
a)
true және false
b)
and және or
c)
and және not
d)
true және not
17.
Логикалық амалдардың жазылу ретінің дұрысын керсетіңіз:
a)
AND, OR, NOT
b)
NOT, AND, OR
c)
OR. NOT AND
d)
AND, NOT, OR
18.
Erep a:=5, b:=7 болып. a<b шарты орындалса, онда бүл өрнектің мәні қандай болады:
a)
True
b)
False
c)
not
d)
and
19.
Егер X логикапық айнымалысынын мәні true, ал Ү айнымалысы false болса, онда X And Y өрнегінің мәні қандай болады:
a)
False
b)
True
c)
Not
d)
And
20.
Екі санды таңбасының көмегімен бөлген кездегі нәтиже барлық уақытта қандай типті болады:
a)
Real
b)
Integer
c)
Boolean
d)
Char
21.
X айнымалысы программада бүтін сан ретінде анықталады. Келесі операторлардың қайсысы бұл жағдайда орындалмайды:
a)
Х:=1,56
b)
Х:=-100
c)
Х:=0
d)
Х:=Х+5
22.
х-тің абсолют шамасы Delphi бағдарламасында қалай жазылады:
a)
abs (х)
b)
sqr (x)
c)
sqrt(x)
d)
tan (x)
23.
х-тің квадраты функциясы Delphi бағдарламасында қалай жазылады:
a)
sqr (x)
b)
abs (х)
c)
sqrt (x)
d)
tan (х)
24.
х-тің квадрат түбірі Delphi бағдарламасында қалай жазылады:
a)
sqrt (х)
b)
abs (х)
c)
sqr (х)
d)
tan(х)
25.
е-экспонента функциясы Delphi бағдарламасында қалай жазылады:
a)
ехр(х)
b)
abs (x)
c)
sqr (x)
d)
tan (x)
26.
Х нақты санын бүтінге дейін дәлдіктеу немесе дөңгелектеу функциясы:
a)
Round(x)
b)
Trunc(x)
c)
sqr(x)
d)
sqrt (x)
27.
X нақты санының бөлшек белігін қалдырып, бүтін бөлігін алуда қолданылатын функция:
a)
Тranc(Х)
b)
Round(X)
c)
Sqr(X)
d)
Sqrt(X)
28.
Х нақты санының бөлшек бөлігін алуда қолданылатын функция:
a)
Frac(x)
b)
trunc(x)
c)
sqr(Х)
d)
sqrt(x)
29.
Х санының натурал логарифмі Delphi бағдарламасында қалай жазылады:
a)
ln(х)
b)
ln (х)
c)
int(х)
d)
sqr(x)
30.
Х санының абсолют шамасы Delphi бағдарламасында қалай жазылады:
a)
abs(х)
b)
tan(х)
c)
sqr(x)
d)
ln(х)
31.
Delphi бағдарламасындағы sqrt (x) функциясының қызметі:
a)
х санының квадрат түбірін есептейді
b)
х нақты санының бүтін бөлігін есептейді
c)
х нақты санының бөлшек бөлігін есептейді
d)
Х санын бүтін бөлікке дейін деңгелектейді
32.
Delphi бағдарламасындагы sqr (x) функциясының қызметі:
a)
х санының квадратын есептейді
b)
х санының бүтін бөлігін есептейді
c)
х санының бөлшек бөлігін есептейді
d)
х санын бүтін бөлікке дейін дөңгелектейді
33.
Delphi бағдарламасындағы ln (х) функциясының қызметі:
a)
х санының логарифмін есептейді
b)
х санының бүтін бөлігін есептейді
c)
х санының бөлшек бөлігін есептейді
d)
х санын бүтін бөлікке дейін дөңгелектейді
34.
Delphi бағдарламасындағы abs (x) функциясының кызметі:
a)
х санының абсолют шамасын есептейді
b)
х санының бүтін бөлігін есептейді
c)
х санының бөлшек бөлігін есептейді
d)
санын бүтін бөлікке дейін дөңгелектейді
35.
Delphi бағдарламасындағы (х) функциясының қызметі:
a)
х санының бүтін бөлігін есептейді
b)
х санының модулін есептейді
c)
х санының болшек бөлігін есептейді
d)
х санын бүтін бөлікке дейін дөңгелектейді
36.
Delphi бағдарламасындағы frac (x) функциясының қызметі:
a)
х санының бөлшек бөлігін есептейді
b)
х санының модулін есептейді
c)
х санының бөлшек белігін есептейді
d)
х санын бүтін бөлікке дейін дөңгелектейді
37.
Операторлардың жазылуының дұрысын көрсетіңіз:
a)
begin ... End
b)
case ... End
c)
if...then…
d)
while ... do…
38.
Шартты өту операторының дүрыс жазылуын көрсетіңіз:
a)
if...then...else
b)
case ... End
c)
begin ... End
d)
while ... Do
39.
«Әзірше» циклының дұрыс жазылу түрін көрсетіңіз:
a)
while P do begin S end
b)
repeat S until (not P)
c)
for k:=k0to k„ do begin S end
d)
if S>0 then begin P else
40.
«Дейін» циклының жазылу түрін көрсетіңіз:
a)
repeat S until (not P)
b)
while P do begin S end
c)
for k:=k0to k„ do begin S end
d)
if S>0 then begin P else
41.
«Үшін» циклының жазылу түрін көрсетіңіз:
a)
for k:=k0to k„ do begin S end
b)
while P do begin S end
c)
repeat S until (not P)
d)
if S>0 then begin P else
42.
x:=5; if X>10 then y:=2*x else:=sqr (x); болса, онда у мәні неге тең?
a)
25
b)
5
c)
7
d)
10
43.
d : Boolean; A : integer болғанда төмендегі оператордың қайсысы дұрыс:
a)
d:=a<7
b)
d:=a+7
c)
d:=5-a
d)
d:=sqrt(a)
44.
d : Boolean; A : integer болғанда D:= A<7 болса, D айнымалысының мәні неге тең:
a)
True
b)
7
c)
5
45.
Айнымалы шамаларды жазуда қолданылатын қызметші сөз:
a)
var
b)
type
c)
const
d)
uses
46.
Inc(x) функциясы x санын қаншаға көбейтеді
a)
1
b)
2
c)
10
47.
Dec(x) функциясы х санын қаншаға азайтады?
a)
1
b)
2
c)
10
48.
А=10, В=3 белгілі болса, онда A div В өрнегі неге тең?
a)
3
b)
30
c)
0.3
d)
13
49.
A = 10, В=3 болса A mod B өрнегі неге тең
a)
1
b)
3
c)
3.3
d)
1.3
50.
Тұрақты шамаларды жазуда қолданылатын қызметші сөз:
a)
Const
b)
type
c)
Var
d)
Uses
51.
For і:=l to 100 do операторы орындалса, 1 өзгеру қадамы
a)
1
b)
кез келген оң сан
c)
кез келген теріс сан
d)
кез келген сан
52.
For і:=l downto 100 do операторы орындалса, I өзгеру қадамы
a)
-1
b)
кез келген оң сан
c)
кез келген теріс сан
d)
кез келген сан
53.
While 1<= 100 do операторы орындалса 1 өзгеру қадамы
a)
кез келген сан
b)
кез келген оң сан
c)
кез келген теріс сан
d)
1
54.
While І<=100 do циклы І<=100 болғанда нені көрсетеді
a)
True
b)
0
c)
la se
d)
1
55.
Repeat ... Until І>100 бикллы І>100 болғанда нені керсетеді?
a)
True
b)
0
c)
False
d)
1
56.
Delphi-де X10 өрнегі калай жазылады?
a)
Exp(10*Ln(X))
b)
10*Ехр(Х)
c)
Хл10
d)
10*Exp(Ln(X))
57.
Егер х true болса, онда NOT(x) неге тең болады?
a)
False
b)
True
c)
And
58.
chr(b) функциясы:
a)
Символды коды бойынша береді
b)
Аргументтің жоғары байтын береді
c)
Аргументтің квадратын береді
d)
Кодты символ бойынша береді
59.
(1ЗЬ + 53с + d) : (7а+4) өрнегінің Delphi-де жазылуы
a)
(13*b + 53*c + d),7*a+4)
b)
(I3*b + 53*c + d),((7*a+4)
c)
(13*b + 53*с + d) ,7*a+4)
d)
(13*b+53*c + d),((7a)+4)
60.
Егер A C-ra тең немесе үлкен болса, онда В=5 болғанда бағдарламаның қай фрагменті сәйкес келеді
a)
f (A>B) or (B=C) then В~5
b)
і1" А>=С then B:=5
c)
if A>C then В:=5
d)
if A>B=C then B: =5
61.
Паскаль тiлiнде жазылған программа құрылымынын дурыс тiзбегiн көрсетіңіз
a)
program, label, const, type, var, procedure, begin, end
b)
Label, const, program, type, var, procedure, begin, end
c)
End, const, program, type, var, procedure, begin, label
d)
label end const program type var procedure begin
62.
Паскаль тiлiнде х-тi жақын бүтінге дөңгелектеуді анықтайтын стандартты функцияның атауын көрсетіңіз
a)
Round(x)
b)
abs(x)
c)
Trunc(x)
d)
Pred(x)
63.
Паскаль тiлiнде х-тiң абсолют шамасын анықтайтын стандартты функцияның атауын көрсетіңіз
a)
abs(x)
b)
Round(x)
c)
Trunc(x)
d)
Pred(x)
64.
Паскаль тiлiнде х-тен алдыңғы мәнді анықтайтын стандартты функцияның атауын көрсетіңіз
a)
Pred(x)
b)
Round(x)
c)
Trunc(x)
d)
abs(x)
65.
Паскаль тiлiндегі ln(x) стандартты функциясы нені анықтайтынын көрсетіңіз
a)
натурал логарифмді анықтайды
b)
х-тiң алдындағы санды анықтайды
c)
х-тiң абсолют шамасын анықтайды
d)
экспонента мәнiн анықтайды
66.
Паскаль тiлiнде real типті берiлгендерді көрсетіңіз
a)
нақты
b)
таңбалы
c)
логикалық
d)
бүтін
67.
Паскаль тiлiнде Char типті берiлгендерді көрсетіңіз
a)
таңбалы
b)
нақты
c)
логикалық
d)
бүтін
68.
Паскаль тiлiнде Boolean типті берiлгендерді көрсетіңіз
a)
логикалық
b)
нақты
c)
таңбалы
d)
бүтін
69.
Паскаль тiлiнде Integer типті берiлгендерді көрсетіңіз
a)
бүтін
b)
логикалық
c)
нақты
d)
таңбалы
70.
Жаңа экран ашу командасын орындайтын клавиштер комбинациясын көрсетіңіз
a)
ALT+f, NEW
b)
F3,<программа аты>
c)
F2
d)
ALT+F9
71.
Турбо Паскальда нәтиженi көрсету командасы қандай клавиштер комбинациясы арқылы орындалады
a)
ALT+F5
b)
ALT+X
c)
F6
d)
ALT+f, NEW
72.
Паскаль тілінде берілгендерді енгізу операторын көрсетіңіз
a)
Readln
b)
Writeln
c)
GOTO
d)
Case
73.
Паскаль тілінде берілгендерді шығару операторын көрсетіңіз
a)
Writeln
b)
Readln
c)
GOTO
d)
Case
74.
y=5sinx функциясының мәнін есептеу программасын көрсетіңіз
a)
<variant>begin
Writeln('x:');
Readln(x);
Y:=5*sin(x);
Writeln('y=',y);
end.
b)
Writeln('x:');
Readln(x);
begin
Y:=5*sin(x);
Writeln('y=',y);
end.
c)
begin Y:=5*sin(x);
Writeln('y=',y);
Writeln('x:');
Readln(x);
end.
d)
begin
Writeln('y=',y);
Writeln('x:');
Readln(x);
Y:=5*sin(x);
end.
75.
Массивтiң жұп элементтерiн анықтайтын
begin S:=0; for i:=1 to n do begin readln(A[i]);
if ... then S:=S+А[i] end; end.
программа бөлігін көрсетіңіз
a)
not odd(a[i])
b)
odd(a[i])
c)
A[i] mod 3=0
d)
A[i]>3
76.
Паскаль программалау тілінде А(6) элементтен тұратын массивтiң max элементiн анықтау программасының үзіндісін көрсетіңіз
a)
Begin
FOR k:=1 TO 6 do readln(A[k]);
Max:=A[1];
FOR k:=2 to 6 do
IF A[k]>max THEN max:=A[k];
Writeln('max=',max);
END.
b)
Begin
FOR k:=2 to 6 do
IF A[k]>max THEN max:=A[k];
FOR k:=1 TO 6 do readln(A[k]);
max=A[1];
Writeln('max=',max);
END.
c)
Begin max=A[1];
FOR k:=1 TO 6 do readln(A[k]);
FOR k:=2 to 6 do
IF A[k]>max THEN max:=A[k];
Writeln('max=',max);
END.
d)
Begin
FOR k:=1 TO 6 do readln(A[k]);
max=A[1];
FOR k:=2 to 6 do Writeln('max=',max);
IF A[k]>max THEN max:=A[k];
END.
77.
Негiзгi программa айнымалысын қалай атаймыз?
a)
аймақтық айнымалы
b)
жергiлiктi айнымалылар
c)
процедура
d)
Функция
78.
Көмекші программa айнымалысын қалай атаймыз?
a)
жергiлiктi айнымалылар
b)
аймақтық айнымалы
c)
процедура
d)
функция
79.
WHILE P DO S қандай циклдің жазылу үлгісі
a)
"Әзiрше"
b)
"Дейiн"
c)
"Үшiн"
d)
Дұрыс жауап жоқ
80.
Repeat S until <шарт> қандай циклдің жазылу үлгісі
a)
"Дейiн"
b)
"Әзiрше"
c)
"Үшiн"
d)
Дұрыс жауап жоқ
81.
For i:=1 to n do S қандай циклдің жазылу үлгісі
a)
"Үшiн"
b)
"Дейiн"
c)
"Әзiрше"
d)
Дұрыс жауап жоқ
82.
у=cosx+e^(x-1) функциясының мәнін есептеу программасының үзіндісін
a)
BEGIN
WRITELN('x:');
READLN(x);
y:=cos(x)+eхр(x-1);
WRITELN('y=',y:4:2);
END.
b)
BEGIN
WRITELN('y=',y:4:2);
y=cos(x)+eхр(x-1);
READLN(x);
WRITELN('x:');
END.
c)
BEGIN
WRITELN('y=',y:4:2);
y=cos(x)+eхр(x-1);
READLN(x);
WRITELN('x:');
END.
d)
WRITELN('x:');
BEGIN
y=cos(x)+eхр(x-1);
WRITELN('y=',y:4:2);
READLN(x);
END.
83.
Программаның нәтижесiн көрсетіңіз
Begin s:=0;
FOR X:=1 TO 4 do begin Y:=3*X-1; S:=S+Y; end;
Writeln( S);end.
a)
26
b)
-16
c)
29
d)
9
84.
Программа нәтижесiн көрсетіңіз
Begin S=3; FOR X:=1 TO 3 DO BEGIN
Y=2*X; S=S+Y end;
Writeln( S); END.
a)
15
b)
=E85-7
c)
11
d)
26
85.
Берiлген S жолдық қатардағы m-шi номерден бастап, n таңбаны өшiретін функцияны көрсетіңіз
a)
Delete(S,m,n)
b)
length(s)
c)
Pos(s1,s2)
d)
Insert(s1,s2,n)
86.
Берiлген S жолдық қатардың ұзындығын табатын функцияны көрсетіңіз
a)
length(s)
b)
Pos(s1,s2)
c)
Insert(s1,s2,n)
d)
Insert(s1,s2,n)
87.
Берiлген S жолдық қатардан m-шi номерден бастап, n таңбаны көшiретін функцияны көрсетіңіз
a)
Copy(S,m,n )
b)
Delete(S,m,n)
c)
length(s)
d)
Pos(s1,s2)
88.
Берiлген S жолдық қатардағы m-шi номерден бастап, n таңбаны өшiретін функцияны көрсетіңіз
a)
Delete(S,m,n)
b)
length(s)
c)
Pos(s1,s2)
d)
Insert(s1,s2,n)
89.
Төмендегі программа нәтижесінде орындалатын іс әрекетті көрсетіңіз
Begin
Readln(s);
for i:=1 to length(s) do
if s[i]=',' then
Delete(S,i,1);
Writeln(s);
End.
a)
Текстен үтiрдi өшiретiн программа
b)
Текстегi үтiрдi нүктемен алмастыратын программа
c)
Текстегi сөздердiң санын анықтайтын программа
d)
Текстегi сөздердiң санын анықтайтын программа
90.
Файл деп нені атаймыз?
a)
компьютердің сыртқы жадысында белгілі атпен сақталатын берілгендер жиынын айтамыз
b)
дискідегі белгілі аймақ атауын айтамыз
c)
өзара көлденең сызықпен ажыратылған ішкі каталоктар аттарының тізімі
d)
бір немесе бірнеше анықталған типті компоненттерден тұратын, өріс деп аталатын, құрылымдық типті атаймыз
91.
System модулі
a)
Турбо Паскальдің онсыз ешқандай программа жұмыс істей алмайтын, стандартты көмекші программаларының негізгі кітапханасын құрайды
b)
Экраннның текстік режимін, клавиатура мен дыбысты басқаратын процедура мен функциялардан тұрады
c)
Экранның графикалық режимін басқаратын процедура, функция, типтер, тұрақтылардан тұрады
d)
MS DOS операциялық жүйесінің барлық құрылғыларымен жұмыс істеуге мүмкіндік беретін процеуралар мен функциялардан тұрады
92.
CRT модулі
a)
Экраннның текстік режимін, клавиатура мен дыбысты басқаратын процедура мен функциялардан тұрады
b)
Турбо Паскальдің онсыз ешқандай программа жұмыс істей алмайтын, стандартты көмекші программаларының негізгі кітапханасын құрайды
c)
Экранның графикалық режимін басқаратын процедура, функция, типтер, тұрақтылардан тұрады
d)
MS DOS операциялық жүйесінің барлық құрылғыларымен жұмыс істеуге мүмкіндік беретін процеуралар мен функциялардан тұрады
93.
Графикалық примитивтерді бейнелеу процеуралары мен функциялары:
a)
PutPixel(x,y, color), Line(x1,y1,x2,y2), moveto(x,y), Rectangle(x1,y1,x2,y2)
b)
Repeat until keypressed; Readkey
c)
ClrScr, ClrEol, GoToXY(x,y), WhereX, WhereY
d)
sound(Hz), nosound
94.
tуpe
тип аты =file;
Var айнымалы аты:тип аты;
Жазуы нені білдіреді
a)
Типтік файлдарың берілуі
b)
Текстік файлдарың типтік берілуі
c)
Типсіз файлдар типтік анықталуы
d)
Айнымалының сипатталуы
95.
Паскаль тіліндегі программада белгіні сипаттау үшін қолданылатын резервті сөзі көрсетіңіз
a)
label
b)
type
c)
const
d)
var
96.
Паскаль тiлiнде стандартты х2-функциясының жазылуын көрсетіңіз
a)
Sqr(x)
b)
Sqrt(x)
c)
Trunc(x)
d)
Round(x)
97.
Паскаль тiлiнде х-тің шамасы тақ болғанда True мәнiн қабылдайтын стандартты функцияны көрсетіңіз
a)
ODD(x)
b)
Pred(x)
c)
abs(x)
d)
Trunc(x)
98.
Жолдық процедуралар мен фукциялардың құрамынан символдарды өшіру және қою қызметін атқаратынын көрсетіңіз
a)
Delete (str,pos,n), Insert(str1, str2, pos);
b)
Length(st), copy(st,poz,n), concate(str1,str2,….,str n), pos(str1,str2)
c)
Str(number, str),val(number, code)
d)
Str(number, str),val(number, code)
99.
Паскаль тiлiнде array типті берiлгендерді көрсетіңіз
a)
массив
b)
бүтін
c)
таңбалы
d)
логикалық
100.
Программаны компиляциялау командасын орындайтын клавиштер комбинациясын көрсетіңіз
a)
ALT+F9
b)
F3,<имя программы>
c)
F2
d)
ALT+f,NEW
101.
ALT+F5 клавиштер комбинациясы қандай іс әрекетті атқарады
a)
нәтиженi көрсету
b)
компилятор
c)
Турбо Паскальдан шығу
d)
Белсендi терезенi орнату
102.
Паскаль тілінде шартсыз өту операторын көрсетіңіз
a)
GOTO
b)
Readln
c)
Writeln
d)
Case
103.
3-ке қалдықсыз бөлiнетiн массив элементтерін анықтайтын
begin
S:=0; for i:=1 to n do begin readln(A[i]);
if ... then S:=S+А[i]; end;
end.
программа бөлігін анықтаңыз
a)
1
A[i] mod 3=0
b)
odd(a[i])
c)
not odd(a[i])
d)
A[i]>3
104.
Паскаль программалау тілінде А(8) массивінiң терiс элементтерiнiң қосыдысын есептеу программасының үзіндісін көрсетіңіз
a)
Begin
FOR k:=1 TO 8 do readln(A[k]); S:=0;
FOR k:=1 to 8 do
IF A[k]<0 THEN s:=s+A[k];
Writeln('s=',s);
END.
b)
Begin S:=0;
FOR k:=1 to 8 do
IF A[k]<0 THEN s:=s+A[k];
Writeln('s=',s);
END.
c)
Begin
FOR k:=1 to 8 do
IF A[k]<0 THEN s:=s+A[k];
FOR k:=1 TO 8 do readln(A[k]); S:=0;
Writeln('s=',s);
END.
d)
Begin
FOR k:=1 TO 8 do readln(A[k]); S:=0;
FOR k:=1 to 8 do Writeln('s=',s);
IF A[k]<0 THEN s:=s+A[k];
END.
105.
Орындалу барысында бiр немесе бiрнеше мән болатын көмекшi программаны қалай атаймыз
a)
процедура
b)
жергiлiктi айнымалылар
c)
аймақтық айнымалы
d)
функция
106.
REPEAT S UNTIL P қандай циклдің жазылу үлгісі
a)
Дейiн
b)
"Әзiрше"
c)
"Үшiн"
d)
"Әзiрше"
107.
Программа үзіндісінің нәтижесiн көрсетіңіз
Y:=6;S:=0;
FOR X:=1 TO 4 DO BEGIN
Y:=Y+2*X; S:=S+Y;
WRITE(‘Y=’,Y);
END.
a)
26
b)
11
c)
38
d)
-7
108.
S1 таңбалар тізбегі S2 жолдық қатардан басталатын таңба номерiн анықтайтын функцияны көрсетіңіз
a)
Pos(s1,s2)
b)
length(s)
c)
Delete(S,m,n)
d)
Insert(s1,s2,n)
109.
Төмендегі программа нәтижесінде орындалатын іс әрекетті көрсетіңіз
Begin Readln(s);
1:N:=Pos(',',S);
if N=0 then Goto 2;
Delete(S,n,1); Insert('.',S,N); Goto 1;
2:Writeln(s); End.
a)
Текстегi үтiрдi нүктемен алмастыратын программа
b)
Текстегi сөздердiң санын анықтайтын программа
c)
Текстен үтiрдi өшiретiн программа
d)
Текстегi сөздердiң санын анықтайтын программа
110.
Бiрiктiру операторы
a)
With <жазу аты> do<оператор>
b)
Record
c)
Write (<Өрнек>)
d)
Rewrite
Reset
