.
2013 .
1
________
:
: .
:
- .
2. .
- :
:
- ;
- ;
- , ;
- ( , , );
- .
, , . , - . .
, .
,
:
- .
- . .
3. , Delphi.
:
- Delphi.
- . ?
- , .
- , ?
- (a div b)*b+(a mod b)?
- +, -, *, /?
- , if then?
8. Delphi :
- ;
- , .
?
9. : Label, Edit, Memo?
10. Label?
11. Edit?
12. Memo?
13. Memo?
14. , Memo?
15. , Edit?
16. ?
17. ?
18. Label ?
|
|
19. val?
20. val(edit1.Text,X,code);
21. Memo?
22. Memo?
23. Memo?
- :
if code=0 then Memo1.Lines.Add('x = '+floattostr(x))
- .
- , .
- constructor Create.
- destructor Destroy.
- destructor Destroy procedure Free.
- , , .
- ?
- TPersistent.
- .
- ?
- ?
- ?
- ?
- type
TChildClass = class
FOne: Integer;
FTwo: String;
FThree: TObject; end;
MyObject: TChildClass
: FOne 20.
- Exception.
- ?
- ?