.


:




:

































 

 

 

 


.

Abs(x) ""
Sin(x) Cos(x) Arctan(x) "" "" "" (-Pi/2 <y< Pi/2)
Sqrt(x) ""
Sqr(x) "" (2)
Exp(x) "" "" (, e= 2. 718282...)
Ln(x) "" ( > 0)
Frac(x) ""
Int(x) ""
Pi   Pi

.

. . . :

:

, a . .. .

:

onClick Tbutton TLabel.

 

procedure TForm1.Button1Click(Sender: TObject);

Const

a=10;

b=3;

Var

s:Real;

Begin

s:=sqrt(a+b+sqr(cos(a*b)))/ln(a);

label1.caption:=FloatToStr(S);

end;

 

4 ( ):

: , - , .

 

1:

1. * x = b3 - f/2 b= - 3c-a, f=7+a .

2. * x = f3 + b/2 b= - 3+k/2, f=2-k*a .

3. * x = m2 + n/2+n m= a2 - 3, n = 15-a .

4. * x = b3 - b/2-f b= - 3c-a, f=7+a .

5. * x = b3 + f/2 b= - 3+k/2, f=2-k*a .

6. * x = m2 + n/2 m= a2 - 3, n = 15-a .

7. * x = f3 - b/2 b= - 3c-a, f=7+a .

8. * x = b3 + b*f/2 b= - 3+k/2, f=2-k*a .

9. * x = n2 + n/2-m m= a2 - 3, n = 15-a .

10. * x = (b*f)3 - f/2 b= - 3c-a, f=7+a .

11. * x = b*n3 + n/2 b= - 3+k/2, f=2-k*a .

12. * x = b*f2 - f/2 b= - 3c-a, f=7+a .

13. * x = b*n3 + b/2 b= - 3+k/2, f=2-k*a .

14. * x = b3 - f/2 b= - 3c-a, f=7+a .

15. * x = f3 + b/2 b= - 3+k/2, f=2-k*a .

16. * x = m2 + n/2+n m= a2 - 3, n = 15-a .

17. * x = b3 - b/2-f b= - 3c-a, f=7+a .

18. * x = b3 + f/2 b= - 3+k/2, f=2-k*a .

19. * x = m2 + n/2 m= a2 - 3, n = 15-a .

20. * x = f3 - b/2 b= - 3c-a, f=7+a .

21. * x = b3 + b*f/2 b= - 3+k/2, f=2-k*a .

22. * x = n2 + n/2-m m= a2 - 3, n = 15-a .

23. * x = (b*f)3 - f/2 b= - 3c-a, f=7+a .

24. * x = b*n3 + n/2 b= - 3+k/2, f=2-k*a .

25. * x = b*f2 - f/2 b= - 3c-a, f=7+a .

26. * x = b*n3 + b/2 b= - 3+k/2, f=2-k*a .

27. * x = b3 - f/2 b= - 3c-a, f=7+a .

28. * x = f3 + b/2 b= - 3+k/2, f=2-k*a .

 

 

2:

:

 

 

 


[1] Delphi 4 6 .



<== | ==>
Object Pascal | .
:


: 2018-10-15; !; : 326 |


:

:

, - , ; , - .
==> ...

1479 - | 1493 -


© 2015-2024 lektsii.org - -

: 0.014 .