Ask Question

Name:
Title:
Your Question:

Answer Question

Name:
Your Answer:
User Submitted Source Code!


Description:
  ejemplo2-aguiar
Language: PASCAL
Code:
 program suptri;
var
 resultado,base,altura:real;
begin
 write('base del triangulo: ');
 readln(base);
 write('altura del triangulo: ');
 readln(altura); 
 resultado:=(base*altura)/2; 
 Writeln('la superficie del triangulo es',resultado:0:2);
end.

     
Comments: