segunda-feira, 17 de setembro de 2007

INF01202 - Laboratório 5 - Exercício 1

Problema 1:

[Théorie et Pratique du Langage Pascal - Nebut] Dois jogadores lançam ao mesmo tempo um dado. Em cada jogada, o jogador que tem o maior resultado marca um ponto. O jogo termina quendo o primeiro jogador obtém 11 pontos. Escrever um programa que simule este jogo de dados. O lançamento dos dados dos dois jogadores deve ser simulado por chamadas da função random.

Só devem ser apresentadas as jogadas em que não ocorrer empate, conforme o formato a seguir, e indicar ao final da execução quem é o vencedor:


Jogador A

Jogador B

Vencedor da Jogada

6

1

A

3

4

B

etc...




O vencedor é o jogador: B


Código Fonte: Dados.pas

Nenhum comentário: