Pascal/Delphi Área do triangulo em função das medidas dos seus 3 lados

[FAWAUGHAN]

Bom dia pessoal envio um programa em Pascal que calcula a área do triangulo em função das medidas dos seus 3 lados 

 

program triangulo;
//Autor:Fabiano Waughan
//Programa em Pascal que calcula a area do triangulo
//Em função das medidas dos seus 3 lados

uses crt;

//declarando as variaveis
var a,b,c,s:integer;
    x:real;

begin

writeln('Digite os tres lados do triangulo');
readln(a,b,c);

//calculando o semi-perimetro do triangulo s=(a+b+c)/2

s:=(a+b+c) div 2;
writeln('O valor de s e:',s);

//calculando a area do triangulo

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


writeln('A area do triangulo e:',x);
readkey;

end.

 

[Simon Viegas]

Compilei e rodei o código...

 

Dados do triângulo

 

 

 

 

Segue tela:

 

O quê poderiam-se concluir:

• Inicialmente 7cm e o programa travou. Aí inserir apenas 7 e foi...
• Valor de "s"? o quê é isso?
• A área do triângulo está com um número estranho...
• Qual as unidades de medidas desse tal "s" e da "área do triângulo".

 

Então,

1. precisaria informar qual o valor do "semiperímetro" mesmo? caso sim, talvez seria interessante deixar mais claro o que seria esse "s". Outra coisa: essa fórmula me parece ser relacionada ao Teorema de Herão, certo?. Se for, a letra que representa o semiperímetro é o "p". Faria mais sentido usar essa letra para variável. Na hora de exibir, colocaria algo como "O valor do semiperímetro é ".
2. Para o valor da área, poderia arredondar esse valor para, por exemplo, 2 casas decimais.
3. Tanto para o semiperímetro, tanto para área do triângulo, faltou informar as "unidades de medidas". Por exemplo, a área deu 2.68... o quê? a unidade de medida é fundamental.