Pascal – o básico! – Parte 12

22, fevereiro 2007 at 4:14 pm Deixe um comentário

Estamos chegando ao fim da lista de exercícios da saga funções aritméticas.

Agora vamos calcular e exibir o volume de um cone a partir dos valores da altura e do raio da base que serão digitados pelo usuário.

Foi complicado encontrar a fórmula do volume do cone, mas passar para o Pascal foi mais simples, vamos ler o código e intrepretá-lo:

=============código fonte=============

Program Ex12;

Uses
Crt;
Var
raioBase,altura,volume : Real;

Begin
ClrScr;
Write(‘Digite o valor do raio da base:’);
ReadLn(raioBase);
Write(‘Digite o valor da altura do cone:’);
ReadLn(altura);
volume:=1/3*PI*Sqr(raioBase)*altura;
WriteLn(‘O volume desse cone e: ‘,volume:3:1);
ReadKey;
End.

=============código fonte=============

Vale a pena ler ChaVerde:
Blog Cha Verde

Anúncios

Entry filed under: CEFET, Estudos, Pascal, Software, Tecnologia.

Pascal – o básico! – Parte 11 Pascal – o básico! – Parte 13

Deixe um comentário

Preencha os seus dados abaixo ou clique em um ícone para log in:

Logotipo do WordPress.com

Você está comentando utilizando sua conta WordPress.com. Sair / Alterar )

Imagem do Twitter

Você está comentando utilizando sua conta Twitter. Sair / Alterar )

Foto do Facebook

Você está comentando utilizando sua conta Facebook. Sair / Alterar )

Foto do Google+

Você está comentando utilizando sua conta Google+. Sair / Alterar )

Conectando a %s

Trackback this post  |  Subscribe to the comments via RSS Feed


Agenda

fevereiro 2007
S T Q Q S S D
« jan   mar »
 1234
567891011
12131415161718
19202122232425
262728  

Most Recent Posts


%d blogueiros gostam disto: