Пожалуйста помогите, это урок информатики и тема на програмирование Паскаль
Нужно сделать 6 вариант
Приложения:
![](https://st.uroker.com/files/b21/b21b9d0a5cd1e096c2ac3c8f80e4017e.jpg)
Ответы
Ответ дал:
0
program 6var;
uses math;
var
a, b, R, z: real;
begin
writeln('Vvedite a - ');
readln(a);
writeln('Vvedite b - ');
readln(b);
writeln('Vvedite R - ');
readln(R);
z:=(2*R*sin(a/2))/(abs(cos(b/2)));
writeln('Otvet - ', z);
readln();
end
Ответ дал:
0
Ответ:
### PascalABC.NET ###
begin
var (R, a, b) := ReadInteger3('Enter R, a, b: ');
Println( (4*R*Sin(a/2))/abs(cos(b/2)) );
end.
Объяснение:
Вас заинтересует
1 год назад
1 год назад
1 год назад
7 лет назад
7 лет назад
8 лет назад
8 лет назад