validando um triângulo e classificando-o como equilátero, isoceles ou escaleno.
Publicado por saymon castro de souza 24/10/2007
[ Hits: 20.055 ]
Programa feito em pascal que resolve aquele exercício típico de disciplinas iniciais de programação: validar e classificar o triângulo (equilátero, escaleno e isóceles).
Program Triangulo; Uses Crt; Var L1, L2, L3 : Integer; Begin Writeln(´Digite o primeiro lado do triangulo: ´); Read(L1); Writeln(´Digite o segundo lado do triangulo: ´); Read(L2); Writeln(´Digite o terceiro lado do triangulo: ´); Read(L3); {a soma de dois lados de um triângulo não deve ser maior que o terceiro lado} if ((L1 < (L2+l3)) and (L2 < (L1+l3)) and (L3 < (L2+l3))) then {verificando se é um triangulo válido} Begin if ((L1 = L2) and (L2 = L3)) Then Writeln(´Triangulo equilatero.´) else if ((L1 <> L2) and (L2 <> L3) and (L1 <> L3)) Then Writeln(´Triangulo escaleno.´) else Writeln(´Triangulo isoceles.´); End Else Write(´Triangulo não válido!!´); End.
encontrar o maior e o menor valor em um vetor
Soma dois Valores e exibe o resultado
Exemplo de for que mostra 6 números em ordem crescente
Calculadora De Decimo Terceiro Salário feita no Lazarus (Delphi 7 para Linux)
Nenhum coment�rio foi encontrado.
O que é o THP na configuração de RAM do Linux e quando desabilitá-lo
Comparação entre os escalonadores BFQ e MQ-Deadline (acesso a disco) no Arch e Debian
Conciliando o uso da ZRAM e SWAP em disco na sua máquina
Servidor de Backup com Ubuntu Server 24.04 LTS, RAID e Duplicati (Dell PowerEdge T420)
Como unir duas coleções de ROMs preservando as versões traduzidas (sem duplicatas)
Como instalar o Telegram Desktop no Ubuntu 24.04
Overclocking Permanente para Drastic no Miyoo Mini Plus
Problemas de chaves (/usr/share/keyrings) no Debian
Converter os repositórios Debian para o novo formato com as chaves
Salvar estado da VM no virt-manager [RESOLVIDO] (5)
Primeiras impressões do Debian 13 (11)