Задать вопрос
18 декабря, 00:52

Составить программу вычисляющую площадь произвольного треугольника со сторонами a b c в программе pascal

+1
Ответы (1)
  1. 18 декабря, 02:27
    0
    Program prog;

    uses crt;

    var

    a, b, c, s, p:real;

    begin

    write ('a = ') ;

    readln (a) ;

    write ('b = ') ;

    readln (b) ;

    write ('c = ') ;

    readln (c) ;

    if (a>0) and (b>0) and (c>0) then

    begin

    p: = (a+b+c) / 2;

    s:=sqrt (p * (p-a) * (p-b) * (p-c)) ;

    writeln ('S = ', s:0:3) ;

    end;

    end.
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Составить программу вычисляющую площадь произвольного треугольника со сторонами a b c в программе pascal ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы