quinta-feira, fevereiro 09, 2012

[PASCAL] Aprendendo um pouco sobre variáveis.

Bom, como estou desenvolvendo o sistema de Caixa de E-mails, não estou postando muito, então resolvi ver mais um pouco sobre Pascal para poder ensinar a vocês.

Quando abrimos um documento Pascal no PascalZim ele vem assim:

Program Pzim ;
 Begin
 End.

Agora temos que definir as variáveis no topo, depois do Program Pzim ; exemplo:

Program Pzim ;
var x:integer;
Begin
End.

Ele cria a variável X e define que ela é integer.
Agora vamos usar essa variável (usaremos a função Read para ele ler a variável).


Program Pzim ;
var x:integer;
Begin
writeln('Digite um valor: ');
read(x);
writeln('O valor digitado foi:', x);
End.

Simples :).
Aqui um código simples que fiz:


Program BrunoPereira ;
var x,y,somar,subtrair:integer; // Cria as variáveis x,y,somar e subtrair e define que elas são Inteiras(integer)
 Begin
      writeln('Digite um valor:'); // Imprime esse texto na tela do programa e pula uma linha
      read(x); // Libera você a digitar um numero inteiro
      writeln('Digite outro valor');
      read(y);
      somar:=x+y; // Declara que a variável Somar é igual a X+Y
      writeln('A soma dos valores são: ',somar); // Imprime esse texto e mostra o valor da variavel 'somar'
      subtrair:=x-y;
      writeln('A subtração dos valores são: ',subtrair);
   
     if(x > y) then  // if = se... então, Se X for maior(>) que Y, ele mostra o texto abaixo.
     begin // Inicia o Then
      writeln('X é maior que Y');  // Se X for maior, mostra este texto.
     end  // Termina o Then
     Else Begin  // Else = Se não... Se X não for maior que Y, imprime oque está abaixo!
      writeln('X é menor que Y');
     end;
   
 End.



Obs: Só vou postar o sistema de Caixa de E-mails se o blog chegar a 4 mil visualizações!
Bom, como estou desenvolvendo o sistema de Caixa de E-mails, não estou postando muito, então resolvi ver mais um pouco sobre Pascal para poder ensinar a vocês.

Quando abrimos um documento Pascal no PascalZim ele vem assim:

Program Pzim ;
 Begin
 End.

Agora temos que definir as variáveis no topo, depois do Program Pzim ; exemplo:

Program Pzim ;
var x:integer;
Begin
End.

Ele cria a variável X e define que ela é integer.
Agora vamos usar essa variável (usaremos a função Read para ele ler a variável).


Program Pzim ;
var x:integer;
Begin
writeln('Digite um valor: ');
read(x);
writeln('O valor digitado foi:', x);
End.

Simples :).
Aqui um código simples que fiz:


Program BrunoPereira ;
var x,y,somar,subtrair:integer; // Cria as variáveis x,y,somar e subtrair e define que elas são Inteiras(integer)
 Begin
      writeln('Digite um valor:'); // Imprime esse texto na tela do programa e pula uma linha
      read(x); // Libera você a digitar um numero inteiro
      writeln('Digite outro valor');
      read(y);
      somar:=x+y; // Declara que a variável Somar é igual a X+Y
      writeln('A soma dos valores são: ',somar); // Imprime esse texto e mostra o valor da variavel 'somar'
      subtrair:=x-y;
      writeln('A subtração dos valores são: ',subtrair);
   
     if(x > y) then  // if = se... então, Se X for maior(>) que Y, ele mostra o texto abaixo.
     begin // Inicia o Then
      writeln('X é maior que Y');  // Se X for maior, mostra este texto.
     end  // Termina o Then
     Else Begin  // Else = Se não... Se X não for maior que Y, imprime oque está abaixo!
      writeln('X é menor que Y');
     end;
   
 End.



Obs: Só vou postar o sistema de Caixa de E-mails se o blog chegar a 4 mil visualizações!

0 comentários:

Postar um comentário