1
Pascal
1.1 Pascal, .
2.1 .. : / . . .. . - .: : -, 2006.
2.2 .., .. : . .: ; ; , 2008.
2.3 .
3.1 .
3.2 .
3.3 IF...THEN...ELSE....
3.4 1 .
4 :
4.1 .
5.1 ( . 1).
5.2 .
1 1
1) = . | |
2) , . . : , . | |
3) ( 1), . 1 |
1
1) = . | |
2) . , . : , . | |
3) ( 1), . 1 |
6 :
6.1 1 .
6.2 .
6.3 .
6.4 6.1 6.4 2 3.
7.1 .
7.2 .
7.3 .
7.4 Pascal.
7.5 .
7.6
8.1 Pascal?
8.2 Pascal?
8.3 Pascal?
8.4 Pascal?
8.5 ?
8.6 Pascal?
8.7 Pascal?
8.7 Pascal?
8.8 ?
8.9 Pascal? ?
Pascal :
|
|
;
;
;
,
;
;
;
.
:
Program ;
USES
{ }
Label
( )
Const
{ }
Type
{ )
Var
{ }
{ }
Begin
{ }
End.
,
Program Example_1;
Var a,b,rez: Integer;
Begin Writeln( );
Readln(a,b);
rez:=a*b;
Writeln( , rez);
Writeln( <Enter>);
Readln;
End.
, .
.
Program . , , , .
. Var, . , . , .
, Begin, . END, .
, , , , ; , . . , , . (, , , , .).
:
2
, | ||
Shortint | -128...127 | |
Integer | -3276832767 | |
Longint | -2147483648...2147483647 | |
Byte | 0...255 | |
Word | 0...65535 |
, Const r = 4;
Var a: Integer;
b: Longint;
c: byte;
, (, 3,14 =.314+01, 10-3 = 1-3).
. .
3
Real | 2.9-39... 1.738 | 11-12 | |
Single | 1.5e-45... 3.438 | 7-8 | |
double | 5.0-324... 1.7308 | 15-16 | |
extended | 3.4e-4932...1.1e4932 | 19-20 |
, Const r = 4.0;
|
|
Var a: Real;
b: double;
2 , :
Round(x) ;
Trunc(x) .
, Round(3.456) = 3
Round(5.678) = 6
Trunc(3.456) = 3
Trunc(5.678) = 5