Попробуйте так, не гарантирую, что вашему преподавателю понравится, и вообще не гарантирую на 100%, что это правильно.
Var b,beta,l,br,lr,v:real;
begin
readln(b,l,beta);
br:=(beta*pi/180)/2;
lr:=(l*pi/180);
v:=(pi*b*b*b*(cos(br)/sin(br))*(sin(lr)/cos(lr)))/(8*sqr(sin(br)));
writeln(v:7:2);
end.
Пример:
24 26 37
<span>78596.40</span>
Чтобы найти текстовые документы, нужно написать *.txt или *.doc или *.odt
Для начала представим 65712 в двоичной системе: 65712 = 65536 + 128 + 32 + 16 = 1 00000000 10110000₂; Значит, ответ - 3 байта.