7.0



5.2.


: .

:

IF < > THEN <P>;

P .

(), TRUE, P, THEN. P .

- .

. P. , BEGIN ... END, . :

IF < > THEN

begin

< 1>;

< n>;

end;

y , .. y = min (a, b, c).

-

Program P;

Var

a, b, c, y: real;

Begin

writeln ( a, b, c);

read (a, b, c);

y := a;

if b<y then y := b;

if c<y then y := c;

writeln (y =, y:6:2);

End.

:

IF < > THEN P1 ELSE P2;