7.0




6.4.


, . , , . . , .

, , . . , . , .

(WHILE, REPEAT, FOR).

. .

:

x, [-1, 1]

, [0, 1]
.

:

x - ;

y - .

:

x

y

z(x,y)

-1.0

0.0

z(-1.0,0.0)

-1.0

0.1

z(-1.0,0.1)

-1.0

1.0

z(-1.0,1.0)

-0.8

0.0

z(-0.8,0.0)

-0.8

1.0

z(-0.8,1.0)

 

 

 

 

Program TAB_2;

Var

x, y, z: real;

Begin

writeln( x y z(x,y));

;

while x<=1 do

begin

y := 0;

while y<=1 do

begin

;

writeln(x:6:1, y:6:1, z:6:1);

;

end;

x := x + 0.2;

end;

End.

7.