Паскаль. Составить программу вычисления площади треугольника по любой из 3 известных формул(в программе должны использоваться все 3 на выбор).
Сами формулы:
1.S=ah/2
2.S=1/2ab sin C
3.S=sqrt(p(p-a)(p-b)(p-c))
Очень прошу пишу уже 2-ой раз!

Есть ответ
17.12.2022
110

Ответ


var S,a,b,c,p,p1,h:real; k:integer;beginwrite('Kakoy sposob viberem(1,2,3)?');read(k);if k=1 then beginwriteln('Vvedite a,h');read(a,h);S:=(a*h)/2;end;if k=2 then beginwriteln('Vvedite a,b,c');read(a,b,c);S:=(Sin(c*Pi/180)*a*b)/2;end;if k=3 then beginwriteln('Vvedite a,b,c');read(a,b,c);p1:=1/2*(a+b+c);S:=sqrt(p1*(p1-a)*(p1-b)*(p1-c));end;writeln(S);end.


Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
17.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.