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:
Agora temos que definir as variáveis no topo, depois do Program Pzim ; exemplo:
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).
Simples :).
Aqui um código simples que fiz:
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!
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!
16:55
Bruno Pereira
0 comentários:
Postar um comentário