elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Como proteger una cartera - billetera de Bitcoin


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  Ayuda, codigo Pascal
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: Ayuda, codigo Pascal  (Leído 1,564 veces)
inquilin@19

Desconectado Desconectado

Mensajes: 81



Ver Perfil
Ayuda, codigo Pascal
« en: 1 Junio 2013, 15:21 pm »

Hola a todos, me hallo inmersa en un ejercicio de Pascal que, es una bobada en principio pero me trae por la calle de la amargura.

Tengo que usar tres procedimientos, para calcular el area de un rectangulo, que cada uno devuelve el área de una manera:
a) El primero por pantalla.
b) El segundo como resultado del módulo.
c) El tercero como parámetro.

Luego, en el modulo principal, tengo que pedir al usuario los datos (base y altura) y llamar a estos tres modulos para que me la muestre.

Tengo este código, pero me da error de tipo de variable y no se como hacer que funcione.

Código:
program area3;

function primerresultado(base, altura:real):real;
    begin
    primerresultado := base * altura;
    end;

procedure segundoresultado(var base,altura:real);
          begin
          writeln('>>',primerresultado(base,altura));
          end;

procedure tercerresultado(base,altura:real);
          begin
          writeln('>>',segundoresultado(base,altura));
          end;

var
    b, h : real;

begin
     write('Indique la base: ');
     readln(b);

     write('Indique la altura: ');
     readln(h);



     readln();
end.

Agradezco la ayuda

Saludos


En línea

Sólo mirando al frente se puede seguir, llevar lastres en el camino no te lo permiten
Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
ayuda con pascal por fa
Programación General
Naly09 0 1,856 Último mensaje 21 Agosto 2010, 22:11 pm
por Naly09
Ayuda con Pascal
Programación General
seby_g12 1 2,405 Último mensaje 13 Septiembre 2010, 23:56 pm
por [L]ord [R]NA
Ayuda ejercicio de Pascal, cuando uno no lo ve claro pide ayuda
Programación General
manu3742 1 3,512 Último mensaje 31 Marzo 2011, 15:43 pm
por d(-_-)b
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines