Baza danch
1.Wywołuje przejście do pierwszego rekordu, w tabeli o nazwie "Table2"? Table2.First; 
2 Do poprzedniego rekordu, w tabeli o nazwie "Table1"? Table1.Prior; 
3 Do następnego rekordu, w tabeli o nazwie "Table3"? Table3.Next; 
4 Do ostatniego rekordu, w tabeli o nazwie "Table1"? Table1.Last; 
5 Wstawia nowy rekord w bieżącym miejscu, w tabeli o nazwie "Table5"? Table5.Insert; 
6 Kasuje aktywny rekord, w tabeli o nazwie "Table1"? Table1.Delete; 
7 Wywołuje stan edycji aktywnego rekordu, w tabeli o nazwie "Table2"? Table2.Edit;
8 Zatwierdza zmiany w aktywnym rekordzie, w tabeli o nazwie "Table1"? Table1.Post; 
9 Wywołuje rezygnację ze zmian, w tabeli o nazwie "Table1"? Table1.Cancel; 
10 odświeża dane, w tabeli o nazwie "Table2"? Table2.Refresh; 
11 wstawia nowy rekord na końcu, w tabeli o nazwie "Table5"? Table5.Append; 
12 wywołuje przesunięcie aktywnego rekordu o 5 rekordów, w tabeli o nazwie "Table4"? Table4.MoveBy(5); 
13 Instrukcja - przypisz zmiennej "b" (zmienna typu Integer) zawartość aktywnego rekordu z tabeli o nazwie "Table2", z kolumny o nazwie "Telkom" (w kolumnie znajdują się liczby całkowite). b:= Table2['Telkom']; 
14 Instrukcja - przypisz zmiennej "a" (zmienna typu String) zawartość aktywnego rekordu z tabeli o nazwie "Table1", z kolumny o nazwie "Tel" (w kolumnie znajdują się liczby całkowite)? a:= IntToStr(Table1['Tel']); 
15 Instrukcja - jeśli w tabeli o nazwie "Table2" aktywny jest ostatni rekord, to przypisz zmiennej "a" (zmienna typu String) zawartość aktywnego rekordu z tabeli o nazwie "Table1", z kolumny o nazwie "Tell" (w kolumnie znajdują się liczby całkowite). if Table2.eof then a:= IntToStr(Table1['Tell']); 
16 Instrukcja - jeśli w tabeli o nazwie "Table2" aktywny jest pierwszy rekord, to przypisz zmiennej "b" (zmienna typu String) zawartość aktywnego rekordu z tabeli o nazwie "Table1", z kolumny o nazwie "Telk" (w kolumnie znajdują się liczby całkowite). if Table2.bof then b:= IntToStr(Table1['Telk']); 
17 Instrukcja - wpisać do aktywnego rekordu w tabeli o nazwie "Table1", do kolumny o nazwie "Teml" (w kolumnie znajdują się liczby całkowite) zawartość zmiennej "b" (zmienna typu String). Table1['Teml']:=StrToInt(b); 
18 Instrukcja - wpisać do aktywnego rekordu w tabeli o nazwie "Table", do kolumny o nazwie "Tels" (w kolumnie znajdują się liczby całkowite) zawartość zmiennej "m" (zmienna typu Integer). Table['Tels']:=m; 
19 Instrukcja - wpisać do aktywnego rekordu w tabeli o nazwie "Table3", do kolumny o nazwie "Teel" (w kolumnie znajdują się liczby całkowite) liczbę 4. Table3['Teel']:=4; 
20 Instrukcja - wpisać do aktywnego rekordu w tabeli o nazwie "Table1", do kolumny o nazwie "Tell" (w kolumnie znajdują się ciągi znaków) znak 5. Table1['Tell']:='5'; 
Któreinstrukcjesąpoprawne? :
21 3 Table2.Ferst; Table4.MoveBy('5'); Table1.Next; b:= Table2[Telkom];
22 3 Table2.First; Table4.MoveBy(5); Table1.Next; b:= Table2[Telkom];
23 3 Table2.Edit; Table4.MoveBy('5');Table1.Neext; b= Table2['Telkom'];
24 3 Table2.Edite; Table4.Poost; Table1.Delete;b:= Table2['Telkom];
25 3 Table2.Edite; Table4.Post; Table1.Delette; b= Table2['Telkom'];
Komponenty:
26 "Edit1" (pole edycyjne) tekst "Koc".Edit1.Text:='Koc'; 
27 "Label2" (statyczny tekst) tekst "Koc". Label2.Caption:='Koc'; 
28 "BitBtn1" (klawisz) tekst "Zamknij". BitBtn1.Caption:='Zamknij'; 
29 Instrukcja - ustawić komponent o nazwie:
"Image2" (obiekt graficzny) w odległości 40 pixeli od górnej krawędzi formatki. Image2.Top:=40; 
30 "Edit2" (pole edycyjne) w odległości 80 pixeli od lewej krawędzi formatki. Edit2.Left:=80; 
31 ustawić szerokość komponentu o nazwie "Edit1" (pole edycyjne) na 200 pixeli. Edit1.Width:=200; 
32 ustawić wysokość komponentu o nazwie "Edit1" (pole edycyjne) na 30 pixeli. Edit1.Height:=30; 
33 ustawić formatkę o nazwie "Form1" na maksymalny rozmiar przy jej otwarciu. Form1.WindowState:=wsMaximized; 
34 ustawić formatkę o nazwie "Form1" na minimalny rozmiar przy jej otwarciu. Form1.WindowState:=wsMinimized; 
35 ustawić maksymalną liczbę znaków wpisanych do komponentu o nazwie "Edit3" (pole edycyjne) na 45. Edit3.MaxLength:=45; 
36ustawić rozmiar czcionki tekstu wyświetlanego w komponencie o nazwie "Edit3" (pole edycyjne) na 12. Edit3.Font.Size:=12; 
37 ustawić komponent o nazwie "Edit1" (pole edycyjne) tylko do odczytu. Edit1.ReadOnly:=True; 
38 ukryć komponent o nazwie "Edit1" (pole edycyjne). Edit1.Visible:=False; 
39 ustawić kolor tła komponentu o nazwie "Edit1" (pole edycyjne) na czerwony. Edit1.Color:=clRed; 
40 ustawić wartość opisującą początkowe położenie suwadła w komponencie o nazwie "ScrollBar1" (suwak) na -100. ScrollBar1.Min:=-100; 
41 ustawić wartość opisującą końcowe położenie suwadła w komponencie o nazwie "ScrollBar1" (suwak) na 200. ScrollBar1.Max:=200; 
42 ustawić suwadło w komponencie o nazwie "ScrollBar1" (suwak) na wartości 70. ScrollBar1.Position:=70; 
43 ustawić pionową orientację komponentu o nazwie "ScrollBar2"(suwak). ScrollBar2.Kind:=sbVertical; 
44 - ustawić poziomą orientację komponentu o nazwie "ScrollBar2" (suwak). ScrollBar2.Kind:=sbHorizontal; 
45 - ustawić automatyczne dopasowanie wymiarów komponentu o nazwie "Label2" (statyczny tekst) do jego zawartości. Label2.AutoSize:=True; 
46 - ustawić wyświetlanie w dwóch kolumnach opcji, w komponencie o nazwie "RadioGroup2" (panel wyboru zależnego). RadioGroup2.Columns:=2; 
47 - ustawić jako domyślną, trzecią opcję w komponencie o nazwie "RadioGroup2" (panel wyboru zależnego). RadioGroup2.ItemIndex:=2; 
48 - ustawić komponent o nazwie "CheckBox1" (pole wyboru niezależnego) jako wybrany. CheckBox1.State:=cbChecked; 
49 - ustawić komponent o nazwie "CheckBox1" (pole wyboru niezależnego) jako nie wybrany. CheckBox1.State:=cbUnchecked; 
50 - ustawić komponent o nazwie "CheckBox1" (pole wyboru niezależnego) jako częściowo wybrany. CheckBox1.State:=cbGrayed; 
51 - wyrównać do środka tekst, w komponencie o nazwie "Memo1" (pole edycyjne wielowierszowe).Memo1.Alignment:=taCenter; 
52 - wyrównać do lewej tekst w komponencie o nazwie "Memo1" (pole edycyjne wielowierszowe).
Memo1.Alignment:=taLeftJustify; 
53 - dodać do komponentu o nazwie "Memo1" (pole edycyjne wielowierszowe) linii z tekstem "c=5". Memo1.Lines.Add('c=5'); 
54 - załadować do komponentu o nazwie "Image1" (obiekt graficzny) bitmapę z pliku "c:\Sieć\A.bmp". Image1.Picture.LoadFromFile('c:\Sieć\A.bmp'); 
55 - ustawić kolor tła komponentu o nazwie "Shape1" (figury geometryczne) na czerwony. Shape1.Brush.Color:=clRed; 
56 - ustawić linię przerywaną w komponentu o nazwie "Shape1" (figury geometryczne). Shape1.Pen.Style:=psDash; 
57 - ustawić komponent o nazwie "Shape1" (figury geometryczne) jako elipsę. Shape1.Shape:=stEllipse; 
58 - ustawić interwał czasowy w komponencie o nazwie "Timer1" (komponent regularnie generujący zdarzenia w ustalonych odstępach czasu) równy 100ms.Timer1.Interval:=100; 
59 - uruchomić komponent o nazwie "Timer1" (komponent regularnie generujący zdarzenia w ustalonych odstępach czasu). Timer1.Enabled:=True; 
60 - ustawić dolny zakres wpisywanych liczb w komponencie o nazwie "SpinEdit1" (pole edycyjne z klawiszami sterującym) na 100. SpinEdit1.MinValue:=100; 
61 - ustawić górny zakres wpisywanych liczb w komponencie o nazwie "SpinEdit1" (pole edycyjne z klawiszami sterującym) na 200. SpinEdit1.MaxValue:=200; 
62 - ustawić przezroczystość tła w komponencie o nazwie "Label2" (statyczny tekst). Label2.Transparent:=True; 
63 - ustawić komponent o nazwie "Bevel1" (ramka) jako wypukły. Bevel1.Style:=bsRaised; 
64 - wyrównać do prawej tekst w komponencie o nazwie "Memo1" (pole edycyjne wielowierszowe). Memo1.Alignment:=taRightJustify; 
Instrukcje:
65 sinusa dla kąta równego jeden radian. a:= sin(1); 
66 sinusa hiperbolicznego dla kąta równego jeden radian. a:= sinh(1); 
67 arcusa sinusa z liczby równej 1.a:= arcsin(1); 
68 arcusa sinusa hiperbolicznego z liczby równej 1. a:= arcsinh(1); 
69 cosinusa dla kąta równego jeden radian. a:= cos(1); 
70 cosinusa hiperbolicznego dla kąta równego jeden radian. a:= cosh(1); 
71 arcusa cosinusa z liczby równej 1. a:= arccos(1); 
72 arcusa cosinusa hiperbolicznego z liczby równej 1. a:= arccosh(1); 
73 tangensa dla kąta równego jeden radian.a:= tan(1); 
74 tangensa hiperbolicznego dla kąta równego jeden radian. a:= tanh(1); 
75 arcusa tangensa z liczby równej 1. a:= arctan(1); 
76 arcusa tangensa hiperbolicznego z liczby równej 1. a:= arctanh(1); 
77 arcusa tangensa z liczby równej 1/2 (arctan2). a:= arctan2(1, 2); 
78 cotangensa dla kąta równego jeden radian. a:= cotan(1); 
79 bezwzględną z liczby -1. a:= abs(-1); 
80 części całkowitej z liczby 2,8. a:= int(2.8); 
81 części ułamkowej z liczby 2,8. a:= frac(2.8);
82 równą liczbie 2 do potęgi 10-tej (intpower). a:= intpower(2, 10); 
83 równą liczbie 2 do potęgi 0,5 (power).a:= power(2, 0.5); 
84 równą liczbie 2 do kwadratu (sqr). a:= sqr(2); 
85 równą pierwiastkowi kwadratowemu z liczby 4 (sqrt). a:= sqrt(4); 
86 równą długości przeciwprostokątnej w trójkącie prostokątnym o długości przyprostokątnych odpowiednio 3 i 4. a:= hypot(3, 4); 
87 równą funkcji "e" do kwadratu, gdzie liczna e=2,7182818 jest podstawą logarytmu naturalnego. a:= exp(2); 
88 równą logarytmowi naturalnemu z liczby 1. a:= ln(1); 
89 równą logarytmowi przy podstawie 2 z liczby 1 (log2). a:= log2(1); 
90 równą logarytmowi dziesiętnemu z liczby 1. a:= log10(1); 
91 równą logarytmowi przy podstawie 4 z liczby 1. a:= logN(4, 1); 
92 równą "Pi" (3.1415926535897932385). a:= pi; 
Instrukcja
93 - uruchomić formatkę o nazwie "Form2". Form2.Show; 
94 - zamknąć formatkę o nazwie "Form2". Form2.Close; 
95 - wpisać w okno edycyjne o nazwie "Edit1" współrzędną położenia suwadła, w suwaku o nazwie "ScrollBar1" (wartość określająca położenie suwadła jest liczbą typu Integer, a tekst w oknie edycyjnym jest ciągiem znaków typu String). Edit1.Text:= IntToStr(Scrollbar1.Position); 
96 - wpisać w okno edycyjne o nazwie "Edit1" ciąg znaków przechowywany przez zmienną "a" (zmienna typu String) i tekst "[kg]". Edit1.Text:= a + '[kg]'; 
97 - wpisać w okno edycyjne o nazwie "Edit1" ciąg znaków odpowiadający liczbie przypisanej zmiennej "a" (zmienna typu Integer) i tekst "[kg]". Edit1.Text:= IntToStr(a) + '[kg]'; 
98 - przypisać zmiennej "n" wartość odpowiadającą liczbie wpisanej w oknie komponentu o nazwie "SpinEdit1".n:= SpinEdit1.Value; 
99 - przypisać zmiennej "n" (zmienna typu Integer) wartość określającą położenie suwadła w suwaku o nazwie "ScrollBar1", gdzie wartość określająca położenie suwadła jest liczbą typu Integer. n:= Scrollbar1.Position; 
Instrukcja - przypisać zmiennej "a" wartość:
100 sumy zmiennych "b" i "c" (wszystkie zmienne typu Real). a:= b + c; 
101 różnicy zmiennych "b" i "c" (wszystkie zmienne typu Real). a:= b - c; 
102 iloczynu zmiennych "b" i "c" (wszystkie zmienne typu Real). a:= b * c; 
103 ilorazu zmiennej "b" przez "c" (wszystkie zmienne typu Real). a:= b / c; 
104 dzielenia całkowitego zmiennej "b" przez "c" (wszystkie zmienne typu Integer). a:= b div c; 
105 reszty z dzielenia całkowitego zmiennej "b" przez "c" (wszystkie zmienne typu Integer). a:= b mod c; 
106 bezwzględną obliczoną z ilorazu iloczynu zmiennych "b" i "c" przez zmienną"d" (wszystkie zmienne typu Real).a:= abs((b*c) /d); 
Instrukcja - jeśli jednocześnie zachodzą zdarzenia:
107 zmienna "a" jest równa 1, zmienna "b" jest większa od 1, zmienna "c" jest mniejsza od 2, zmienna "d" jest różna od 0, to zmiennej "e" przypisz wartość 3 (wszystkie zmienne są typy Real). if (a=1) and (b>1) and (c<2) and (d<0>=1) or (b<=1) then e:=3; 
109 w "RadioGroup1" (panel z polami wyboru zależnego) wybrano opcję nr 1 i w "RadioGroup2" (panel z polami wyboru zależnego) wybrano opcję nr 2, to zmiennej "e" przypisz wartość 3 (zmienna typu Real).if (RadioGroup1.Itemindex=0) and (RadioGroup2.Itemindex=1) then e:=3; 
Instrukcja - jeśli w komponencie o nazwie: "CheckBox1" (pole wyboru niezależnego) :
110 zaznaczone jest okienko wyboru, to zmiennej "e" przypisz wartość 3 (zmienna typu Real).if CheckBox1.State=cbcheckedthen e:=3; 
111 nie jest zaznaczone okienko wyboru, to zmiennej "e" przypisz wartość 3 (zmienna typu Real).if CheckBox1.State=cbuncheckedthen e:=3; 
112 Instrukcja - wykasować tekst zapisany w komponencie o nazwie "Memo1" (pole edycyjne wielowierszowe). Memo1.Clear; 
Konwertacja:
113 liczbę całkowitą 8712 na tekst i wpisać go do zmiennej "a" (zmienna typu String). a:=IntToStr(8712); 
114 tekst "8712" na liczbę i wpisać go do zmiennej "a" (zmienna typu Integer).a:=StrToInt('8712'); 
115 liczbę 776,655 na tekst i wpisać go do zmiennej "a" (zmienna typu String). a:=FloatToStr(776.655); 
116 tekst "776.655" na liczbę i wpisać go do zmiennej "a" (zmienna typu Real). a:=StrToFloat('776.655'); 
117 kolor "zielony" na ciąg znaków i wpisać go do zmiennej "a" (zmienna typu String). a:=ColorToString(clgreen); 
118 tekst "clgreen" na kolor i wpisać go do zmiennej "a" (zmienna typu Integer). a:=StringToColor('clgreen'); 
119 datę systemową na tekst i wpisać go do zmiennej "a" (zmienna typu String). a:=DateToStr(Date); 
120 tekst "19-02-03" na datę i wpisać go do zmiennej "a" (zmienna typu TDate). a:=StrToDate('19-02-03'); 
121 czas systemowy na tekst i wpisać go do zmiennej "a" (zmienna typu String). a:=TimeToStr(Time); 
122 tekst "16:45" na czas i wpisać go do zmiennej "a" (zmienna typu TTime). a:=StrToTime('16:45'); 
123. 45 stopni kątowych na radiany i wpisać wynik do zmiennej "a" (zmienna typu Real). a:=DegToRad(45); 
124. 1 radian na stopnie kątowe i wpisać wynik do zmiennej "a" (zmienna typu Real). a:=RadToDeg(1); 
125 liczbę zmiennoprzecinkową na tekst z dokładnością do 3 miejsc po przecinku (gdzie: "a"- zmienna typu rzeczywistego Real, "b"- zmienna typu łańcuchowego String). Str(a:2:3, b); 
Stałe, zmienne itp.
126 stałe? const 
127 zmienne? var 
Instrukcja – zadeklarować:
128 stałą o nazwie "stawka" i przypisać jej wartość 0,19. stawka = 0.19; 
129 zmienną "a" typu uniwersalnego. a: Variant; 
130 zmienne "a" i "b" typu Integer.a, b: Integer; 
Które zmienne są typu całkowitego?
131. 3 Byte Word String Real 5 
132. 3 String ShortIntSmallInt Real 8 
133. 3 Integer String Variant Cardinal 7 
134.3 LongInt String VariantLongword 7 
135 Instrukcja - zadeklarować zmienne "a" i "b" typu Real. a, b: Real; 
Które zmienne są typu rzeczywistego?
136. 3 Real Single Double Currency 14 
137. 3 LongInt Extended Comp Longword 8 
Które zmienne są typu:
138 znakowego? 3 ANSICharWideChar Char String 11 
139 łańcuchowego? 3ShortStringWideChar String Char 6 
140 łańcuchowego? 3 AnsiStringWideCharWideString Char 6 
141 Instrukcja - zadeklarować zmienne "a" i "b" typu String. a, b: String; 
Które zmienne są typu logicznego?
142. 3 BooleanWideCharByteBoolBool 13 
143. 3 BooleanWideCharLongBoolWordBool 13 
144 jednowymiarową o nazwie "tablica" o pięciu komórkach typu Integer (adresy komórek od 1 do 5). tablica=array[1..5] of Integer; 
145 dwuwymiarową o nazwie "tablica" o 25 komórkach typu Real (adresy komórek: wymiar pierwszy od 1 do 5, wymiar drugi od 1 do 5). tablica=array[1..5, 1..5] of Real; 
Operator:
146 przypisania? := 
147 arytmetyczny dodawania? + 
148 arytmetyczny odejmowania? - 
149 arytmetyczny mnożenia? * 
150 arytmetyczny dzielenia? / 
151 arytmetyczny dzielenia całkowitego? div 
152 arytmetyczny reszty z dzielenia? mod 
153 bitowy negacji? not 
154 bitowy koniunkcji? and 
155 bitowy alternatywy? or 
156 bitowy różnicy systemowej? xor 
157 relacji - równy? = 
158 relacji - nierówny? <> 
159 relacji - mniejszy? <160> 
161 relacji - mniejszy lub równy? <162>= 
163Jaki operator ma najwyższy priorytet? not 
164 Instrukcja - jeśli zmienna "a" jest większa od zmiennej "b" to przypisz zmiennej "c" wartość 4, a jeśli nie to wartość 3 (wszystkie zmienne są typu Integer). if a>b then c:= 4 else c:=3; 
165 Z poniższej listy wybierz funkcję warunkową. 2 If .. then .. else
166 Z poniższej listy wybierz pętlę wykonującą instrukcje podaną ilość razy. For .. do

167 Z poniższej listy wybierz pętlę wykonującą instrukcje do momentu, kiedy warunek zostanie spełniony (warunek jest sprawdzany przed wykonaniem instrukcji). While .. do
168 Z poniższej listy wybierz pętlę wykonującą instrukcje do momentu, kiedy warunek zostanie spełniony (warunek jest sprawdzany po wykonaniu instrukcji). Repeat .. until