Pascal – o básico! – Parte 4

20, fevereiro 2007 at 6:55 pm 4 comentários

Mais um exercício de Pascal da saga Lista do Berga!

Neste exercício vamos calcular a área de um triângulo a partir dos dados digitados pelo usuário, a base e a altura desse triângulo:

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

Program Ex04;

Uses
Crt;

Var
base,altura,area : Real;

Begin
ClrScr;
Write(‘Digite o valor da base:’);
ReadLn(base);
Write(‘Digite o valor da altura:’);
ReadLn(altura);
area := base*altura/2;
WriteLn(‘O valor da area e: ‘,area:4:1);
ReadKey;
End.

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

Mais a frente vou seguir a dica de alguns colegas, farei esses exercícios em JAVA, para compararmos a diferença das partícularidades das linguagens fora a eficiência de uma boa programação orientada a objetos.

Pingar o BlogBlogs

Se você gostou do meu blog e tem BlogBlogs, de uma forcinha, adicione ao seu favoritos:
Adicionar aos Favoritos BlogBlogs

Anúncios

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

Pascal – o básico! – Parte 3 Pascal – o básico! – Parte 5

4 Comentários Add your own

  • 1. Odair  |  14, maio 2007 às 4:28 pm

    Olá tudo bem?
    Gostaria de aprender lógica de programação em pascal pois estou cursando engenharia de produção e estou com muita dificuldade na matéria.
    Estive pesquisando e achei este site que é muito bom parabéns pelas informações prestadas.

    Grato Odair

    Responder
  • 2. Victor de Souza Couto  |  14, maio 2007 às 6:13 pm

    Olá Odair,

    muito obrigado pela opinião expressa. Espero contrubuir ainda mais com futuros posts.
    Acredito que com esses exemplos, você consiga se aperfeiçoar passo-a-passo.
    Ultimamente estou com tempo corrido, com vários trabalhos da faculdades e da escola técnica federal. Prometo que em breve postarei novos exemplos.
    Quando lhe for necessário, pode enviar e-mails, sempre que possível responderei tentando lhe passar uma solução.
    Me responda uma pergunta por favor. Onde você mora e onde faz faculdade?

    Até mais Odair.
    Abraços

    Responder
  • 3. yannickazevedo  |  31, março 2009 às 11:59 pm

    Muito legal este seu Blog, me sinto beneficiado por tudo q vc posto pois até entendo da materia mas na correria em q vivo é complicado pensar em tantas coisas ao mesmo tempo!Pois um professor cobra em uma Limguagem e outros ja querem em uma diferente e assim complica um pouco!

    Responder
  • 4. Pedro Paulo  |  8, abril 2009 às 9:56 am

    Program Ex04;

    Uses
    Crt;

    Var
    base,altura,area : Real;

    Begin
    ClrScr;
    Write(’Digite o valor da base:’);
    ReadLn(base);
    Write(’Digite o valor da altura:’);
    ReadLn(altura);
    area := (base*altura)/2;
    WriteLn(’O valor da area e: ‘,area:4:1);
    ReadKey;
    End.

    obs: só acrescentei um parentesis em area:= (base*altura)/2.

    Responder

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: