Turbo Pascal 15.
15
Turbo Pascal | ||
PROGRAM Pr; | ||
Begin | ||
END. |
, :
.
const, var, type.
2. .
. begin, . end., .
(begin...end.) .
, : , , .
( ).
: : R: =cos(x)+ln(y);
:
1. , .. .
2. , .. R , .
. : cos(x)+ln(y):=R;
-. , . , - .
READ, READLN .
: readln (,);
.
. WRITE . WRITE, .
WRITELN , . X,Y:
|
|
writeln (,);
, . :
writeln ( X,Y,Z);
: writeln (z=, z: 7: 3);
: 7 z, 3 .
, . , . { }, (* *) :
{ }. (* *).
: (.8). : z= (-)/x +y2
: :
PROGRAM PR1;
VAR
z, x, y:real;
BEGIN
writeln ( x, y); { - }
read (x, y); { x, y}
z:= (-)/x +y*y;
writeln (z=, z: 7: 3); { z }
END.
BEGIN , .
.
. :
) .
) .
) ,
) .