Программа pascal. даны координаты 3 точек x1, x2, x3, y1, y2, y3, которые представляют собой вершины треугольника. вычислить а) длины сторон треугольника б)площадь треугольника

Var
 X1,Y1,X2,Y2,X3,Y3:real;
 A,B,C:real;

Begin
Write('X1 = ');ReadLn(X1);
Write('Y1 = ');ReadLn(Y1);
Write('X2 = ');ReadLn(X2);
Write('Y2 = ');ReadLn(Y2);
Write('X3 = ');ReadLn(X3);
Write('Y3 = ');ReadLn(Y3);
A:=sqrt(sqr(X2-X1) + sqr(Y2-Y1) );
B:=sqrt(sqr(X2-X3) + sqr(Y2-Y3) );
C:=sqrt(sqr(X3-X1) + sqr(Y3-Y1) );
if (A<B+C)and(B<A+C)and(C<A+B) then
Begin
WriteLn('Длины сторон равны:');
WriteLn('A = ',A);
WriteLn('B = ',B);
WriteLn('C = ',C);
X1:=(A+B+C)/2;
WriteLn('Площадь треугольника равна ',sqrt(X1*(X1-A)*(X1-B)*(X1-C)))
End
else WriteLn('Треугольник не существует')
End.

1)

так как в предложении 37 символов

37*2(так как каждый символ 2 байта) = 74 байта

байты переводим в биты получаем 74 * 8 = 592 бита

2)

20*32*16 = 10240 (количество символов в статье)

каждый символ кодируется 16-ю битами,

10240 * 16 = 163840 бит.

можно перевести в килобайты.

163840 бит/8 = 20480 байт

20480/1024 = 20 кб.

ответ: 20 килобайт.

3)

160 / 8 = 20. Итого 20 символов, т.к. в 1 байте - 8 бит.

4)

0,5*1024*8/256=16 бит

5)

Общий объём ста­тьи равен x · 64 · 48 · 16 бит = 48 Кбайт.

Сле­до­ва­тель­но, ко­ли­че­ство стра­ниц в ста­тье рав­ня­ет­ся:

x = (48 · 1024 · 8)/(64 · 48 · 16) = 8.

6)

80 * 25 = 2000 символов поместится на экране монитора.

Т.к в кодировке Unicode каждый символ кодируется 16 битами, то

2000 * 16 = 32 000 бит = 32 байта.

ответ: объем текста занимающего весь экран монитора в кодировке Unicode примерно 32 байта.

7)

40 * 32 * 4 = 5120 символов в сообщении.

5 Кбайт = 5120 байт.

5120 / 5120 = 1 байт, значит, на кодирование 1 символа отводится 8 бит.

Получается, в алфавите 2^8 = 256 символов.

1) 2304 КБайт

2) 5625 КБайт, видеокарта на 64 МБайт

3) 112,5 МБайт

Объяснение:

Задача 1:

16 777 216 = 2^i,   i = 24

I = 1024 * 768 * 24 = 2^10 * 3 * 2^8 * 24 битов =

= 72 * 2^18 битов  = 72 * 2^15 байтов = 72 * 2^5 Кбайт = 72*32 КБайт =

= 2304 КБайт

Задача 2:

16 777 216 = 2^i,   i = 24

I = 1600 * 1200 * 24 = 100 * 2^4 * 75 * 2^4 * 24 битов =

= 25 * 2^2 * 2^4 * 75 * 2^4 * 3 * 2^3 битов = 25*75*3* 2^13 битов  = 5625* 2^10 байтов = 5625* 2^0 Кбайт = 5625 КБайт ≈ 5,5 МБ

Подойдет видеокарта на 64 Мбайт.

Задача 3:

75 Гц, значит в одной секунде 75 кадров.

Объем данных, передаваемых в секунду от видеопамяти к монитору:

75 * 16 * 1024 * 768 = 75 * 2^4 * 2^10 * 3 * 2^8 = 225 * 2^22 битов =

= 225 * 2^19 байт = 225 * 2^9 КБайт = 112,5 * 2^10 КБайт = 112,5 * 2^0 МБайт = 112,5 МБайт