Função para calcular o volume de um cilindro em Pascal

28 de novembro de 2017 1 resposta

gabriel_gomeS0 28 de novembro de 2017

Iai galera, blz? Em uma questão foi pedido para propor uma função que receba como parâmetros o raio e o volume de um cilindro, e retorne o volume deste. Tanto os valores de entrada como o de saída devem ser reais.
Consegui fazer o codigo, mas sem usar função, olha só:

Program volume_cilindro ;

var

pi,alt,raio,calc:real;

Begin

pi:=3.14;

write

writeln(‘Digite o raio’);

read(raio);

writeln(‘Digite a altura’);

read(alt);

calc:= pi*(raio*raio)*alt;

writeln('O volume é ', calc);
End.

Como faço uma função neste caso? Alguem pfv pode me ajudaar?

1 Resposta

TerraSkilll 28 de nov. de 2017

Você pesquisou sobre funções em pascal? Não são muito difíceis, nem muito diferente de outras linguagens.

Program volume_cilindro;

const
  PI = 3.1415;

var
  pi, alt, raio, calc:real;

function funcaoQueCalculaOVolumeDeUmCilindro(raio, altura: real) : real;
begin
   funcaoQueCalculaOVolumeDeUmCilindro := PI * (raio * raio) * altura;
end;

begin
  writeln(‘Digite o raio’);
  read(raio);
  writeln(‘Digite a altura’);
  read(alt);

  calc:= funcaoQueCalculaOVolume(raio, alt);

  writeln('O volume é ', calc);
end.

Obs: você irá notar que declarei o PI como constante (const). Isso porque ele é um valor que, teoricamente, não muda. Você não é obrigado a fazer isso, mas é um recurso interessante de se ter em mente.

Abraço.

Criado 28 de novembro de 2017

Ultima resposta 28 de nov. de 2017

Respostas 1

Participantes 2

1 Resposta

Topicos relacionados