• Решить пример на языке Pascal
    Желательно, чтобы в каждой строчке был комментарий.
    Вариант 14, а не тот, что обведен.

    question img

Ответы 1

  • gamma=180-alfa-betab=h/sin(alfa/180*Pi)a=h/sin(beta/180*Pi)c=(a^2+b^2-2abcos(gamma/180*Pi)P=a+b+cS=1/2ch---------vargamma,alfa,beta,a,b,c,h,S,P,Pi:real;begin//PiPi:=3.14159265359;//исходные данныеalfa := 90.0;beta := 45.0;h := 1.0;//gammagamma := 180.0-alfa-beta;//bb:= h/sin(alfa/180.0*Pi);//aa:= h/sin(beta/180.0*Pi);//cc:= sqrt(a*a+b*b-2*a*b*cos(gamma/180.0*Pi));//PP:= a+b+c;//SS:= c*h/2.0;end.
    • Автор:

      brooks16
    • 5 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years