Набрать задачку для решения еë в капиляторе по информатике про синус и косинус. Программа треугольник Var,begin, Writelnи,end.

Для решения задачи, связанной с синусом и косинусом, давайте создадим небольшую программу на языке Pascal, которая будет вычислять стороны треугольника и его углы, используя функции синуса и косинуса.

Цель:

Создать программу, которая будет запрашивать у пользователя длины двух сторон треугольника и угол между ними, а затем будет вычислять третью сторону и два других угла.

Программа на Pascal:

program Triangle;

var
  a, b, angleC, angleA, angleB, c: real; // Две стороны и углы
  pi: real;

begin
  // Определяем значение числа π
  pi := 3.14159265358979;

  // Запрос длины сторон треугольника
  Writeln('Введите длину стороны a:');
  Readln(a);
  
  Writeln('Введите длину стороны b:');
  Readln(b);
  
  Writeln('Введите угол между этими сторонами в градусах:');
  Readln(angleC);
  
  // Переводим угол в радианы, так как функции sin и cos работают с радианами
  angleC := angleC * (pi / 180);
  
  // Вычисляем длину третьей стороны c по теореме косинусов
  c := Sqrt(a*a + b*b - 2*a*b*cos(angleC));
  
  // Вычисляем углы A и B
  angleA := ArcCos((b*b + c*c - a*a) / (2*b*c));
  angleB := pi - angleA - angleC; // Угол B = π - (A + C)
  
  // Переводим углы из радианов в градусы
  angleA := angleA * (180 / pi);
  angleB := angleB * (180 / pi);
  
  // Выводим результаты
  Writeln('Длина стороны c: ', c:0:2);
  Writeln('Угол A: ', angleA:0:2, ' градусов');
  Writeln('Угол B: ', angleB:0:2, ' градусов');
end.

Объяснение программы:

1. Объявление переменных:

   • a, b, c — длины сторон треугольника.
   • angleA, angleB, angleC — углы треугольника.
   • pi — константа, представляющая число π.

2. Ввод данных:

   • Программа запрашивает у пользователя длины двух сторон (a и b) и угол между ними (angleC).

3. Перевод угла:

   • Угол в градусах переводится в радианы, поскольку функции sin и cos работают именно с радианами.

4. Вычисление длины третьей стороны:

   • Используется теорема косинусов: \( c = \sqrt{a^2 + b^2 - 2ab \cdot \cos(C)} \).

5. Вычисление других углов:

   • Угол A вычисляется с помощью функции ArcCos, а угол B рассчитывается как \( \pi - (A + C) \).

6. Вывод результатов:

   • Программа выводит длину стороны c и значения углов A и B в градусах.

Эта программа поможет вам понять, как использовать синус и косинус для решения задач, связанных с треугольниками.