.


:




:

































 

 

 

 


:




:

(TS SpeedButton) ... :additional

3. TTable?.....

:BDE

4. ?

:

5. ?

:Rave Reports

6. ?1) Var a,b:real;2) procedure max(x: real; Var y:real);3) var c,d:real;4) begin5) end;

:2

7. RvProject ?

: Projectfile

8. : while b do ; , b = false

:

9. ...

:TObject

10. :...... var < >: < >

11. Events Object Inspector ...

:

12. ...

:

13. ...

:

14. , x=true

:X or Y= true

..... :TDBGrid, TDBEdit, TDBImage

16. , c=2, a=14 b=4

::= a mod b

17. , c=3, a=14 b=4

::= a div b

18. ............

:RadioButton

19. ........

:MainMenu

20. .....

:PopupMenu

21. ..

:CheckBox

22. , :

:If then ;

23. , .

:Private, protected, public

24. ,

:Const

25. , :

:Sqrt(x)

26. , :

:Exp(x)

27. ( , 1999 ):.

:SELECT title FROM titles WHERE yearpub>=1995 AND yearpub<=1999

28. , (, ), (,) :..

:sqr(x) + sqr(y)<=4

29. ...

: ,

30. : Var st: string; Begin St:=abcdef; copy(st, 3,2); End; St

:cd

31. : Var st: string; Begin St:=abcdef; delete(st, 3, 2); End; St

:abef

32. :var c, d: integer;procedure p(x:integer; var y:integer);beginy:=x+1;end;beginh (c, d); end. ?

:y

33. :var f1: text;k, I, m, n: string;beginrewrite (f1);k:=; i:=; m;=; n:=;writeln (f1, k, m, n);{ }reset (f1);read(f1, k);writeln(k);end. f1......

: close (f1); reset (f1); ;

34. ::=-8;y:=2;s:=x+y;writeln( s:=,s) ? :

: s:=6

35. 1 2, 1:=[1,2,3,4]; 2:=[3,4,1]. 3:=1-2. 3?

: [2]

36. ...

:

... Object Inspector. :Items

38. :

:Object Inspector

39. , ,

:Str

40. ...

:Join Tables

41. ?

:

42. 1>=2, 򅅅





:


: 2016-04-03; !; : 703 |


:

:

, .
==> ...

1565 - | 1449 -


© 2015-2024 lektsii.org - -

: 0.014 .