- | | | | - | | | | | |

-

  1. , T
  2. . - .
  3. ': ', ', ' .
  4. .
  5. -
5. 31-



PROGRAM Lab_2;

{ N 2 N 31

. . , . . -007}

CONST

C = 2.13;

VAR

A, B, F, R: real;

BEGIN

Writeln ( ' A B?');

Readln (A, B);

R: = A + B;

if R> C then

F: = Sin (R) + 1.0 / R

else

if R

F: = cos (A) -ln (-R)

else

F: = exp (R) / C;

Writeln ( '-:', F: 8: 4);

END.

-: -0.4154

-: 0.2328

-: 3.9506

11. 2

. '
A B
-4.0-1.04.52 0.25 2.13534.2500-0.9044
0.772.881.01 1.997.04 6.8061-3.98330.7888
2.1010.23.0 -1.20.021.0 1.93411.01342.4975
0.010.011.11 0.52.0-2.22 0.5001-0.3070-2.3881
65.430.11-2.13 1.33-3.13 4.1626-0.22930.4416
-2-1.0 -21.0 8.1400-0.16101.3491
0.11 0.555.45 0.45000.00290.4170
2.220.5 0.52.220.1 1.34290.45100.9418
1.50.50.2 0.51.50.01 3.05620.99830.8600
-1-3-1.0 1.00.0 1.2091-0.4620-1.6797
1.13.3 2.2-1.2-1 4.99146.1148-5.7770
-10.0 -21.0-0.23 -7.54700.22561.4042
2.53.14 -12.1 -0.00857.8897-0.1335
-1 -0.1 1.0556-0.11100.0000
2.51.5 -0.21.5-1.5 0.13102.5105-1.7101
-1 0.52.39.5 -0.0354-0.02480.9996
3.5-3.5 2.5-2.5 2.50000.03960.8223
-1.5 -1-20.5 2.4973-3.00000.3336
1.5-1.5 -2-5.8 3.1602-2.3872-0.4959
-10.5 1.0 4.1212-0.22643.8982
1.80.5-0.2 0.81.7 0.00000.8771-0.3002
-12.32.5 -89.94.5-0.5 48.52000.080532.0000
-103.5 -5.5 -0.55891.609485.2480
-1.881.255.5 -0.660.13-0.02 0.93700.9916-0.1233
11.13.9 0.871.550.06 1.016025.30450.5003
- 0.5- 1.7 3.553.1 1.1526-0.05511.1299
-0.081.892.40 0.284.92- 2.4 -1.95991.50061.3569
A + B> 17.33 A + B <- 17.33 10.3- 20.62.48 13.8-0.6- 1.75 -12.09520.67300.0421
5.77- 3.961.0 - 1.852.040.1 0.60551.67082.0833
2.770.84- 1.39 0.88- 3.58- 0.42 5.448818.2277.9204
3.20.34 0.68- 3.580.13 -0.4154-0.23283.9506



|
© um.co.ua -