Pascal/Turbo Pascal - duda

 
Vista:
sin imagen de perfil

duda

Publicado por Erik (73 intervenciones) el 07/03/2014 12:37:10
tengo que hacer lo siguiente:
La siguiente función tiene errores. Utilice el compilador de Pascal para encontrarlos e indique qué errores encontró.

Function PVP(valorprod: real, ivaprod: real) real
Var
total_iva : real;
begin
total_iva := valorprod*ivaprod/100;
Resultado := valorprod + total_iva;
End.

gracias de antemano.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

duda

Publicado por Juan Ignacio (8 intervenciones) el 07/03/2014 15:07:48
Hola, en el "end" la función lleva ";", no un ".". Y falta el ";" al lado de "real" donde definís la función, además de ":" antes.

1
2
3
4
5
6
7
Function PVP(valorprod: real, ivaprod: real) :real;
    Var
        total_iva : real;
    begin
         total_iva := valorprod*ivaprod/100;
         Resultado := valorprod + total_iva;
    end;
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

duda

Publicado por Juan Ignacio (8 intervenciones) el 07/03/2014 18:01:28
Pido disculpas, tuve un par de equivocaciones. Acá está la función bien hecha.

1
2
3
4
5
6
7
8
Function PVP(valorprod: real; ivaprod: real) :real;
Var
   total_iva : real;
   Resultado : real;
begin
     total_iva := valorprod*ivaprod/100;
     Resultado := valorprod + total_iva;
end;
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar