Algoritmos

Crie um algoritmo que calcule a área de um triângulo e exiba o resultado

Pseudocódigo:

programa exercicio3
var
   base, altura, area : real;
inicio
   leia base;
   leia altura;
   area ← (base * altura) / 2;
 escreva area;
fim.

Pascal:

// Autor: Rafael Oliveira
// Data: 25/02/2010
program exercicio3;
uses crt;
   var base,altura,area:real;
begin
   writeln('Digite a base');
   readln(base);
   writeln('Digite a altura');
   readln(altura);
   area := (base*altura)/2;
writeln('A area = ', area:5:0);
writeln('Pressione para fechar');
readkey;
end.

Etiquetas

Artigos relacionados

Adblock detectado

Por favor, considere apoiar-nos, desativando o seu bloqueador de anúncios