Visible
TobjectPascal
TmainMenu
Математикалық жабдықтау құрамын көрсетіңіз
Математикалық бағдарламалау, математикалық статистика
Эксплуатациялық жинақтар, модульдер
Ақпаратты шығару, өңдеу, жинақтау және беру желілері
Басқару процестерін модельдеу құралдары
Басқарудың типтік мәселелері
TCanvas класына жататын қасиетті көрсет
TPen
TButton
Caption
PopupMenu
TTime
Kind атқаратын қызметі
Белдеушенің сырғытпа түймесінің тік не көлденең жылжуы үшін таңдалатын мәндер
Өрістер, қасиеттер және әдістердің бірлігінен тұратын біртұтас түрде қарастыруы
Кескін экран бетіне шыққанда мөлдір болып көрінетін түс
Мәтіндік өріске берілген шаблон бойынша мәліметтер енгізу мүмкіндігін береді
Windows-тың барлық қосымшаларындағы секілді программаға мәзірін қосу
Қосымша бетін көрсет терезенің
Properties
SpeedButton
Chart
QRGroup
Label
ОБП-да кластың принциптерін көрсет
Инкапсуляция
Проедуралар
Растрлық бейнелеу
Визуалды бағдарламалау
Функциялар
Position атқаратын қызметі
Сандық шаманың ағымдық мәні
Көрнекті екі және үш өлшемді диаграммалар тұрғызу мүмкіндігін береді
Сурет салуға болатын бейнелеу облысы
Кестелерден тұратын мәліметтер қорын құрып, оларды өңдейтін программалар жүйесі
Сандық шама
Ресурстар файлының ресурстарын көрсет
Пиктограммалар
Проедуралар мен функциялар
Процедура
Функция
Модуль
TCanvas класына неше туынды болады
3
6
7
5
1
Delphi-де қосымша жасаудың бөлімін көрсет
Қосымша интерфейс құру
Визуалды бағдарламалау
Қасиеттеe
Растрлық бейнелеу
Курсорлау
Windows шривті үшін қай қасиет пайдаланылады
TFont
TPen
TBrush
TLabel
Edit
Растрлық кескін дегеніміз не
Пиксельдерден тұратын нүктелерден құрастырылған
Нүктелерден емес, арнайы командалардан тұратын кодты сақтайды
Сыртқы жадтың атау берілген облысы
Windows белгішесі форматында сақталатын кескіндер
Нүкте командасы
Ақпараттық жүйе дегеніміз не?
Дұрыс жауабы жок
Операторлар берілгендермен қандай да бір амалдар орындайтын жүйе
Қойылған мақсатқа жету үшін ақпаратты алу, көшіру және сақтауға пайдаланылатын әдістер жиынтығы
Берілген ақпаратты алу, көшіру және беру үшін пайдаланылатын әдістер жиынтығы
Қойылған мақсатты пайдалану үшін арналған ақпарат
Ақпараттық жабдықтау дегеніміз не?
Дұрыс жауабы жоқ
Қойылған мақсатқа жету үшін ақпаратты беру, өңдеу және сақтауға пайдаланылатын әдістер жиынтығы
Қойылған мақсатқа жету үшін ақпаратты беру, өңдеу және сақтауға пайдаланылатын әдістер жиынтығын айтамыз
Қойылған мақсатқа жету үшін ақпаратты алу, көшіру және сақтауға пайдаланылатын әдістер жиынтығы
Копьютер мен ақпараттық жүйелердің арасындағы байланыс
Delphi бас менюдің класын көрсетіңіз
TmainMenu
Memo
RichEdit
ComboBox
Edit
Техникалық жабдықтау дегеніміз не?
Ақпараттық жүйенің жұмысына арналған техникалық құралдардың комплексі
Ақпаратты кодтау жүйесінің, құжаттардың реттелген жүйесінің және мәліметтер қорын тұрғызу
Дұрыс жауабы жоқ
Техникалық құралдар комплексінің жақсы жұмыс атқаруы үшін берілген бағдарлама жиынтығын
Құрамына жалпы жүйелік және арнайы бағдарламалық өнімдерді айтамыз
Математикалық жабдықтау деп айтамыз?
Дұрыс жауабы жоқ
Ақпараттық жүйенің жұмысына арналған техникалық құралдардың комплексі
Техникалық құралдар комплексінің жақсы жұмыс атқаруы үшін берілген бағдарлама жиынтығын айтамыз
Құрамына жалпы жүйелік және арнайы бағдарламалық өнімдер
Ақпаратты кодтау жүйесінің, құжаттардың реттелген жүйесінің және мәліметтер қорын тұрғызу әдістемесі
Бағдарламалық жабдықтау нені айтамыз
Дұрыс жауабы жоқ
Ақпараттық жүйенің жұмысы және арналған техникалық құралдардың комплексі
Техникалық құралдар комплексінің жақсы жұмыс атқаруы үшін берілген бағдарлама жиынтығы
Құрамына жалпы жүйелік және арнайы бағдарламалық өнімдерді айтамыз
Арнайы бағдарламалық өнімдер, сонымен қатар құжаттама
Ұжымдық жабдықтау нені айтамыз
Дұрыс жауабы жоқ
Ақпараттық жүйенің мақсаты мен мәселесі орындаушы математикалық модельдер, алгоритмдер және бағдарламалар жиынтығы
Ақпараттық жүйенің жұмысы және арналған техникалық құралдардың комплексі
Техникалық құралдар комплексінің жақсы жұмыс атқаруы үшін берілген бағдарлама жиынтығы
Құрамына жалпы жүйелік және арнайы бағдарламалық өнімдерді айтамыз
Құқықтық жабдықтау нені айтамыз
Дұрыс жауабы жоқ
Техникалық құралдар комплексінің жақсы жұмыс атқаруы үшін, ақпараттық жүйенің мақсаты мен мәселесін орындаушы математикалық модельдер
Операциялық жүйелерден және бақылау, диагностика жасау құралдарынан тұрады
Қойылған мақсатқа жету үшін ақпаратты беру, өңдеу және сақтауға пайдаланылатын әдістер жиынтығын айтамыз
Ақпараттық жүйе жасау және қолдану барысында жұмысшылардың
Жүйелік жабдықтау нені айтамыз?
Операциялық жүйелерден және бақылау, диагностика жасау құралдарынан тұрады
Техникалық құралдар комплексінің жақсы жұмыс атқаруы үшін, ақпараттық жүйенің мақсаты мен мәселесін орындаушы математикалық модельдер
Дұрыс жауабы жоқ
Қойылған мақсатқа жету үшін ақпаратты беру, өңдеу және сақтауға пайдаланылатын әдістер жиынтығын айтамыз
Дербес компьютерді бағдарламалық жабдықтау негізін құрайды
Операциялық жүйе нені айтамыз
Дербес компьютерді бағдарламалық жабдықтау негізін құрайды
Техникалық құралдар комплексінің жақсы жұмыс атқаруы үшін, ақпараттық жүйенің мақсаты мен мәселесін орындаушы математикалық модельдер
Ақпараттық жүйенің жұмысына арналған техникалық құралдардың комплексі
Дұрыс жауабы жоқ
Ақпараттық жүйе жасау және қолдану барысында жұмысшылардың
Драйвер дегеніміз не?
ОЖ сыртқы құрылғыларымен қарым-қатынасын қамтамасыз етуші бағдарламалар
Операциялық жүйелерден және бақылау, диагностика жасау құралдарынан тұрады
Дұрыс жауабы жоқ
Дербес компьютерді бағдарламалық жабдықтау негізін құрайды
Ақпараттық жүйе жасау және қолдану барысында жұмысшылардың
Интегралданған қолданбалы жүйелер дегеніміз не?
Ақпаратты өңдеудің әмбебап мүмкіндіктеріне ие қолданбалы бағдарламалардың комплексті пакеті
Операцияның сыртқы құрылғыларымен қарым-қатынасын қамтамасыз етуші бағдарламалар
Дұрыс жауабы жоқ
Дербес компьютерді бағдарламалық жабдықтау негізін құрайды
Техникалық құралдар комплексінің жақсы жұмыс атқаруы үшін, ақпараттық жүйенің мақсаты мен мәселесін орындаушы математикалық модельдер
Object Pascal тілінің алфавиті құрамына латын алфавитінің қанша арнайы символдар кіреді?
23
10
30
21
13
Комментарий дегеніміз не?
Бағдарламаның кез келген жеріне жазылатын түсіндірме мәтіні
Ақпараттың кез келген жеріне жазылатын түсіндірме
Компьютердің кез келген жеріне жазылатын түсіндірме
Бағдарламаның кез келген жеріне және шығаратын түсіндірме мәтіні
Дұрыс жауабы жоқ
Компьютерлік программа дегеніміз не?
Байттар тізбегі түрінде көрсетілген элементар командалар жиынтығы
Ақпараттар түрінде көрсетілген элементар командалар жиынтығы
Байттар және биттер саны тізбегі түрінде көрсетілген элементар командалар жиынтығы
Дұрыс жауабы жоқ
Программа нақты бір программалау тілінде жасалатын әріптер жиынтығы
Ағымдық код нені айтамыз?
Программа нақты бір программалау тілінде мәтін секілді жазылатын ағым
Бағдарламаның кез келген жеріне жазылатын түсіндірме мәтіні
Қолданушы дербес компьютермен байланыс жасауын жақсы және қолайлы түрде қамтамасыз ететін бағдарлама
Дұрыс жауабы жоқ
Операциялық жүйелерден және бақылау, диагностика жасау құралдарынан тұрады
Утилиттер дегеніміз не
Операциялық жүйе мүмкіндіктерін қамтамасыз етуші көмекші бағдарламалар
Бағдарламалау тілінен ЭЕМ-тіліне аудармашы, яғни ЭЕМ-кодтарынан тұратын командалар
Дұрыс жауабы жоқ
Машиналық кодтарға командалық аударма және дәл сол уақытта әр команданың орындалуын қамтамасыз етуші транслятор
Барлық бағдарламаны машиналық командаға оның орындалуынсыз аударатын транслятор
Edit1 және Edit12 компоненталарының сандық қосындысы
Panel1.Caption:=FloatToStr(StrToFloat((Edit1)+StrToFloat((Edit12)
Panel1.Caption:=FloatToStr(StrToInt(Edit1)+StrToInt((Edit12)
Panel1.Caption:= StrToFloat (StrToFloat((Edit1)+StrToFloat((Edit12)
Panel1.Caption:= RealToStr(StrToReal((Edit1)+StrToReal((Edit12)
Дұрыс жауабы жоқ
Edit1 және Edit12 компоненталарының сандық айырмасы
Panel1.Caption:=FloatToStr(StrToFloat((Edit1)-StrToFloat((Edit12);
Panel1.Caption:=FloatToStr(StrToInt(Edit1)-StrToInt((Edit12)
Panel1.Caption:= StrToFloat (StrToFloat((Edit1)-StrToFloat((Edit12)
Panel1.Caption:= RealToStr(StrToReal((Edit1)-StrToReal((Edit12)
Дұрыс жауабы жоқ
Edit1 және Edit12 компоненталарының сандық көбейтіндісі
Panel1.Caption:=FloatToStr(StrToFloat((Edit1)*StrToFloat((Edit12);
Panel1.Caption:=FloatToStr(StrToInt(Edit1)*StrToInt((Edit12)
Panel1.Caption:= StrToFloat (StrToFloat((Edit1)*StrToFloat((Edit12)
Panel1.Caption:= RealToStr(StrToReal((Edit1)*StrToReal((Edit12)
Дұрыс жауабы жоқ
Edit1 және Edit12 компоненталарының сандық бөлуі
Panel1.Caption:=FloatToStr(StrToFloat((Edit1)/StrToFloat((Edit12);
Panel1.Caption:=FloatToStr(StrToInt(Edit1)/StrToInt((Edit12)
Panel1.Caption:= StrToFloat (StrToFloat((Edit1)/StrToFloat((Edit12)
Panel1.Caption:= RealToStr(StrToReal((Edit1)/StrToReal((Edit12)
Дұрыс жауабы жоқ
Индексті қосу
Table1.AddIndex(‘indPost’,[ixDescending, ixCaseInsensitive]);
Table1.AddIndex[‘indPost’,(ixDescending, ixCaseInsensitive)]
Table1.IndexFieldNames(‘indPost’,[ixDescending, ixCaseInsensitive])
Table1.IndexFieldNames:=‘indPost’
Дұрыс жауабы жоқ
Бағдарламаның ағымдық индексі берілетін қатарын көрсетіңіз.
Table1.IndexNames:=‘indPost’;
Table1.IndexField:=‘indPost’
Table1.AddIndex[‘indPost’,(ixDescending, ixCaseInsensitive)]
Table1.IndexFieldNames(‘indPost’,[ixDescending, ixCaseInsensitive])
Дұрыс жауабы жоқ
Индексті жою қатарын көрсетіңіз.
Table1.DeleteIndex:=‘indPost’;
Table1.IndexFieldDelete:=‘indPost’
Table1.AddIndex[‘indPost’,(ixDescending, ixCaseInsensitive)]
Table1.IndexFieldNames(‘indPost’,[ixDescending, ixCaseInsensitive])
Дұрыс жауабы жоқ
Бағдарламаның деректер жинағы өрісінің мәндері өзгертілетін бағдарламаның қатарын көрсетіңіз.
Table1.FieldByName(‘Name’).AsString:=Edit1.Text;
Table1.FieldByName(‘Name’).AsString.Close
ListBox1.Items.Add:=Edit1.Text
Table1.Close
Дұрыс жауабы жоқ
Button1 компоненті қасиетіне Edit1 компоненті мәнін меншіктеу процедурасын құрыңыз
Button1.Caption:=Edit1.Text;
Edit1.Text= Button1.Caption
Button1.Caption:=Edit1.Caption
Button1.Text:=Edit1.Text;
Дұрыс жауабы жоқ
Келесіде
Type Tperson=class…
Tstudent=class(TPerson)
Ball: Real;
Constructor create(Nm,Dg:String; sv,bl: Real);
Procedure ShowBall;
End;
ShowBall әдісіне қатынас жасау үшін келесі операторды қолдану керек.
ShowBall;
Tstudent. ShowBall
а.ShowBall
b.ShowBall
Дұрыс жауабы жоқ
Сипаттама берілген
Type TaClass:class
FioField: Real;
Function GetField:Real;
Procedure SetField(Value:Real);
XXXXXX Flo: Read ReadGetField Write SetField;
End;
Var a: TaClass;
ХХХХХХ орнына кілттік сөзді енгіз
Property
Events
Public
Private
Дұрыс жауабы жоқ
Келесі сипаттамада
Type TaClass:class
FloField: Real;
Function GetField:Real;
Procedure SetField(Value:Real);
Property Flo: Read ReadGetField Write SetField;
End;
Var a: TaClass;
Flo қасиетін пайдаланып, FloField өрісіне 4.56 мәнін меншіктеңіз.
a.FloField.Flo:=4.56;
FloField.Flo:=4.56
b.Flo.FloField:=4.56
FloField:=4.56
Дұрыс жауабы жоқ
Берілген компонентер тізімінде визуалдыларын көрсет. 1)TLabel; 2)TPanel; 3)TMainMenu; 4)TPopupMenu; 5)TEdit; 6)TButton; 7)TTimer;
1,2,5,6
3,4,7
1,2,3,5,6
1,2,3,4,5,6,7
Дұрыс жауабы жоқ
Берілген компонентер тізімінде визуалды еместерін көрсет. 1)TLabel; 2)TPanel; 3)TMainMenu; 4)TPopupMenu; 5)TEdit; 6)TButton; 7)TTimer;
3,4,7
1,2,5,6
1,2,3,5,6
1,2,3,4,5,6,7
Дұрыс жауабы жоқ
Көпқатарлы редакторға жаңа қатар қосу әдісін көрсетіңіз Memo1.Lines.XXXX.
Add
Line
Captions
Label
Дұрыс жауабы жоқ
Берілген қасиеттер тізімінен компонеттің форма бетінде орналасу түрлерін білдіретіндерін ғана белгіле. 1)Align; 2)Width; 3)Top; 4)Left; 5)Height; 6)Caption; 7)ItemIndex.
1,3,4
1,2,3,4,5
2,5,6
тек 7
Дұрыс жауабы жоқ
Берілген қасиеттер тізімінен компонеттің өлшемдерін білдіретіндерін ғана белгіле. 1)Align; 2)Width; 3)Top; 4)Left; 5)Height; 6)Caption; 7)ItemIndex.
2,5
1,3,4
1,2,3,4,5
тек 7
Дұрыс жауабы жоқ
Келесі сипаттамада
Type TVisualObject=class(TWinControl)
Procedure Draw; XXXXXX;
TVisualChildObject=class(TVisualObject)
Procedure Draw; Override;
End;
Ата-ана-объектісінде Draw әдісінің өрісінде сипатталуы мүмкін директиваны таңда.
Override
Overload
Virtual
Dynamic
Дұрыс жауабы жоқ
Тізім ішінен номері бойынша қатарды таңдау операторы.
Items [Items]
Lines [Lines]
Text [ItemIndex]
Items[ItemIndex]
Text [ItemIndex]
Items[Items]
Items[Lines]
Lines [Lines]
ListBox1 компоненті қасиетін жазыңыз.
Case ListBox1.XXXX of
0:y:=x/400;
1:y:=x/16380
2:y:=x/28.35
3:y:=x/28.35*16
End;
ItemIndex
Items
Items[ItemIndex]
Оператор дұрыс берілмеген
Дұрыс жауабы жоқ
Меншіктеу операторын дұрыс түрі.
X:= StrToFloat(Edit1.Text);
StrToFloat(Edit1.Text):=x
Edit1.text:=StrToFloat(x)
StrToFloat(x):=Edit1.Text
Дұрыс жауабы жоқ
Қайсы қатарда қате бар?
Type
MyForm:=class(Tform)
End;
2
1
3
Барлық қатарда
Дұрыс жауабы жоқ
Код берілген
R:=-3.14E-4;
Edit1.Text:=IntToStr(R);
Қатені түзе
Edit1.Text:=FloatToStr(R);
Edit1.Text:=RealToStr(R)
Edit1.Caption:=IntToStr(R)
Edit1.Caption:=FloatToStr(R)
Дұрыс жауабы жоқ
Келесі кодтағы
R:=125;
Edit1.Text:=StrToInt(R);
қатені түзе
Edit1.Text:=IntToStr(R);
Edit1.Text:=RealToStr(R)
Edit1.Caption:=FloatToStr(R)
Edit1.Caption:=IntToStr(R)
Дұрыс жауабы жоқ
TForm класынан пайдаболатын MyForm класын жариялау операторын құрастыр.
Type MyForm = class(TForm) end;
Type MyForm := class(TForm) end
Type TForm = class(MyForm) end
MyForm = Type class(TForm) end
Дұрыс жауабы жоқ
Келесі кодта
If Edit1.Text=Edit2.Text
Then Edit3.Text:=’Да’;
Else Edit3.Text:=’Нет’;
қай қатарда қате бар?
2
1
3
барлығында
Дұрыс жауабы жоқ
Келесі кодта
Case Edit1.Text of
1: Edit3.Text:=’1’;
2: Edit3.Text:=’10’;
Else 1: Edit3.Text:=’0000’;
End;
Қай қатарда қате бар?
3
1
2
4
Дұрыс жауабы жоқ
Келесі кодтағы
For i=1 to 15;
Do Edit3.Text:=Edit1.Text+Edit2.Text;
Қатені түзе
For i:=1 to 15 Do Edit3.Text:=Edit1.Text+Edit2.Text;
For i:=1 to 15 Do Edit3.Caption:=Edit1. Caption +Edit2. Caption
For i:=1 to 15 Do Edit3.Text:=StrToInt(Edit1.Text+Edit2.Text)
For i:=1 to 15 Do Edit3.Text:=IntToStr(Edit1.Text+Edit2.Text)
Дұрыс жауабы жоқ
Келесі кодта
While I>0 do XXXX Edit3.Text:=IntToStr(i); i:=i+1; end;
ХХХХ орнына қандай операторды жазу керек?
Begin
Repeat
StrToInt
Width
Дұрыс жауабы жоқ
Бірнеше формалардан түратың жобада Form1 формасы белсенді. Form1 терезесінде орналасқан Label1 белгісінің мазмұнын Form2-де орналасқан Edit1-ге бейнелейтін операторды таңда.
Form2.Edit1.Text:= Form1.Label1.Caption;
Form2.Edit1.Text:= Form2.Label1.Caption
Form1.Edit1.Text:= Form1.Label1.Caption
Edit1.Text:=Label1.Caption
Дұрыс жауабы жоқ
Оқиғаларды өңдеуіштің компоненттің деректерді қабылдауға дайын екендігін хабарлайтын процедура параметрін көрсет.
Procedure Tform1.Edit1DragOver(…);
Begin
If Sourse.ClassName:=’TEdit’
Then Accept:=true
Else Accept:=false;
End;
Accept
Sender
State
X, Y
Дұрыс жауабы жоқ
Берілген мысалда әдісті шақыруды жалғастырып жаз.
Begin
If FontDialog1.XXXX
Then Memo1.Font:=FontDialog1.Font;
End;
Execute
LoadFromFile
Active
Case of
Дұрыс жауабы жоқ
Келесі кодта
Procedure Tform1.Button1Click(…);
Var x, y: Real;
Begin
X:=StrToFloat(Edit1.Text);
Y:= StrToFloat(Edit2.Text);
Panel1.Caption:=FloatToStr(x+y);
Panel2.Caption:=FloatToStr(x*y);
Panel3.Caption:=FloatToStr(x/y);
Panel4.Caption:=FloatToStr(x-y);
End;
х=20 және у=4 болғанда Панель1-ге қандай жауап шығады.
24
16
80
5
Дұрыс жауабы жоқ
Келесі кодта
Procedure Tform1.Button1Click(…);
Var x, y: Real;
Begin
X:=StrToFloat(Edit1.Text);
Y:= StrToFloat(Edit2.Text);
Panel1.Caption:=FloatToStr(x+y);
Panel2.Caption:=FloatToStr(x*y);
Panel3.Caption:=FloatToStr(x/y);
Panel4.Caption:=FloatToStr(x-y);
End;
х=20 және у=4 болғанда Панель2-ге қандай жауап шығады.
80
16
24
5
Дұрыс жауабы жоқ
Келесі кодта
Procedure Tform1.Button1Click(…);
Var x, y: Real;
Begin
X:=StrToFloat(Edit1.Text);
Y:= StrToFloat(Edit2.Text);
Panel1.Caption:=FloatToStr(x+y);
Panel2.Caption:=FloatToStr(x*y);
Panel3.Caption:=FloatToStr(x/y);
Panel4.Caption:=FloatToStr(x-y);
End;
х=20 және у=4 болғанда Панель3-ке қандай жауап шығады?
5
16
24
80
Дұрыс жауабы жоқ
Келесі кодта
Procedure Tform1.Button1Click(…);
Var x, y: Real;
Begin
X:=StrToFloat(Edit1.Text);
Y:= StrToFloat(Edit2.Text);
Panel1.Caption:=FloatToStr(x+y);
Panel2.Caption:=FloatToStr(x*y);
Panel3.Caption:=FloatToStr(x/y);
Panel4.Caption:=FloatToStr(x-y);
End;
х=20 және у=4 болғанда Панель 4-ке қандай жауап шығады?
16
80
24
5
Дұрыс жауабы жоқ
Келесі кодта
Procedure Tform1.Button1Click(…);
Var x, y: String;
Begin
X:=’123’;
Y:= ‘5’;
Panel1.Caption:=x+y;
End;
Панель1-ге қандай жауап шығады?
‘1235’
128
123
5
Дұрыс жауабы жоқ
Келесі кодта
Ms:=StrToInt(Edit1.Text);
Km:=ms*3.6;
Label1.Caption:=IntToStr(ms)+’м/сек – это ’+FloatToStr(km)+’ км/час’
End;
Егер Edit1-де 100 енгізілсе, Label1 компонентіне қандай жауап шығады?
100 м/сек – это 360 км/час
100 м/сек – это 100 км/час
360 км/час
Оператор для метки записан не верно
Дұрыс жауабы жоқ
Келесі кодта
Funt:=StrToFloat(Edit1.Text);
kg:=funt*0.4095;
Label1.Caption:=FloatToStr(funt)+’фунтов – это ’+FloatToStr(kg)+’ киллограммов’
End;
Егер Edit1-де 100 енгізілсе, Label1 компонентіне қандай жауап шығады?
100 фунтов – это 409.5 киллограммов
100 фунтов – это 409.5 кг
409.5
Оператор для метки записан не верно
Дұрыс жауабы жоқ
Келесі кодта
i:=StrToFloat(Edit1.Text);
r:=StrToFloat(Edit2.Text);
U:=i*r;
Label1.Caption:=’Напряжение’+FloatToStr(u)+’B
End;
Егер Edit1-де 10, ал Edit2-де 25 енгізілсе, Label1 компонентіне қандай жауап шығады?
Напряжение 250 В
250
Напряжение 10 В
Напряжение 25 В
Label1 компонентіне оператор дұрыс жазылмаған
Бағдарламаның келесі бөлігінде В следующей части программы
Timer1.Interval:=1000;
Timer1.XXXX:=True;
ХХХХ орнына нені жазу керек. Что необходимо вписать вместо ХХХХ
Enabled
Timer
1000
Active
Дұрыс жауабы жоқ
Графикалық бейнеге ХХХХ орнына нені жазу керек?
Form1.Image.Picture.XXXX(‘Skyline.bmp’);
LoadFromFile
Execute
Gliph
Оператор дұрыс жазылмаған
Дұрыс жауабы жоқ
Келесі кодта
FieldByName(‘Fam’).XXXX:=’’;
FieldByName(‘Year’).AsInteger:=1930;
FieldByName(‘Sex’).AsBoolean:=true;
ХХХХ орнына нені жазу керек?
AsString
AsInteger
AsBoolean
Оператор дұрыс жазылмаған
Дұрыс жауабы жоқ
Edit1 және Edit12 компоненттерінің сандық қосындысы
Panel1.Caption:=FloatToStr(StrToFloat((Edit1)+StrToFloat((Edit12)
Panel1.Caption:=FloatToStr(StrToInt(Edit1)+StrToInt((Edit12)
Panel1.Caption:= StrToFloat (StrToFloat((Edit1)+StrToFloat((Edit12)
Panel1.Caption:= RealToStr(StrToReal((Edit1)+StrToReal((Edit12)
Дұрыс жауабы жоқ
Edit1 және Edit12 компоненттерінің сандық айырмасы
Panel1.Caption:=FloatToStr(StrToFloat((Edit1)-StrToFloat((Edit12);
Panel1.Caption:=FloatToStr(StrToInt(Edit1)-StrToInt((Edit12)
Panel1.Caption:= StrToFloat (StrToFloat((Edit1)-StrToFloat((Edit12)
Panel1.Caption:= RealToStr(StrToReal((Edit1)-StrToReal((Edit12)
Дұрыс жауабы жоқ
Edit1 және Edit12 компоненттерінің сандық көбейтіндісі
Panel1.Caption:=FloatToStr(StrToFloat((Edit1)*StrToFloat((Edit12);
Panel1.Caption:=FloatToStr(StrToInt(Edit1)*StrToInt((Edit12)
Panel1.Caption:= StrToFloat (StrToFloat((Edit1)*StrToFloat((Edit12)
Panel1.Caption:= RealToStr(StrToReal((Edit1)*StrToReal((Edit12)
Дұрыс жауабы жоқ
Edit1 және Edit12 компоненттерінің сандық бөліндісі
Panel1.Caption:=FloatToStr(StrToFloat((Edit1)/StrToFloat((Edit12);
Panel1.Caption:=FloatToStr(StrToInt(Edit1)/StrToInt((Edit12)
Panel1.Caption:= StrToFloat (StrToFloat((Edit1)/StrToFloat((Edit12)
Panel1.Caption:= RealToStr(StrToReal((Edit1)/StrToReal((Edit12)
Дұрыс жауабы жоқ
Индексті қосу қайсысы?
Table1.AddIndex(‘indPost’,[ixDescending, ixCaseInsensitive]);
Table1.AddIndex[‘indPost’,(ixDescending, ixCaseInsensitive)]
Table1.IndexFieldNames(‘indPost’,[ixDescending, ixCaseInsensitive])
Table1.IndexFieldNames:=‘indPost’
Дұрыс жауабы жоқ
Ағымдық индескті орнату қатарын көрсетіңіз.
Table1.IndexNames:=‘indPost’;
Table1.IndexField:=‘indPost’
Table1.AddIndex[‘indPost’,(ixDescending, ixCaseInsensitive)]
Table1.IndexFieldNames(‘indPost’,[ixDescending, ixCaseInsensitive])
Дұрыс жауабы жоқ
Көрсетіңіз индексті жою қатарын
Table1.DeleteIndex:=‘indPost’;
Table1.IndexFieldDelete:=‘indPost’
Table1.AddIndex[‘indPost’,(ixDescending, ixCaseInsensitive)]
Table1.IndexFieldNames(‘indPost’,[ixDescending, ixCaseInsensitive])
Дұрыс жауабы жоқ
Деректер жинағы өрістерінің мәндерін өзгерту қатарын көрсетіңіз.
Table1.FieldByName(‘Name’).AsString:=Edit1.Text;
Table1.FieldByName(‘Name’).AsString.Close
ListBox1.Items.Add:=Edit1.Text
Table1.Close
Дұрыс жауабы жоқ
Button1 компоненті қасиетіне Edit1 компонентінің мәнін меншіктеу
Button1.Caption:=Edit1.Text;
Edit1.Text= Button1.Caption
Button1.Caption:=Edit1.Caption
Button1.Text:=Edit1.Text;
Дұрыс жауабы жоқ
Келесі кодта
Type Tperson=class…
Tstudent=class(TPerson)
Ball: Real;
Constructor create(Nm,Dg:String; sv,bl: Real);
Procedure ShowBall;
End;
ShowBall әдісіне қатынас жасау үшін келесі операторды қолдану керек.
ShowBall
Tstudent. ShowBall
a.ShowBall
b.ShowBall
Дұрыс жауабы жоқ
Келесі сипаттамада
Type TaClass:class
FioField: Real;
Function GetField:Real;
Procedure SetField(Value:Real);
XXXXXX Flo: Read ReadGetField Write SetField;
End;
Var a: TaClass;
ХХХХХХ орнына дұрыс кілттік сөзді енгіз
Property
Events
Public
Private
Дұрыс жауабы жоқ
Берілген қасиеттер тізімінен компонеттің форма бетінде орналасуын анықтайтын қасиеттерді белгіле. 1)Align; 2)Width; 3)Top; 4)Left; 5)Height; 6)Caption; 7)ItemIndex.
1,3,4
1,2,3,4,5
2,5,6
тек 7
Дұрыс жауабы жоқ
Берілген қасиеттер тізімінен компонеттің өлшемдерін анықтайтын қасиеттерді белгіле. 1)Align; 2)Width; 3)Top; 4)Left; 5)Height; 6)Caption; 7)ItemIndex.
2,5
1,3,4
1,2,3,4,5
тек 7
Дұрыс жауабы жоқ
Келесі сипаттамада
Type TVisualObject=class(TWinControl)
Procedure Draw; XXXXXX;
TVisualChildObject=class(TVisualObject)
Procedure Draw; Override;
End;
Draw әдісінің өрісінде сипатталуы мүмкін директиваны таңда
Override
Overload
Virtual
Dynamic
Дұрыс жауабы жоқ
Нөмері бойынша тізім ішінен қатарды таңдау операторы.
Items [Items]
Lines [Lines]
Text [ItemIndex]
Items[ItemIndex]
Text [ItemIndex]
Items[Items]
Items[Lines]
Lines [Lines]
ListBox1 компонентінің қасиетін жазыңыз.
Case ListBox1.XXXX of
0:y:=x/400;
1:y:=x/16380
2:y:=x/28.35
3:y:=x/28.35*16
End;
ItemIndex
Items
Items[ItemIndex]
Оператор дұрыс жазылмаған
Дұрыс жауабы жоқ
Меншіктеу операторын дұрыс түрін көрсетіңіз.
X:= StrToFloat(Edit1.Text);
StrToFloat(Edit1.Text):=x
Edit1.text:=StrToFloat(x)
StrToFloat(x):=Edit1.Text
Дұрыс жауабы жоқ
Келесі кодтағы
R:=-3.14E-4;
Edit1.Text:=IntToStr(R);
Қатені түзе
Edit1.Text:=FloatToStr(R);
Edit1.Text:=RealToStr(R)
Edit1.Caption:=IntToStr(R)
Edit1.Caption:=FloatToStr(R)
Дұрыс жауабы жоқ
Бірнеші формалардан түратын жобада Form1 терезесі белсенді. Form1 терезесінде орналасқан Label1 таңбашасы мазмұнын Form2-де орналасқан Edit1-ге бейнелеу операторын таңда.
Form2.Edit1.Text:= Form1.Label1.Caption;
Form2.Edit1.Text:= Form2.Label1.Caption
Form1.Edit1.Text:= Form1.Label1.Caption
Edit1.Text:=Label1.Caption
Дұрыс жауабы жоқ
Компонент деректерді қабылдауға дайын екендігін білдіретін оқиғаны өңдеуіш процедурасының параметірін көрсет.
Procedure Tform1.Edit1DragOver(…);
Begin
If Sourse.ClassName:=’TEdit’
Then Accept:=true
Else Accept:=false;
End;
Accept
Sender
State
X, Y
Дұрыс жауабы жоқ
Берілген есепте әдісті шақыруды жалғастырып жаз.
Begin
If FontDialog1.XXXX
Then Memo1.Font:=FontDialog1.Font;
End;
Execute
LoadFromFile
Active
Case of
Дұрыс жауабы жоқ
Келесі кодта
Procedure Tform1.Button1Click(…);
Var x, y: Real;
Begin
X:=StrToFloat(Edit1.Text);
Y:= StrToFloat(Edit2.Text);
Panel1.Caption:=FloatToStr(x+y);
Panel2.Caption:=FloatToStr(x*y);
Panel3.Caption:=FloatToStr(x/y);
Panel4.Caption:=FloatToStr(x-y);
End;
х=20 және у=4 болғанда Панель1-ге қандай жауап шығады?
24
16
80
5
Дұрыс жауабы жоқ
Келесі кодта
Procedure Tform1.Button1Click(…);
Var x, y: Real;
Begin
X:=StrToFloat(Edit1.Text);
Y:= StrToFloat(Edit2.Text);
Panel1.Caption:=FloatToStr(x+y);
Panel2.Caption:=FloatToStr(x*y);
Panel3.Caption:=FloatToStr(x/y);
Panel4.Caption:=FloatToStr(x-y);
End;
х=20 және у=4 болғанда Панель2-ге қандай жауап шығады?
80
16
24
5
Дұрыс жауабы жоқ
Келесі кодта
Procedure Tform1.Button1Click(…);
Var x, y: Real;
Begin
X:=StrToFloat(Edit1.Text);
Y:= StrToFloat(Edit2.Text);
Panel1.Caption:=FloatToStr(x+y);
Panel2.Caption:=FloatToStr(x*y);
Panel3.Caption:=FloatToStr(x/y);
Panel4.Caption:=FloatToStr(x-y);
End;
х=20 және у=4 болғанда панель3-ке қандай жауап көрсет?
5
16
4
80
Дұрыс жауабы жоқ
Келесі кодта
Procedure Tform1.Button1Click(…);
Var x, y: Real;
Begin
X:=StrToFloat(Edit1.Text);
Y:= StrToFloat(Edit2.Text);
Panel1.Caption:=FloatToStr(x+y);
Panel2.Caption:=FloatToStr(x*y);
Panel3.Caption:=FloatToStr(x/y);
Panel4.Caption:=FloatToStr(x-y);
End;
х=20 және у=4 болғанда панель4-ке қандай жауап шығады?
16
80
24
5
Дұрыс жауабы жоқ
Келесі кодта
Procedure Tform1.Button1Click(…);
Var x, y: String;
Begin
X:=’123’;
Y:= ‘5’;
Panel1.Caption:=x+y;
End;
панель1-ге қандай жауап көрсет?
‘1235’
128
123
5
Дұрыс жауабы жоқ
Келесі кодта
Ms:=StrToInt(Edit1.Text);
Km:=ms*3.6;
Label1.Caption:=IntToStr(ms)+’м/сек – это ’+FloatToStr(km)+’ км/час’
End;
Егер Edit1-де 100 енгізілсе, Label1 компонентіне қандай жауап көрсет?
100 м/сек – это 360 км/час
100 м/сек – это 100 км/час
360 км/час
Оператор дұрыс жазылмаған
Дұрыс жауабы жоқ
Келесі кодта
Funt:=StrToFloat(Edit1.Text);
kg:=funt*0.4095;
Label1.Caption:=FloatToStr(funt)+’фунтов – это ’+FloatToStr(kg)+’ киллограммов’
End;
Егер Edit1-де 100 енгізілсе, Label1 компонентіне қандай жауап көрсет?
100 фунтов – это 409.5 киллограммов
100 фунтов – это 409.5 кг
409.5
Оператор дұрыс емес
Дұрыс жауабы жоқ
Келесі кодта
i:=StrToFloat(Edit1.Text);
r:=StrToFloat(Edit2.Text);
U:=i*r;
Label1.Caption:=’Напряжение’+FloatToStr(u)+’B
End;
Егер Edit1-де 10, ал Edit2-де 25 енгізілсе, Label1 компонентіне қандай жауап көрсет?
Напряжение 250 В
250
Напряжение 10 В
Напряжение 25 В
Оператор для метки записан не верно
Бағдарламаның келесі бөлігінде
Timer1.Interval:=1000;
Timer1.XXXX:=True;
ХХХХ орнына нені жазу керек?
Enabled
Timer
1000
Active
Дұрыс жауабы жоқ
Edit1 және Edit12 компоненттерінің сандық қосындысы қайсысы
Panel1.Caption:=FloatToStr(StrToFloat((Edit1)+StrToFloat((Edit12)
Panel1.Caption:=FloatToStr(StrToInt(Edit1)+StrToInt((Edit12)
Panel1.Caption:= StrToFloat (StrToFloat((Edit1)+StrToFloat((Edit12)
Panel1.Caption:= RealToStr(StrToReal((Edit1)+StrToReal((Edit12)
Дұрыс жауабы жоқ
Edit1 және Edit12 компоненттерінің сандық айырмасы қайсысы
Panel1.Caption:=FloatToStr(StrToFloat((Edit1)-StrToFloat((Edit12);
Panel1.Caption:=FloatToStr(StrToInt(Edit1)-StrToInt((Edit12)
Panel1.Caption:= StrToFloat (StrToFloat((Edit1)-StrToFloat((Edit12)
Panel1.Caption:= RealToStr(StrToReal((Edit1)-StrToReal((Edit12)
Дұрыс жауабы жоқ
Edit1 және Edit12 компоненттерінің сандық көбейтіндісін көрсет
Panel1.Caption:=FloatToStr(StrToFloat((Edit1)*StrToFloat((Edit12);
Panel1.Caption:=FloatToStr(StrToInt(Edit1)*StrToInt((Edit12)
Panel1.Caption:= StrToFloat (StrToFloat((Edit1)*StrToFloat((Edit12)
Panel1.Caption:= RealToStr(StrToReal((Edit1)*StrToReal((Edit12)
Дұрыс жауабы жоқ
Edit1 және Edit12 компоненттерінің сандық бөліндісі көрсет
Panel1.Caption:=FloatToStr(StrToFloat((Edit1)/StrToFloat((Edit12);
Panel1.Caption:=FloatToStr(StrToInt(Edit1)/StrToInt((Edit12)
Panel1.Caption:= StrToFloat (StrToFloat((Edit1)/StrToFloat((Edit12)
Panel1.Caption:= RealToStr(StrToReal((Edit1)/StrToReal((Edit12)
Дұрыс жауабы жоқ
Ағымдық индескті орнату қатарын көрсет.
Table1.IndexNames:=‘indPost’;
Table1.IndexField:=‘indPost’
Table1.AddIndex[‘indPost’,(ixDescending, ixCaseInsensitive)]
Table1.IndexFieldNames(‘indPost’,[ixDescending, ixCaseInsensitive])
Дұрыс жауабы жоқ
Индексті жою қатарын көрсет.
Table1.DeleteIndex:=‘indPost’;
Table1.IndexFieldDelete:=‘indPost’
Table1.AddIndex[‘indPost’,(ixDescending, ixCaseInsensitive)]
Table1.IndexFieldNames(‘indPost’,[ixDescending, ixCaseInsensitive])
Дұрыс жауабы жоқ
Деректер жинағы өрістерінің мәндерін өзгерту қатарын көрсет.
Table1.FieldByName(‘Name’).AsString:=Edit1.Text;
Table1.FieldByName(‘Name’).AsString.Close
ListBox1.Items.Add:=Edit1.Text
Table1.Close
Дұрыс жауабы жоқ
Қайсы кодта
Type Tperson=class…
Tstudent=class(TPerson)
Ball: Real;
Constructor create(Nm,Dg:String; sv,bl: Real);
Procedure ShowBall;
End;
ShowBall әдісіне қатынас жасау үшін келесі операторды қолдану керек.
a. ShowBall;
Tstudent. ShowBall
ShowBall
b.ShowBall
Дұрыс жауабы жоқ
Келесі сипаттамада
Type TaClass:class
FioField: Real;
Function GetField:Real;
Procedure SetField(Value:Real);
XXXXXX Flo: Read ReadGetField Write SetField;
End;
Var a: TaClass;
ХХХХХХ орнына дұрысын енгіз
Property
Events
Public
Private
Дұрыс жауабы жоқ
Қайсы сипаттамада
Type TaClass:class
FloField: Real;
Function GetField:Real;
Procedure SetField(Value:Real);
Property Flo: Read ReadGetField Write SetField;
End;
Var a: TaClass;
Flo қасиетін пайдаланып, FloField өрісіне 4.56 мәнін меншіктеңіз.
a.FloField.Flo:=4.56;
FloField.Flo:=4.56
a.Flo.FloField:=4.56
FloField:=4.56
Дұрыс жауабы жоқ
Берілген компонентер тізімінде визуалды еместерін көрсетіңіз. 1)TLabel; 2)TPanel; 3)TMainMenu; 4)TPopupMenu; 5)TEdit; 6)TButton; 7)TTimer;
3,4,7
1,2,5,6
1,2,3,5,6
1,2,3,4,5,6,7
Дұрыс жауабы жоқ
Memo1.Lines.XXXX.Көпқатарлы редакторға жаңа қатар қосу әдісін көрсетіңіз
Add
Line
Captions
Label
Дұрыс жауабы жоқ
Берілген қасиеттер тізімінен компонеттің өлшемдерін анықтай тын қасиеттерді белгіле. 1)Align; 2)Width; 3)Top; 4)Left; 5)Height; 6)Caption; 7)ItemIndex.
2,5
1,3,4
1,2,3,4,5
тек 7
Дұрыс жауабы жоқ
Button1 компоненті қасиетіне Edit1 компонентінің мәнін меншіктеу қайсысы
Button1.Caption:=Edit1.Text;
Edit1.Text= Button1.Caption
Button1.Caption:=Edit1.Caption
Button1.Text:=Edit1.Text;
Дұрыс жауабы жоқ
Келесі кодта
Procedure Tform1.Button1Click(…);
Var x, y: Real;
Begin
X:=StrToFloat(Edit1.Text);
Y:= StrToFloat(Edit2.Text);
Panel1.Caption:=FloatToStr(x+y);
Panel2.Caption:=FloatToStr(x*y);
Panel3.Caption:=FloatToStr(x/y);
Panel4.Caption:=FloatToStr(x-y);
End;
х=20 және у=4 болғанда панель3-ке қандай жауап қанша шығады?
5
16
24
80
Дұрыс жауабы жоқ