Найти периметр и площадь прямоугольного треугольника если известны радиус описанной окружности и острый угол в паскале
215
388
Ответы на вопрос:
Pascalabc.net 3.4.2, сборка 1857 от 05.11.2018 внимание! если программа не работает, обновите версию!
begin
var (x, ad) : = readreal2('введите радиус и угол в градусах: ');
var ar : = degtorad(ad);
var c : = 2 * x;
var (a, b) : = (c * sin(ar), c * cos(ar));
var (p, s) : = (a + b + c, a * b);
writeln('p=', p: 0: 3, ', s=', s: 0: 4)
end.
введите радиус и угол в градусах: 23 37.5 p=110.497, s=1021.9495Популярно: Информатика
-
Аньсминожек19.04.2021 19:15
-
katyaarbato05.12.2021 12:52
-
zenkov2000cemen26.10.2021 17:09
-
kaskader247531.08.2020 07:44
-
aliona12345678908.04.2020 04:34
-
annaegorova405.11.2020 19:55
-
Gogogogh02.03.2021 13:32
-
mansurislamov26.02.2023 23:10
-
gejdanp0dmbe26.09.2021 00:22
-
кавказец7813.08.2020 22:11