Enviado em 29/07/2017 - 15:49h
Boa tarde pessoal,
algoritmo "classificação
// Função :
// Autor :
// Data : 28/07/2017
// Seção de Declarações
var
TimeA, TimeB, TimeC, TimeD, TimeE, TimeF:caracter
PTimeA, PTimeB, PtimeC,PtimeD,PtimeE,PtimeF:real
GTimeA, GTimeB, GTimeC, GTimeD, GTimeE, GtimeF:real
inicio
// Seção de Comandos
Escreva(" Nome do Time A: ")
Leia(TimeA)
Escreva(" Nome do Time B: ")
Leia(TimeB)
Escreva(" Nome do Time C: ")
Leia(TimeC)
Escreva(" Nome do Time D: ")
Leia(TimeD)
Escreva(" Nome do Time E: ")
Leia(TimeE)
Escreva(" Nome do Time F:")
Leia(TimeF)
Escreval(" Primeira Rodada")
Escreval( TimeA, " VS " ,TimeB)
Escreva ("Digite Resultado ")
Escreva ("Gols do ", TimeA," ==> ")
Leia(GTimeA)
Escreva ("Gols do ", TimeB," ==> ")
Leia(GTimeB)
se (GTimeA > GTimeB) entao
PTimeA <- 3
senao
PTimeB <- 3
se (GtimeA = GtimeB) entao
PTimeA <- 1
PtimeB <- 1
fimse
fimse
Escreval( TimeC, " VS " ,TimeD)
Escreva ("Digite Resultado ")
Escreva ("Gols do ", TimeC," ==> ")
Leia(GTimeC)
Escreva ("Gols do ", TimeD," ==> ")
Leia(GTimeD)
se (GTimeC > GTimeD) entao
PTimeC <- 3
senao
PTimeD <- 3
se (GtimeC = GtimeD) entao
PTimeA <- 1
PtimeB <- 1
fimse
fimse
fimalgoritmo
Atenção a quem posta conteúdo de dicas, scripts e tal (6)
Configuração para desligamento automatizado de Computadores em um Ambiente Comercial
O mínimo que você precisa saber sobre o terminal (parte 2)
O mínimo que você precisa saber sobre o terminal (parte 1)
Como iniciar uma máquina virtual do VirtualBox automaticamente no boot do LUbuntu 18 LTS
Como deixar as abas do Firefox mais fininhas
Mudar o gerenciador de login (GDM para SDDM)
"Tentando" fazer com que programas rodem no Wayland e no X11
Windows XP rodando no Linux (1)
Google Chrome não para de escrever no disco (3)
Notebook samsung 550xda não reconhece mais SSD (1)