\begin{array}{c} \color{#db1616}{\texttt{#Khoadang09}} \end{array}
`@`$\texttt{Pascal: }$

var a, b, c : real;
    cv, s, p : real;
begin
    readln(a,b,c);
    if not((a+b>c) and (a+c>c) and (b+c>a)) 
        then write('Khong la ba canh cua mot tam giac')
    else 
         begin
        cv := a + b + c;
        p := cv / 2;
        s := p * (p - a) * (p - b) * (p - c);
        writeln('Chu vi: ',cv:0:2);
        writeln('Dien tich: ',sqrt(s):0:2);
         end ;
end .

`@`$\texttt{Giải thích: }$

  - Để `a,b,c` là cạnh của một tam giác, thoả cả 3 điều kiện sau :

\begin{cases} a+b>c\\a+c>b\\b+c>a\end{cases}

  - Nếu `a,b,c` đã là 3 cạnh của một tam giác, chúng ta áp dụng định lý Heron để tính diện tích :

\(\begin{array}{c} \texttt{Diện tích: }\sqrt{p*(p-a)*(p-b)*(p-c)}&\\ \texttt{Trong đó} : p=\dfrac{a+b+c}2(\texttt{ nửa chu vi tam giác}) \end{array}\)

  - Phép not : đảo giá trị logic (Booolean)

\begin{array}{|c|c|c|}\hline \texttt{Giá trị đầu:}&\texttt{True}&\texttt{False}\\\hline \texttt{Sau khi dùng "not": }&\texttt{False}&\texttt{True}\\\hline \hline\end{array}