Zeta Security
Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Simples joguinho em Pascal

Ir para baixo

Simples joguinho em Pascal Empty Simples joguinho em Pascal

Mensagem por Allan Ter Jul 10, 2012 12:12 am

Olha, é simples mesmo! Bom, o PC sorteia um número entre 0 e 3 e se o usuário acertar o número, você ganha! Segue o source:

Código:
{Um simples game de acertar o numero dado pelo PC!}
Program Pzim ;
 var
  aleatory: integer;
  op: integer;
 
 Begin
  writeln('Entre com numero de 0 até 5!');
  readln(op);
  aleatory := random(3);
  writeln(aleatory);
  if (op = aleatory) then
  writeln('Acertou!!');
  if (op < aleatory) then
  writeln('Seu num é menor!');
  if (op > aleatory) then
  writeln('Seu num é maior!');
 End.
Bom pra aprender a mexer com linguagens de programação! Em breve faço mais versões desse jogo mas você também pode modificar e colocar aqui pra nós ver! cheers
Allan
Allan
Administrador
Administrador

Mensagens : 255
Data de inscrição : 06/07/2011
Idade : 26
Localização : Paraná

https://zetasecurity.forumeiros.com/

Ir para o topo Ir para baixo

Ir para o topo

- Tópicos semelhantes

 
Permissões neste sub-fórum
Não podes responder a tópicos