24 августа, 10:56

Программу в Паскале. Дан произвольный треугольник ABC для которого определен следующий набор характерных параментров: a b c - стороны треугольника; α β γ - углы (в градусах) h - высота, опущенная на сторону c; S - площадь; P - периметр треугольника. По трем заданным параметрам вычислить все остальные. Различные сочетания параметров определяют варианты заданий. Известно стороны a b и высота h.

+1
Ответы (1)
  1. 24 августа, 11:22
    0
    Var x, y, n, z, h, C:real; function arccos (x : real) : real; beginarccos : = 2 * arctan (sqrt ((1 - x) / (1 + x))) ; end; procedure ygls (a, b, c, t: real) ; var al, be, ga: real; beginal : = arccos ((sqr (b) + sqr (c) - sqr (a)) / (2 * b * c)) * 180 / pi; writeln ('угол A = ', trunc (al)) ; writeln ('угол B = ', trunc (180-al-t)) ; end; beginwrite ('введите сторону а: ') ; 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.
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Программу в Паскале. Дан произвольный треугольник ABC для которого определен следующий набор характерных параментров: a b c - стороны ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы
Новые вопросы по информатике
Объём видеопамяти составляет 100 Кбайт. Графический режим работает в режиме 640 х200 пикселей. Какое максимальное кол-во цветов может содержать палитра?
Ответы (1)
Переведите число 202 из восьмеричной системы счисления в десятичную
Ответы (1)
Переведите величины из одних единиц измерения информации в другие: 1 4 Гбайта=? Кбайт 2 217 Мбайт=? Гбайт 3 13 Мбит=? бит 4 27 Гбит=? бит 5 228 бит=? Мбайт 6 227 Гбит=? Мбайт 7 231 Кбайт=? Мбит
Ответы (1)
Вводятся 3 числа, вывести на экран нечетные числа pascal
Ответы (1)
1. Посчитай, сколько бит информации содержит 19 байт 2. Посчитай, сколько байт информации содержат 2 кб 3. Посчитай, сколько байт информации содержит 144 бит
Ответы (2)
Мощность первого в алфавита составляет 2048 символов информационный вес символа на второго алфавита она 2 бита меньше чем информационный вес символа из первого алфавита определите мощность второго алфавита
Ответы (1)
Известно правило кодирования - после каждой гласной буквы ставится буква "и", после каждой согласной - "ц". Зашифруй слова: практикум, принтер, секрет, честь.
Ответы (1)
Представить целое десятичное число 171 во внутримашинном представлении размером два байта.
Ответы (1)
Для записи текста использовался 64-символьный алфавит. Какое колисество информации в байтах содержит 3 страницы текста, если на каждой странице расположено 40 строк по 60 символов в строке?
Ответы (1)
Дано трехзначное число X. Проверить, будет ли произведение его цифр четным числом
Ответы (1)