var x1,y1,x2,y2,x3,y3,x4,y4:integer;
N1,N2:real;
begin
writeln('Введите координаты первой точки - ');
readln(x1,y1);
writeln('Введите координаты второй точки - ');
readln(x2,y2);
writeln('Введите координаты третьей точки - ');
readln(x3,y3);
writeln('Введите координаты четвертой точки - ');
readln(x3,y3);
n1:= sqrt( (x3-x1) * (x3-x1) + (y3 - y1) * (y3-y1) );
n2:= sqrt( (x4-x2) * (x4-x2) + (y4 - y2) * (y4-y2) );
writeln('Длина первой диагонали - ',n1);
writeln('Длина второй диагонали - ',n2);
readln;
end.
Держи.
t = 1 мин = 60 с
Н= 32кГц= 32000 Гц
i= 8 бит
Найти:
I= кбайт ?
Решение:
I= 2*H*t*i = 2*32000 Гц * 60с * 8 бит= 30720000 бит = 3750 кбайт.
Дано:
I= 703,125 кбайт = 5760000 бит
х*у= 800*600
Найти:
i= ?
Решение:
I= x*y*i
i= I / х*у = 5760000 бит / 800*600 = 12 бит