UkrReferat.com

: 75843
: 2016-12-04
7 10



$

'

 

:   

, , :

()
ukrreferat.com
,
Word Doc
1129
259

:

 

 

.

.

, ຠ

. IF CASE.

 

IF (

).

 

:

 

If thenelse;

 

.

IF .

True,

Then. False, Else.

 

:

 

If A<7.2 then Y:=5*A else Y:=5/A;

 

Else :

 

If X>0 then K:=K+1;

 

, , ,

K:=K+1. ,

, ,

If.

 

BeginEnd If:

 

If A<0 then begin

 

K:=K+1;

 

R:=a;

 

End

 

Else begin

 

L:=L+1;

 

Q:=A;

 

End;

 

- .

.  If, , .

 

>

 

d

 

 

 

 

8 , , Else,

.

 

Case .

 

:

 

Case of ;

 

Else; End;

 

 

, ,

;

 

,

,

.

 

ϳ Else (

).

 

:

 

Case Kit of

 

1: Y:=sin(x);

 

2: Y:=cos(x);

 

3: Y:=sin(x)+cos(x);

 

Else Y:=0;

 

End; {case}

 

 

Kit ( )

Case. Kit 1, Y:=sin(x),

2, : Y:=cos(x). , Kit

1, 2 3, Y:=0.

 

egin End.

 

:

 

:

 

Var X, Y, Z, F : Real;

 

Begin

 

Write( Y, Z :);

 

ReadLn(Y,Z);

 

Write( X :);

 

ReadLn(X);

 

IF (X>=Y) THEN F:=SQR(X)+EXP(Z)/COS(Y)

 

ELSE F:=SIN(X)+COS(Z);

 

WriteLn( F=,F);

 

End.

 

0

ò