7.0


4.3.


, . .

. , , BEGINEND.

(, ) . .

Program <>;

Uses Printer;

Var

<>,,<>: <>;

<>,,<>: <>;

 

Begin

<>;

<>;

End.

 

Uses Printer , .

, . .

:

,

- ;

.

:

.

 

Program LVP;

Uses Printrer;

Var

a, b, c, p, S: real;

Begin

writeln( );

read(a, b, c);

p := (a + b + c) / 2;

S := sqrt(p * (p - a) * (p - b) * (p - c));

{ }

writeln( S =, S:5:2);

{ }

writeln(LST, S =, S:5:2);

End.

 

READ . :

1 2 0.5 <Enter>

<Enter> , :

S = 3.87




- -  - -  - -