:
type - ;
string - ;
file - ;
scalar - ;
pointer - .
: , ; .
-
Read
Read(var F:file of type; var v:type);
Read(var F:text; var I':intnger);
Read(var F:text; var R:real);
Read(var F:text; var C:char);
Read(var F:text; var S:string);
F - , a var I,R,C,S - , .
Readln
Readln(var F:text; var varl,var2,...varN);
Readln(var varl,var2,...varN);
Readln(var F:text);
Readln;
F - text, a varl...varN - Char. , INPUT. , .
Write
Write(var F:file of type; var v:type);
Write(var F:text; var I:integer);
Write(var F:text; var B:boolean);
Write(var F:text; var C:char);
Write(var F:text; var S:string).
Writeln
Writeln(var F:text; var varl,var2,... varN);
Writeln(var var varl,var2,... varN);
Writeln(var F:text);
Writeln.
Abs(x); Arctan (x); Cos (x); Exp (x); Ln (x); Sin (x); Sqr (x); Sqrt (x)
.
fruc(R:Real):Real;fruc(I:Integer):Real
.
int (R:real):real; int (I:integer):real;
.
Odd(x); Pred(x); Succ(x)
.
Chr (x); Ord (x); Round (x); Trunc (x) .
Delete (var S:Strina;Pos, Len: Integer) S Len , Pos. Len S, . Pos+Len , .
Insert (S:String; var D:String;Pos:Integer) S D Pos. Pos D, S D . D, D .
Str (I:Integer; var S: String); Str (R:Real; var S:String) I R S, R I , .. Write Writeln.
Val (S:String; var R:Real; var P:Integer); Val (S:String; var I,P:Integer) S ( I R ). S . 0, R ( I) , .
|
|
Concat (Sl,S2,....Sn:string):String , Sl,...,Sn. 255, .
Copy (S:String; Pos,Len:Integer):String , Len S, Pos. Pos , S, . Pos+Len , S, , S.
Length (S:Strina):Integer S.
Pos (Pattern,Sourse:String):Integer , Pattern Sourse. , 0.
Assign (var F:File: Name:String); Name - , F . Name F . Assign , .
BlockRead (var F:File; var Dest:Type; Num:Integer)
F - , Dest -,
Num - 128- , .
BlocKWrite (var F:File; var Dest:Type; Num:Integer) I Num - 128- , .
Chain (var F:File) CHN-, Assign F.
Close (var F:File); , F, .
Erase (var F:File); , F, .
Execute (var F:File) , Assign F.
Rename (var F:File; Name:String); , F, Name. Rename .
Reset (var F:File) F .
Rewrite (var F:File) F , .
Seek (var F:Fileof type; Pos:Integer) F Pos .
Flush (var F:File) , F. , . .
Eof (var F;File):boolean TRUE, .
Eoln (var F:Text):boolean TRUE, F.
Filepos (var: F: File of Type):Integer; Filepos (var: F:File):Integer .
Filesize (var: F: File ofType):Integer;Filesize(var: F:File):Integer .
Getmem (var P:Pointer; I:Integer) , , 1 .
Mark (var P:Pointer) .
New (var P:Pointer) , .
|
|
Release (var P.Pointer) . Mark. , Mark.
MemAvai:Integer .
Ord (P:Pointer):Integer .
Ptr (I:Integer):Rointer I.
CrtExit - , .
Crtlnit - , .
CIrEol .
CIrScr .
DelLine - , , , , .
GotoXY (X,Y:Integer) - XnY.
InsLine - , .
Bdos (func,param:Integer) - Bdos func, , param, DE.
bios (func,param:Integer) - Bios func param. .
Delay (Ms:Integer) - Ms .
FillChar(var dest; length:Integer;data:Char); FillChar(var dest;
length:Integer;data:Byte) - length data. - dest.
Halt - .
Move (var sourse.dest:length:Integer) - length , , sourse, length, dest.
Randomise - .
Addr (var variable):Integer; Addr (<function identifier>):Integer;
Addr(<procedure identifier>):Integer .
Bdos (funk,param:Integer):Byte . .
BdosHL (funk,param:Integer):Integer Bdos. HL.
Bios (funk, param:Integer):Byte . .
BiosHL (func.param:Integer):Integer Bios. HL.
Hi (I:Integer):Integer , . 0.
IOresult:Integer $1-. 0 -. .
KeyPresscd:Boolean TRUE, , FALSE .
Lo (I:Integer):Integer , . 0.
Random (I:Integer):Integer; Random:Real . 0 1, - 0 1.
Size0f (var variable):Integer; Size0f (<type identifier>):Integer ( ) .
Swap (I:Integer):Integer , .
UpCase (Ch:Char):Char . , .
|
|
ParamCount:Integer; -.
ParamStr (n:Integer):String[14]; n- -.
Exit - END , , Exit.