Program n1;
var x,y,n,z,h,C:real;
function arccos(x : real) : real;
begin
arccos := 2 * arctan(sqrt((1 - x) / (1 + x)));
end;
procedure ygls( a,b,c,t: real);
var al,be,ga: real;
begin
al := arccos((sqr(b) + sqr(c) - sqr(a))/(2 * b * c)) * 180 / pi;
writeln('угол A= ',trunc(al));
writeln('угол B= ',trunc(180-al-t));
end;
begin
write('введите сторону а: ');
readln(x);
write('введите сторону b: ');
readln(y);
write('введите угол С: ');
readln(C);
n:=C;
C:=cos(C*180/pi);
z:=sqrt(x*x+y*y-2*x*y*C);
h:=0.5*sqrt(2*(x*x+y*y)-c*c);
ygls(x,y,z,n);
writeln('сторона c: ',trunc(z));
writeln('высота h: ',trunc(h));
writeln('периметр P: ',trunc(x+y+z));
writeln('площадь S: ',trunc(z*h));
end.

0 0

4 года назад

Помогите решить 1, очень срочно

kmedss [50]

Ответ:

Объяснение:

11 в двоичной это 1011

Переворачиваем - 1101

В конце могут быть отброшенные нули

100 в двоичной 1100100

Не больше ста максимальное число 110100

Это 32+16+4=52

0 0

3 года назад

Передача файла размером 375 Кбайт через некоторое соединение заняла 24 секунды. Какова скорость передачи данных через это соедин

Евгений Коваленко

375 Кбайт = 375*1024 байт = 375*1024*8 бит

Скорость = 375*1024*8/24 = 128000 бит/сек

0 0

4 года назад