Autor Tópico: [Pascal] Calculadora  (Lida 2988 vezes)

Offline knife

  • Newbie
  • *
  • Mensagens: 0
  • Karma: +0/-0
    • Ver Perfil
    • http://helderpatinho.com
[Pascal] Calculadora
« em: Novembro 09, 2007, 07:49:35 pm »
Deixo aqui o codigo de uma calculadora em pascal com as operações padrao (+,-,/ e x) feito por mim. Espero que ajude alguem que se esta a iniciar em programaçao..

Código: [Seleccione]
program calculadora;

uses crt;

var

 v1,v2:Integer;

 Operacao:char;

 total:real;



begin

clrscr;

writeln(\\'Qual o primeiro valor?\\');

readln(v1);

writeln(\\'Qual o segundo valor?\\');

readln(v2);

writeln(\\'Qual ‚ a operação (+,-,/ ou x)\\');

readln(Operacao);



case Operacao of

 \\'+\\':total:=v1+v2;

 \\'-\\':total:=v1-v2;

 \\'*\\':total:=v1*v2;

 \\'/\\':total:=v1/v2;

else write(\\'A operação escolhida nao ‚ valida\\')

end;

write(\\'O valor total ‚ \\',total:2:2);

readln;

end.

Offline trmanco

  • Global Moderator
  • Newbie
  • *****
  • Mensagens: 0
  • Karma: +0/-0
    • Ver Perfil
    • http://trmanco.com
[Pascal] Calculadora
« Responder #1 em: Novembro 09, 2007, 08:24:50 pm »
LOL, não é difícil mas sempre é útil...

Offline knife

  • Newbie
  • *
  • Mensagens: 0
  • Karma: +0/-0
    • Ver Perfil
    • http://helderpatinho.com
[Pascal] Calculadora
« Responder #2 em: Novembro 09, 2007, 09:07:00 pm »
Sao cenas basicas do uso de variaveis..

Offline midnight

  • Newbie
  • *
  • Mensagens: 0
  • Karma: +0/-0
    • Ver Perfil
    • http://www.xoose.net
[Pascal] Calculadora
« Responder #3 em: Novembro 10, 2007, 12:15:50 am »
isso so da para 2 valores.. devias ter feito um ciclo para o utilizador introduzir quantos valores queria calcular

mas isso ja deve ser um bocado avançado.. para quem se ta a iniciar esse codigo esta bom

Offline knife

  • Newbie
  • *
  • Mensagens: 0
  • Karma: +0/-0
    • Ver Perfil
    • http://helderpatinho.com
[Pascal] Calculadora
« Responder #4 em: Novembro 10, 2007, 03:49:29 pm »
midnight, basta acrescentares mais variaveis e instrucções de leitura das mesmas..  :wink:

Offline MelroPower

  • Newbie
  • *
  • Mensagens: 0
  • Karma: +0/-0
    • Ver Perfil
    • http://interbios.queroumforum.com
[Pascal] Calculadora
« Responder #5 em: Janeiro 28, 2008, 02:02:55 pm »
yap....variaveis....

Isso é basico...alias pascal é basico...
Estao a oferecer um MP3 de 1GB neste forum:
http://interbios.pt.vu

http://pt.vazap.com

 

Sitemap 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49