Дайте математические обозначения выражении на Паскале: 1) D=sqr(b)-4*a*c
2) (a+b)/c+4*x*1n(x)
3) 3*cos(exp(3*1n(x))-1)+1
4) sin (sqr(x))/cos(sqr(x))+3*sqrt(x+1)
5) sqrt(2*x+sqrt(3*sqr(x)+sqrt(4*exp(3*1n(x
6) 1n (x1n(abs(sqrt(exp(sin(x))-exp(-sin(x
7) a/b-(c+d)-(a-b)/b/c+1E-5
8) (b+sqr(sin(x)))/(cos(2*x1)+4*x2)
9) 1n((x+b)/2)+sin(sqrt(a+2b))

1

Очень просто, на один символ в системе юникод приходится 16 бит, а в кои8- 8 бит. Если внимательно посмотреть, то количество выделенной информации на символ отличается в 2 раза. Следовательно переведенное сообщение стало занимать в 2 раза больше памяти. Т.е, первоначальное сообщение имело объем 8000 битов.

Можно и уравнение :

2х-х=8000

х=8000

2

Очень просто, на один символ в системе юникод приходится 16 бит, а в кои8- 8 бит. Если внимательно посмотреть, то количество выделенной информации на символ отличается в 2 раза. Следовательно переведенное сообщение стало занимать в 2 раза больше памяти. Т.е, первоначальное сообщение имело объем 8000 битов.

Можно и уравнение :

2х-х=8000

х=8000

uses graphABC;

begin

setwindowsize(600,500);

setbrushcolor(clGray);

Ellipse(320,30,490,400);

Ellipse(120,30,300,400);

setbrushcolor(clMintCream);

Ellipse(335,40,480,380);

Ellipse(140,40,280,380);

setbrushcolor(clGray);

Ellipse(100,430,500,130);

setbrushcolor(clNavy);

Ellipse(250,240,200,310);

Ellipse(350,240,400,310);

setbrushcolor(clwhite);

Ellipse(240,270,220,300);

Ellipse(360,270,380,300);

setbrushcolor(clblack);

Ellipse(270,330,330,370);

line(300,370,300,400);

Arc(300,280,120,220,-40);

line(50,350,200,350);

line(30,340,190,340);

line(10,330,180,330);

line(410,330,570,330);

line(400,340,560,340);

line(390,350,550,350);

line(240,230,220,150);

line(230,230,180,80);

line(220,230,180,150);

line(360,230,380,150);

line(370,230,430,80);

line(380,230,430,150);

end.