NETITC
 


>> Navegação >> Tópico >> SubTópico
NomeTítulo Tópicos
Mauricio Junior
Dúvida iniciada: 6/12/2008 4:04:07 PM

Atividade 6 - Algoritmo


Dúvida:  Coloque os 4 exercícios feitos no laboratório,passados na primeira aula do dia 27/03/2008 no fórum. Qualquer dúvida entrar em contato.

Respostas Data Resposta: 3/27/2008 9:45:37 PM
ulysses moura brandao junior

Aluno: ULYSSES MOURA BRANDAO JUNIOR

RA: 930172-0

 

algoritmo "atividade1"
// Função :
// Autor :
// Data : 3/27/2008
// Seção de Declarações
// total de horas em um ano e igual a 8760
var
idade,horas:real
inicio
Escreva("Quantos anos vc tem ")
leia(idade)
horas<-(idade * 8760)
se (horas > 400) entao
horas<- (horas + 400)
Escreva(horas)
senao
escreva("novinho")
fimse
// Seção de Comandos
fimalgoritmo

 

algoritmo "atividade2"
// Função :
// Autor :
// Data : 3/27/2008
// Seção de Declarações
var
v1,v2,soma:real
inicio
escreva("informe um valor ")
leia(v1)
escreva("informe outro valor ")
leia(v2)
soma<-(v1 + v2)
se (soma <= 40) entao
escreva("40")
senao
soma<- (soma + 75)
escreva(soma)
fimse
// Seção de Comandos
fimalgoritmo

 

algoritmo "atividade3"
// Função :
// Autor :
// Data : 3/27/2008
// Seção de Declarações

var
time:literal
inicio
escreva("Informe o seu time favorito ")
leia(time)
se (time = "vasco") entao
escreva("CAMPEAO")
senao
escreva("PERDEDOR")
FIMSE
// Seção de Comandos
fimalgoritmo

 

algoritmo "atividade4"
// Função :
// Autor :
// Data : 3/27/2008
// Seção de Declarações
var
horas:literal
inicio
escreva("Informe as horas no formato hh:mm ")
leia(horas)
se (horas >="12:00") entao
escreva("boa tarde")
senao
escreva("bom dia")
fimse
// Seção de Comandos
fimalgoritmo

Respostas Data Resposta: 3/27/2008 9:46:19 PM
Daniela Cabral Monteiro

1º exercício

algoritmo "hora_400"
// Função : Calcular o quantidade de horas de vida se esta >400
// Autor : Daniela Cabral Monteiro
// Data : 27/3/2008

var
idade, total: real

inicio
escreva ("Digite sua idade ")
    leia (idade)
total <- ((idade*365)*24)

se  total > 400 entao
     total<- total+400
      escreva ("O total de horas vividas +400 é ", total)
senao
    escreva ("novinho")
fimse
fimalgoritmo

2º exercício

algoritmo "cond_soma"
// Função : Soma dois valores e compara se é <= 40
// Autor :  Daniela Cabral Monteiro
// Data : 27/3/2008

var
n1,n2,soma: real

inicio
escreva ("Digite o valor do primeiro número ")
    leia (n1)
escreva ("Digite o valor do segundo número ")
    leia (n2)

soma <-n1+n2

se soma > 40 entao
    soma <-soma+75
    escreva ("O valor da soma +75 é igual a ", soma)
senao
     escreva ("40")
fimse

fimalgoritmo

3º exercício

algoritmo "time"
// Função : Daniela Cabral Monteiro
// Autor :  Compara com um nome de time
// Data : 27/3/2008

var
time: literal

inicio
escreva ("Digite o nome do seu time ")
    leia (time)

se time = "vasco" entao
     escreva ("CAMPEÃO!!!!!")
senao
     escreva ("PERDEDOR!!!!")
fimse

fimalgoritmo

4º exercício

algoritmo "compara_hora"
// Função : Compara hora com o valor 12 horas
// Autor : Daniela Cabral Monteiro
// Data : 27/3/2008

var
hora :real

inicio
escreva ("Digite o valor da hora ")
     leia (hora)
    
se hora >=12 entao
     escreva ("Boa tarde!")
senao
     escreva ("Boa dia!")
fimse

fimalgoritmo

Respostas Data Resposta: 3/27/2008 9:52:42 PM
Thiarles Garcia Dayrell

THIARLES GARCIA DAYRELL                         RA: 831987-1

--------------------------------------------

algoritmo "Horas com condição"

var horas:Literal

inicio
      Escreva("Digite a hora: ")
      leia(horas)
      se horas >= "12:00" entao
         Escreva("Boa Tarde!")
      senao
         Escreva("Bom Dia!")
      fimse
fimalgoritmo

-------------------------------------------

algoritmo "Time"

var time:literal

inicio
      Escreva("Digite o nome do seu time favorito: ")
      leia(time)
      se time = "Cruzeiro" entao
         Escreva("Vencedor")
      senao
         Escreva("Perdedor")
      Fimse
fimalgoritmo

--------------------------------------------

algoritmo "Soma com Condição"

var s1, s2, total:real

inicio
      Escreva("Valor 1: ")
      leia(s1)
      Escreva("Valor 2: ")
      leia(s2)
      total<-s1+s2
      se total >= 40 entao
         Escreva("O total da sua conta foi 40")
      senao
         total<-total+75
         Escreva("total da sua soma foi", total)
      fimse
fimalgoritmo

-------------------------------------

algoritmo "Horas de Vida com Condição"

var id, total: real
    nome: Literal
   
inicio
      Escreva("Digite o seu nome: ")
      Leia(nome)
      Escreva("Digite qual a sua idade: ")
      leia(id)
      total<-id*8760
      se total >= 140160 entao
         //Cara eu alterei o valor que vc colocou pq com 400 horas o ser seria ralmente muito novo!
         total<-total+400
      senao
         Escreva("Novinho... ")
      fimse
      Escreva(nome,", você já viveu,", total," anos")

fimalgoritmo

Respostas Data Resposta: 3/27/2008 9:52:43 PM
Maurício Alves

algoritmo "Horas de vida"
// Função :
// Autor: Mauricio Alves Filho
var idade,total:real
inicio
escreval("Programa para calcular horas de vida condicionada.")
escreval("Digite sua idade:")
leia(idade)
total <- (idade*8760)
se(total>400) entao
escreval(total+400)
senao
escreval("novinho(a).")
fimse
fimalgoritmo
_________________________________________

algoritmo "Soma de valores"
// Função :
// Autor: Mauricio Alves Filho
var x,y,total:real
inicio
escreval("Soma de valores condicionada.")
escreval("Digite o valor 1:")
leia(x)
escreval("Digite o valor 2:")
leia(y)
total <- (x+y)
se(total <=40)entao
escreva("40")
senao
escreva(total+75)
fimse
fimalgoritmo
______________________________

algoritmo "Time favorito"
// Função :
// Autor: Mauricio Alves Filho
var tc:literal
inicio
escreval("Programa time do coração")
escreval("Digite seu time do coração")
leia(tc)
se(tc = "São Paulo")entao
escreva("O melhor!")
senao
escreva("Ainda tem vaga no São Paulo!")
fimse
fimalgoritmo
________________________________

algoritmo "Hora"
// Função :
// Autor: Mauricio Alves Filho
var h:literal
inicio
escreval("Programa hora condicionada")
escreval("Digite a hora")
leia(h)
se(h <="12:00")entao
escreva("Bom dia")
senao
escreva("Boa tarde")
fimse
fimalgoritmo

 

Respostas Data Resposta: 3/27/2008 9:56:18 PM
Adair Santana de Farias

algoritmo "Programa 1"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var idade,media:inteiro

inicio
Escreval("DIGITE A SUA IDADE ")
LEIA(idade)
media<-(idade*365*24)
 se media > 400 entao
Escreval(media+400)
senao
Escreval("novinho")
fimse

fimalgoritmo

Respostas Data Resposta: 3/27/2008 9:57:15 PM
Márcio Paulo Loiola

Segue os exercicios da aula do dia 27/03

1

// Função :  Calcular as horas vividas com condicao
// Autor :  MArcio Paulo
// Data : 27/3/2008
// Seção de Declarações
var
idade, dias, horas: real
inicio
escreva ("Digite sua idade: ")
leia (idade)
dias <- idade * 365;
horas <- dias * 24;
se horas > 400 entao
   escreval("velhinho")
senao
   escreva("novinho")
fimse
   escreval ("Seu total de horas vividas e: ", horas)
fimalgoritmo

__________________________________

2

algoritmo "semnome"
// Função : Time do Coracao
// Autor : Marcio Paulo
// Data : 27/3/2008
// Seção de Declarações
var
time: caractere
inicio
escreva("digite o nome do seu time: ")
leia (time)
se time = "..." entao
   escreva("Campeão")
senao
   escreva("Perdedor")
fimse
fimalgoritmo

____________________________________

3

algoritmo "semnome"
// Função :  Somar dois numeros com condicao
// Autor :  Marcio Paulo
// Data : 27/3/2008
// Seção de Declarações
var
valor1, valor2, soma: real
inicio
escreva ("digite o valor 1: ")
leia (valor1)
escreva ("digite o valor 2: ")
leia (valor2)
soma <- valor1 + valor2;
se soma = 40 entao
   escreva("40")
senao
     soma <- soma + 75;
     escreval("A soma é: ", soma)
fimse
escreval ("O resultado da soma e: ", soma)
fimalgoritmo

___________________________

4

algoritmo "semnome"
// Função : Hora do dia com condicao
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var
hora: literal
inicio
escreva("digite a hora atual: ")
leia(hora)
se hora >= "12:00" entao
   escreva("Boa Tarde")
senao
   escreva ("Bom dia")
fimse
fimalgoritmo

____________________________________

Valew

Respostas Data Resposta: 3/27/2008 10:00:30 PM
Fernando Guilherme

algoritmo "atividade 1"

var horas: real
idade: inteiro
inicio
   escreva("sua idade")
   leia(idade)
     horas<-idade*8760
   escreva(horas)
      se(horas>400)entao
         horas<-horas+400
      senao
         escreva("novinho(a)")
      fimse
fimalgoritmo

#######################################################

algoritmo "atividade 2"

var a, b, total: real
inicio
   escreva("digite o valor a")
   leia(a)
   escreva("digite o valor b")
   leia(b)
     total<-a+b
       se(total<=40) entao
         escreva(40)
       senao
         total<-total+75
       fimse
fimalgoritmo

######################################################

algoritmo "atividade 3"

var time: literal
inicio
   escreva("seu time: ")
   leia(time)
      se (time="flamengo") entao
        escreva("campeao")
      senao
        escreva("perdedor")
      fimse
fimalgoritmo

#######################################################

algoritmo "atividade 4"

var hora: literal
inicio
   escreva("digite a hora: ")
   leia(hora)
      se (hora>="12:00") entao
        escreva("Boa tarde")
      senao
        escreva("Bom dia")
      fimse
fimalgoritmo

Respostas Data Resposta: 3/27/2008 10:03:19 PM
Priscila

algoritmo "atividade 1"

var horas: real
idade: inteiro
inicio
   escreva("sua idade")
   leia(idade)
     horas<-idade*8760
   escreva(horas)
      se(horas>400)entao
         horas<-horas+400
      senao
         escreva("novinho(a)")
      fimse
fimalgoritmo

#######################################################

algoritmo "atividade 2"

var a, b, total: real
inicio
   escreva("digite o valor a")
   leia(a)
   escreva("digite o valor b")
   leia(b)
     total<-a+b
       se(total<=40) entao
         escreva(40)
       senao
         total<-total+75
       fimse
fimalgoritmo

######################################################

algoritmo "atividade 3"

var time: literal
inicio
   escreva("seu time: ")
   leia(time)
      se (time="gremio") entao
        escreva("campeao")
      senao
        escreva("perdedor")
      fimse
fimalgoritmo

#######################################################

algoritmo "atividade 4"

var hora: literal
inicio
   escreva("digite a hora: ")
   leia(hora)
      se (hora>="12:00") entao
        escreva("Boa tarde")
      senao
        escreva("Bom dia")
      fimse
fimalgoritmo

Respostas Data Resposta: 3/27/2008 10:07:09 PM
Diego Rodrigues da Silva

algoritmo "Horas de vida"
// Função :
// Autor: Diego Rodrigues
var idade,total:real
inicio
escreval("Programa para calcular horas de vida.")
escreval("Digite sua idade:")
leia(idade)
total <- (idade*8760)
se(total>400) entao
escreval(total+400)
senao
escreval("novinho(a).")
fimse
fimalgoritmo
-------------------------------------------------//----------------------------------

algoritmo "Soma de valores"
// Função :
// Autor: Diego Rodrigues
var x,y,total:real
inicio
escreval("Soma de valores condicionada.")
escreval("Digite o valor 1:")
leia(x)
escreval("Digite o valor 2:")
leia(y)
total <- (x+y)
se(total <=40)entao
escreva("40")
senao
escreva(total+75)
fimse
fimalgoritmo
-------------------------------------------------//-----------------------------------

algoritmo "Time favorito"
// Função :
// Autor: Diego Rodrigues
var tc:literal
inicio
escreval("Programa time do coração")
escreval("Digite seu time do coração")
leia(tc)
se(tc = "Vasco")entao
escreva("O melhor!")
senao
escreva("AVasco é sua salvação!")
fimse
fimalgoritmo
----------------------------------------------------//----------------------------------------

algoritmo "Saudação"
// Função :
// Autor: Diego Rodrigues
var h:literal
inicio
escreval("Programa hora condicionada")
escreval("Digite a hora")
leia(h)
se(h >="12:00")entao
escreva("Boa tarde")
senao
escreva("Bom dia")
fimse
fimalgoritmo
                      

Respostas Data Resposta: 3/27/2008 10:07:34 PM
Adriana Daher Montandon

algoritmo "atividade 01"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var
idade,hora,mes,total:real
inicio
escreva("Digite sua idade: ")
leia(idade)
escreva("Ha quantos meses foi seu ultimo aniversário? ")
leia(mes)
total<-(24*365*idade+24*30*mes)
se total>400 entao
total<-(total+400)
escreva(total)
senao
escreva("novinho(a)")
fimse
// Seção de Comandos
fimalgoritmo


algoritmo "atividade 02"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var
n1,n2,soma:real
inicio
escreva("digite um numero: ")
leia(n1)
escreva("digite outro numero: ")
leia(n2)
soma<-n1+n2
se soma<=40 entao
escreva(40)
senao
escreva(soma+75)
fimse
// Seção de Comandos
fimalgoritmo

algoritmo "atividade 03"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var
time:literal
inicio
escreva("seu time: ")
leia(time)
se time="flamengo" entao
escreva("CAMPEÃO")
senao
escreva("PERDEDOR")
FIMSE
// Seção de Comandos
fimalgoritmo

algoritmo "atividade 04"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var
hora:literal
inicio
escreva("digite a hora: ")
leia(hora)
se hora<="12:00" entao
escreva("Bom Dia!!!")
senao
escreva("Boa Tarde!!!")
fimse
// Seção de Comandos
fimalgoritmo

Respostas Data Resposta: 3/27/2008 10:07:39 PM
Ricardo Henrique Rocha Almeida algoritmo "Exercício 1"
// Função : Verificar a qtd de horas vividas com condição
// Autor : Ricardo H R Almeida
// Data : 27/03/2008
// Seção de Declarações
var
     dia, ano: real;
     idade, total: real;
inicio
     escreva ("Escreva a sua idade: ");
       leia (idade);
     escreva ("Quantidade de Hora no Dia ");
       leia (dia);
     escreva ("Quantidade de dia em um ano ");
       leia (ano);
total<-(idade*(ano*dia))
  se (total > 400) entao
     escreva ( total + 400)
  senao
     escreva ("Novinho")
  fimse
fimalgoritmo

algoritmo "Exercício 2"
// Função : Somar o Primeiro e o Segundo valor comcondição
// Autor : Ricardo H R Almeida
// Data : 27/03/2008
// Seção de Declarações
var
   v1, v2, Total: real;
inicio
   escreva ("Valor de v1 ");
     leia (v1);
   escreva ("Valor de v2 ");
     leia (v2);
Total<-(v1+v2)
   se (Total = 40) entao
     escreva ("40")
   senao
     escreva (Total + 75)
   fimse
fimalgoritmo

algoritmo "Exercício 3"
// Função : Time de Futebol
// Autor : Ricardo H R Almeida
// Data : 27/03/2008
// Seção de Declarações
var
   Time, Cruzeiro: Caracter;
inicio
   escreva ("Escreva se time de Futebol: ");
     leia (Time)
  se Time = "Cruzeiro" entao
   escreva ("Campeão")
  senao
   escreva ("Perdedor")
  fimse
fimalgoritmo

algoritmo "Exercício 4"
// Função : Hora do Dia com Condição
// Autor : Ricardo H R Almeida
// Data : 27/03/2008
// Seção de Declarações
var
   Hora: literal
inicio
   escreva ("Escreva as horas: ");
     leia (Hora)
  se Hora >= "12:00" entao
   escreva ("Boa Tarde")
  senao
   escreva ("Bom dia")
  fimse
fimalgoritmo
Respostas Data Resposta: 3/27/2008 10:08:30 PM
André Manoel Silveira algoritmo "HORAS"
// Função :
// Autor :  André Manoel Silveira
// Data : 27/3/2008
// Seção de Declarações
var
I, T, T2: real
inicio
escreva("Digite a sua idade")
leia(I)
T<-(I*8760)
se(T>400)entao
T2<-(T+400)
escreva(T2)
senao
escreva("novinho")
fimse
// Seção de Comandos
fimalgoritmo

algoritmo "SOMA"
// Função :
// Autor : André Manoel Silveira
// Data : 27/3/2008
// Seção de Declarações
var
v1, v2, soma, soma2:real
inicio
escreva("valor 1 ")
leia(v1)
escreva("valor 2 ")
leia(v2)
soma<-(v1+v2)
se(soma<=40)entao
escreva("40")
senao
soma2<-(soma+75)
escreva(soma2)
fimse
// Seção de Comandos
fimalgoritmo

algoritmo "TIME"
// Função :
// Autor :André Manoel Silveira
// Data : 27/3/2008
// Seção de Declarações
var
time, criciuma:literal
inicio
escreva("Digite seu time favorito ")
leia(time)
se(time = "criciuma")entao
escreva("CAMPEÂO")
senao
escreva("perdedor")
fimse
// Seção de Comandos
fimalgoritmo

algoritmo "HORAS"
// Função :
// Autor :André Manoel Silveira
// Data : 27/3/2008
// Seção de Declarações
var
hora:real
inicio
escreva("Que horas são? ")
leia(hora)
se(hora>12)entao
escreva("boa tarde")
senao
escreva("bom dia")
fimse
// Seção de Comandos
fimalgoritmo

Respostas Data Resposta: 3/27/2008 10:10:02 PM
Luís Müller Pinheiro Reis

algoritmo "atividade 1"

var horas: real
idade: inteiro
inicio
   escreva("sua idade")
   leia(idade)
     horas<-idade*8760
   escreva(horas)
      se(horas>400)entao
         horas<-horas+400
      senao
         escreva("novinho(a)")
      fimse
fimalgoritmo

#######################################################

algoritmo "atividade 2"

var a, b, total: real
inicio
   escreva("digite o valor a")
   leia(a)
   escreva("digite o valor b")
   leia(b)
     total<-a+b
       se(total<=40) entao
         escreva(40)
       senao
         total<-total+75
       fimse
fimalgoritmo

######################################################

algoritmo "atividade 3"

var time: literal
inicio
   escreva("seu time: ")
   leia(time)
      se (time="BRASIL") entao
        escreva("campeao")
      senao
        escreva("perdedor")
      fimse
fimalgoritmo

#######################################################

algoritmo "atividade 4"

var hora: literal
inicio
   escreva("digite a hora: ")
   leia(hora)
      se (hora>="12:00") entao
        escreva("Boa tarde")
      senao
        escreva("Bom dia")
      fimse
fimalgoritmo

Respostas Data Resposta: 3/27/2008 10:10:16 PM
Raphael Pedrinha de Lima

algoritmo "Atividade 1"
// Função : Calcular quantas horas você tem de vida.Com a condição estabelecida.
// Autor :
// Data : 27/03/2008
// Seção de Declarações
var
qda,qhd,idad,th:real
inicio
// Seção de Comandos
Escreva("Digite quantos dias tem um ano ")
leia(qda)
Escreva("Digite quantas horas tem um dia ")
leia(qhd)
Escreva("Digite sua idade ")
leia(idad)
th<-(qda*qhd)
th<-th*idad
se(th>400)entao
th<-th+400
EscrevaL("Você viveu ate hoje um total de", th ," horas.")
senao
Escreva("Novinho")
fimSe
fimalgoritmo

 

algoritmo "Atividade 2"
// Função : Somar dois valores quaisquer.Com a condição <=40 escreva 40 senao some +75
// Autor : Raphael Pedrinha de Lima
// Data : 27/03/2008
// Seção de Declarações
var
v1,v2,soma:inteiro
inicio
// Seção de Comandos
Escreva("O primeiro valor a ser somado é? ")
leia(v1)
Escreva("O segundo valor a ser somado é? ")

leia(v2)

soma<-(v1+v2)
se (soma<=40) entao
Escreva("40")
senao
soma<-(soma+75)
Escreva(soma)

fimse

fimalgoritmo

 

algoritmo "Atividade 3"
// Função : Saber se seu time é Campeão ou Perdedor.
// Autor : Raphael Pedrinha de Lima
// Data : 27/03/2008
// Seção de Declarações
var
time:literal

inicio
// Seção de Comandos
Escreva("Seu time é? ")
leia(time)
se (time="Botafogo") entao
Escreva("Campeão!!!")
senao
Escreva("Perdedor!!!")
fimse
fimalgoritimo

 

algoritmo "Atividade 4"
// Função : Informar a hora com condição q >=12:00 boa tarde senao bom dia
// Autor : Raphael Pedrinha de Lima
// Data : 27/03/2008
// Seção de Declarações
var
hora:real

inicio
// Seção de Comandos
escreva("Informe a hora do sue relógio. ")
leia(hora)
se(hora>=12) entao
Escreva("Boa tarde!!")
senao
Escreva("Bom dia!!!")
fimse
fimalgoritmo

 

Conforme pediu os exercícios passados em sala no dia 27/03

 

Raphael Pedrinha de Lima

Respostas Data Resposta: 3/27/2008 10:11:00 PM
Alba Tatiane

  algoritmo "hora"
// Função :
// Autor : Alba e Victor
// Data : 27/3/2008
// Seção de Declarações
var hora:literal

inicio
      escreva ("horas a informa")
      leia(hora)
se (hora>="12:00")entao
      escreva("Boa Tarde")
senao
     escreva("Bom Dia")
fimse
fimalgoritmo


algoritmo "horas vividas"
// Função :
// Autor :Alba  e Victor
// Data : 27/3/2008
// Seção de Declarações
var idade,total:real

inicio
escreva ("digite a sua idade")
leia(idade)
total<-(idade*24*365)
se (total >400)entao
total<-(total+400)
escreval(total)
senao
escreva("novinho")
fimse

fimalgoritmo


algoritmo "soma de dois valores"
// Função :
// Autor :Alba T atiane
// Data : 27/3/2008
// Seção de Declarações
var  v1,v2,soma:real

inicio
escreva ("digite o primeiro valor :")
leia (v1)
escreva ("digite o segundo valor :")
leia (v2)
soma<-(v1+v2)
se (soma<=40) entao
escreva ("40")
senao
escreva(soma+75)
fimse
fimalgoritmo


algoritmo "time"
// Função :
// Autor :ALBA e Victor
// Data : 27/3/2008
// Seção de Declarações
var time:literal

inicio
escreva("Digite o nome de seu time: ")
leia(time)
se (time = "flamengo") entao
escreva ("campeao")
senao
escreva ("perdedor")
Fimse
fimalgoritmo

Respostas Data Resposta: 3/27/2008 10:14:32 PM
mateus araujo lima

algoritmo "atividade 01"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var
idade,hora,mes,total:real
inicio
escreva("Digite sua idade: ")
leia(idade)
escreva("Ha quantos meses foi seu ultimo aniversário? ")
leia(mes)
total<-(24*365*idade+24*30*mes)
se total>400 entao
total<-(total+400)
escreva(total)
senao
escreva("novinho(a)")
fimse
// Seção de Comandos
fimalgoritmo


algoritmo "atividade 02"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var
n1,n2,soma:real
inicio
escreva("digite um numero: ")
leia(n1)
escreva("digite outro numero: ")
leia(n2)
soma<-n1+n2
se soma<=40 entao
escreva(40)
senao
escreva(soma+75)
fimse
// Seção de Comandos
fimalgoritmo

algoritmo "atividade 03"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var
time:literal
inicio
escreva("seu time: ")
leia(time)
se time="flamengo" entao
escreva("CAMPEÃO")
senao
escreva("PERDEDOR")
FIMSE
// Seção de Comandos
fimalgoritmo

algoritmo "atividade 04"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var
hora:literal
inicio
escreva("digite a hora: ")
leia(hora)
se hora<="12:00" entao
escreva("Bom Dia!!!")
senao
escreva("Boa Tarde!!!")
fimse
// Seção de Comandos
fimalgoritmo

Respostas Data Resposta: 3/27/2008 10:14:55 PM
izael lima oliver

algoritmo "quantos anos"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var idade,horas: real

inicio
escreva("quantos anos vc tem")
                 leia(idade)
                 horas<-(idade*8760)
       se(horas>400)entao
          horas<-(horas+400)
          escreva(horas)
       senao
       escreva("novinho")
       fimse
                
fimalgoritmo

 

algoritmo "horas"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var horas: real

inicio
escreva("digite a hora")
                leia(horas)
                se(horas>=12)entao
                   escreva("boa tarde")
                senao
                   escreva("bom dia")
                fimse
fimalgoritmo

 

algoritmo "mengão"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var  time: literal

inicio
escreva("time favorito:")
       leia(time)
       se(time="flamengo") entao
               escreva("campeao")
       senao
            escreva("perdedor")
       fimse
fimalgoritmo

 

algoritmo "horas"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var v1,v2: real

inicio
escreval("escreva v1")
                  leia(v1)
escreval("escreva v2")
                  leia(v2)
            se(soma=40)entao
               escreva(40)
            senao
               soma<-(soma+75)
            escreva(soma)
         fimse
fimalgoritmo

Respostas Data Resposta: 3/27/2008 10:15:58 PM
Dangels Neiva Gonçalves

Atividade 1:

algoritmo "idade"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var
 idade, horas:real
inicio
// Seção de Comandos
escreva("Digite quantos anos você tem? ")
leia(idade)
horas<-idade*8760
se horas>400 entao
horas<-horas+400
senao
escreva("Novinho")
fimse

fimalgoritmo

 

Atividade 2:

algoritmo "soma"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var
      soma,x,y:real
inicio
// Seção de Comandos
escreva("Digite um numero: ")
leia(x)
escreva("Digite um numero: ")
leia(y)
soma<-x+y
se soma=40 entao
escreva("40")
senao
soma<-soma+75
escreva(soma)
fimse

fimalgoritmo

 

Atividade 3:

algoritmo "time"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var
  time:literal

inicio
// Seção de Comandos
Escreva("Digite o nome do seu time :")
leia (time)
se (time="brasil") entao
escreva("Campeão")
senao
Escreva ("Perdedor")
fimse
fimalgoritmo

 

Atividade 4:

algoritmo "hora"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var
 horas:literal
inicio
// Seção de Comandos
escreva ("Digite a hora :")
leia(horas)
se (horas>="12:00") entao
escreva("Boa tarde")
senao
Escreva("Bom dia")
fimse
fimalgoritmo 

Respostas Data Resposta: 3/27/2008 10:19:46 PM
Júlio Araújo

Exercício01

algoritmo "Tempo de Vida Em Horas"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var media,id:real

inicio
escrevaL("Digite sua Idade")
leia(id)
media<-(id*365*24)
se media>400 entao
escrevaL(media+400)
senao
escreva("novinho")
fimse
// Seção de Comandos
fimalgoritmo

Exercício02

algoritmo "Soma de 2 valores"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var v1,v2,media:real

inicio
escrevaL("Digite Valor 1")
leia(v1)
escrevaL("Digite Valor 2")
leia(v2)
media<-(v1+v2)
se media<=40 entao
escrevaL(40)
senao
escrevaL(media+75)
fimse
// Seção de Comandos
fimalgoritmo

Exercício03

algoritmo "Time Favorito"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var flamengo:literal
tf:literal

inicio
escrevaL("Digite o Nome do Seu Time Favorito")
leia(tf)
se tf="flamengo" entao
escrevaL("Campeão")
senao
escrevaL("Perdedor")
fimse
// Seção de Comandos
fimalgoritmo

Exercício04

algoritmo "Saudação"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var ha:literal

inicio
escrevaL("Digite A Hora Atual")
leia(ha)
se ha>="12:00" entao
escrevaL("Boa Tarde")
senao
escrevaL("Bom Dia")
fimse
// Seção de Comandos
fimalgoritmo

Respostas Data Resposta: 3/27/2008 10:24:28 PM
José Augusto Barbosa de Pinho

Aluno: José Augusto Barbosa de Pinho - RA 655916-6

algoritmo "atividade 1"
// Função : horas de vida
// Autor :  José Augusto B. de Pinho
// Data : 6/3/2008
// Seção de Declarações
var
    idade, horas : real
inicio
    Escreval ("Digite sua Idade:")
    Leia (idade)
    horas <- (idade * 8760)
         se horas > 400 entao
            horas <- horas + 400
         escreval ("Sua horas de vida são: ", horas)
           senao
             escreval ("novinho")
         fimse
fimalgoritmo

 

algoritmo "atividade 2"
// Função : soma
// Autor :  José Augusto B. de Pinho
// Data : 6/3/2008
// Seção de Declarações
var
    n1, n2, soma : real
inicio
    Escreval ("Digite primeiro número:")
    Leia (n1)
    Escreval ("Digite segundo número:")
    Leia (n2)
    soma <- (n1 + n2)
         se soma <= 40 entao
            escreval ("Soma dos valores são:", soma)
            senao
            soma <- soma + 75
         fimse
         escreval (soma)
fimalgoritmo

 

var
    time : caracter
inicio
    Escreval ("Digite o nome do seu time do coração:")
    Leia (time)
         se time = ("vasco") entao
       escreval ("CAMPEÃO")
     senao
        escreval ("PERDEDOR")
      fimse
fimalgoritmo

 

algoritmo "atividade 3"
// Função : hora
// Autor :  José Augusto B. de Pinho
// Data : 6/3/2008
// Seção de Declarações
var
    hora : real
inicio
    Escreval ("Digite quantas horas:")
    Leia (hora)
         se hora >= 12 entao
       escreval ("Boa tarde")
     senao
        escreval ("Bom Dia")
      fimse
fimalgoritmo

 

Respostas Data Resposta: 3/27/2008 10:24:44 PM
Adair Santana de Farias

algoritmo "Programa 1"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var idade,media:inteiro

inicio
Escreval("DIGITE A SUA IDADE ")
LEIA(idade)
media<-(idade*365*24)
 se media > 400 entao
Escreval(media+400)
senao
Escreval("novinho")
fimse

fimalgoritmo

 

EXERCICIO 2

lgoritmo "EXERCICIO 2"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var V1,V2,SOMA:INTEIRO

inicio
ESCREVAL("DIGITE UM VALOR DE 1 A 20")
LEIA(V1)
ESCREVAL("DIGITE UM VALOR DE 21 A 50")
LEIA(V2)
SOMA<-(V1+V2)
SE SOMA<=40 ENTAO
ESCREVAL(40)
SENAO
ESCREVA(SOMA+75)
FIMSE
fimalgoritmo


EXERCICIO 3

algoritmo "EXERCIO3  "
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var TIME,FLAMENGO:LITERAL

inicio
ESCREVAL("DIGA POR FAVOR QUE TIME VOCÊ TORCE? ")
LEIA(TIME)
SE TIME="FLAMENGO" ENTAO
ESCREVAL("CAMPEÃO")
SENAO
ESCREVAL("PERDEDOR")
FIMSE

fimalgoritmo

 

EXERCICIO 4

algoritmo "EXERCICIO4"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var HORA:LITERAL

inicio
ESCREVAL("QUANTAS HORAS SÃO AGORA? DIGITE APENAS A HORA")
LEIA(HORA)
SE HORA>="12:00" ENTAO
ESCREVAL("BOA TARDE")
SENAO
ESCREVAL("BOM DIA ")
FIMSE

fimalgoritmo

Respostas Data Resposta: 3/27/2008 10:25:14 PM
André Manoel Silveira

algoritmo "SOMA"
// Função :
// Autor : henrique brasiliense
// Data : 27/3/2008
// Seção de Declarações
var
v1, v2, soma, soma2:real
inicio
escreva("valor 1 ")
leia(v1)
escreva("valor 2 ")
leia(v2)
soma<-(v1+v2)
se(soma<=40)entao
escreva("40")
senao
soma2<-(soma+75)
escreva(soma2)
fimse
// Seção de Comandos
fimalgoritmo



algoritmo "HORAS"
// Função :
// Autor :  henrique brasiliense
// Data : 27/3/2008
// Seção de Declarações
var
I, T, T2: real
inicio
escreva("Digite a sua idade")
leia(I)
T<-(I*8760)
se(T>400)entao
T2<-(T+400)
escreva(T2)
senao
escreva("novinho")
fimse
// Seção de Comandos
fimalgoritmo


algoritmo "TIME"
// Função :
// Autor :henrique brasiliense
// Data : 27/3/2008
// Seção de Declarações
var
time, criciuma:literal
inicio
escreva("Digite seu time favorito ")
leia(time)
se(time = "criciuma")entao
escreva("CAMPEÂO")
senao
escreva("perdedor")
fimse
// Seção de Comandos
fimalgoritmo


algoritmo "HORAS"
// Função :
// Autor :henrique brasiliense
// Data : 27/3/2008
// Seção de Declarações
var
hora:real
inicio
escreva("Que horas são? ")
leia(hora)
se(hora>12)entao
escreva("boa tarde")
senao
escreva("bom dia")
fimse
// Seção de Comandos
fimalgoritmo

Respostas Data Resposta: 3/27/2008 10:25:59 PM
Rebeca Dayane

algoritmo "hora"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var    H: literal

inicio
// Seção de Comandos
escreva ("informe a hora")
leia (H)
se (H <="12:00") entao
escreva ("bom dia")
senao
escreva ("boa tarde")
fimse
fimalgoritmo

__________________________________________________

algoritmo "horas de vida"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var  idade, media:real

inicio

// Seção de Comandos
escreva ("digite sua idade")
leia (idade)
media<-(idade*8760)
se media>400 entao
escreval("resultado=",media+400," horas")
senao
escreva("você é novinho")
fimse
fimalgoritmo

 

______________________________________________________

algoritmo "time"
// Função :
// Autor : Rebeca e André
// Data : 27/3/2008
// Seção de Declarações
var time: literal

inicio
// Seção de Comandos
escreva ("Qual seu time?")
leia (time)
se time= "Brasil" entao
escreva ("Campeao")
senao
escreva ("Perdedor")
fimse
fimalgoritmo

 

_______________________________________________________

algoritmo "soma"
// Função :
// Autor :Rebeca e André
// Data : 27/3/2008
// Seção de Declarações
var   v1,v2, total: real

inicio
// Seção de Comandos
escreva("informe o primeiro número")
leia (v1)
escreva("informe o segundo número")
leia (v2)
total<- v1+v2
se total=40 entao
escreva("a soma é igual a 40")
senao
escreval ("A soma é igual", total+75)
fimse
fimalgoritmo

 

 

 

 

Respostas Data Resposta: 3/27/2008 10:26:20 PM
MARIA VIRGINIA PEREIRA DA SILVA

algoritmo "semnome"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var
HORA:real
inicio
escreva("hora")
leia(hora)
se (hora>=12) entao
escreva("boa tarde")
senao
escreva("bom dia")
fimse
// Seção de Comandos
fimalgoritmo

algoritmo "semnome"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var
time:literal
inicio
escreva("nome do seu time: ")
leia(time)

se(time="brasil") entao
   escreva("campeão")
senao
   escreva("perdedor")
fimse
// Seção de Comandos
fimalgoritmo

 

algoritmo "semnome"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var
v1,v2,soma:real
inicio
escreva("valor 1")
leia(v1)
escreva("valor 2")
leia(v2)
soma<-(v1+v2)
se(soma<=40) entao
   escreva("40")
senao
   soma<-(soma+75)
   escreva("soma é:",soma)
fimse
// Seção de Comandos
fimalgoritmo

 

algoritmo "semnome"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var
 idade,soma:real
inicio
escreva("digite sua idade")
leia(idade)
soma<-(idade*8760)
se(soma>400) entao
soma<-(soma+400)
escreva(soma)
senao
escreva("novinho")
fimse
// Seção de Comandos
fimalgoritmo

 

 

Respostas Data Resposta: 3/27/2008 10:27:36 PM
carlos

algoritmo "semnome"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var Time,Flamengo:Literal

inicio
Escreva("Digite o nome do seu time")
Leia(time)
Se Time = "Flamengo" entao
escrevaL("campeao")
senao
     escrevaL("perdedor")
fimse
algoritmo "semnome"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var idade,horas: real

inicio
// Seção de Comandos
escreva ("digite sua idade")
leia (idade)
horas<- (idade * 8760)
se  (horas > 400) entao
   horas<- (horas + 400 )
senao
     escrevaL("novinho")
     fimse
algoritmo "semnome"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var
v1,v2,total:real
inicio
// Seção de Comandos
escreva("digite um valor")
leia(v1)
escreva("digite um valor")
leia(v2)
total<-(v1+v2)
se total=40 entao
   escreva ("40")
senao
     total<- total+75
fimse
escrevaL (total)
algoritmo "semnome"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var Hora:real


inicio
Escreva("Digite um valor")
Leia(hora)
se hora >= 12 entao
Escreva("Boa tarde")
senao
     Escreva("Bom dia")
fimse

Respostas Data Resposta: 3/27/2008 10:27:40 PM
ivanildo moreira

algoritmo "semnome"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var hora:literal
inicio
escreval("hora")
leia(hora)
se hora<"12:00" entao
escreval("bomdia")
senao
escreval("boa tarde")
fimse


// Seção de Comandos
fimalgoritmo

 

 

 

 

 

 

algoritmo "semnome"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var time:literal
inicio
escreval("time")
leia (time)
se time="sao paulo" entao
escreval("campeao")
 senao
 escreval("perdedor")


       fimse
// Seção de Comandos
fimalgoritmo

 

 

 

 

 

algoritmo "semnome"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var v1,v2,total:real

    inicio
    escreva("v1  ")
    leia(V1)
    escreva("v2 ")
    leia(v2)
    total<-(v1+v2)
    se total <= 40 entao
    escreval("40")
    senao
    total<-total+75
    escreval(total)
    fimse

   
// Seção de Comandos
fimalgoritmo

 

 

 

 

algoritmo "semnome"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var horas,idade,total:real

inicio
escreva("idade")
leia(idade)
total<-idade*8760

se horas<400 entao

escreva(total+400)
escreva ("       novinho")

 

fimse
// Seção de Comandos
fimalgoritmo

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Respostas Data Resposta: 3/27/2008 10:29:56 PM
Eberson

algoritmo "semnome"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var
     id,total:real
     a:real
inicio

      escreva("Escreva sua idade")
leia(id)
total<-id*8760
se id>400 entao
   a<-total+400
   escreva(a, "horas")
senao
      escreva("novinho")
fimse
// Seção de Comandos
fimalgoritmo


_______________________________________________________________

algoritmo "semnome"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var
y1,x2,s:real

inicio

      escreva("Digite um número")
leia(y1)
      escreva("Digite um número")
leia(x2)
s<-(y1+x2)
se s<=(40)entao
       escreval("40")
senao
       escreval(s+75)
    fimse
// Seção de Comandos
fimalgoritmo
______________________________________________
algoritmo "semnome"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var
time:literal
inicio

      escreva("Digite seu time favorito")
leia(time)
se time = "vasco" entao
   escreval("Campeão")
senao
     escreval("Perdedor")
     fimse
// Seção de Comandos
fimalgoritm
__________________________________algoritmo "semnome"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var
hora:real
inicio

   escreva("Digite a hora")
leia(hora)
se hora>=(12)entao
   escreva("Boa tarde")
senao
     escreva("Bom dia")
     fimse
// Seção de Comandos
fimalgoritmo

Respostas Data Resposta: 3/27/2008 10:30:28 PM
Diego Azevedo de Queiroz

algoritmo "semnome"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
//escreva um algoritimo que calcule quanras horas voce tem de vida.setiver maior que 400 horas então escreva o valor da hora cauculada somada com 400. senoa escreva("novinho")
// total de horas em um ano e igual a 8760
var
horas:real
idade:real
inicio
escreva("digite dua idade")
Leia (idade)
horas<-(idade*8760)
se (horas>400) entao
escreva (horas + 400)
senao
escreva("novinho")
fimse
fimalgoritmo

 

algoritmo "semnome"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var
v1,v2:real
total:real
inicio
escreva("diegite v1")
Leia(v1)
escreva ("digite v2")
Leia(V2)
total<-(v1+v2)
se(total=40)entao
escreva(40)
senao
escreva (total+75)
fimse

fimalgoritmo

 

algoritmo "semnome"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var
time:caracter
inicio
// Seção de Comandos
escreva("digite seu time")
Leia (time)
se time="flamengo" entao
escreva ("campeao")
senao
escreva ("perdedor")
fimse
fimalgoritmo

 

algoritmo "semnome"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var
hora:Literal
inicio
// Seção de Comandos
escreva("digite hora")
leia (hora)
se hora>="12:00" entao
escreva ("boa tarde")
senao
escreva ("bom dia")
fimse
fimalgoritmo

 

 

Respostas Data Resposta: 3/27/2008 10:30:55 PM
Rodrigo Luiz de Melo Santana

algoritmo "semnome"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var idade,horas: real

inicio
// Seção de Comandos
escreva ("digite sua idade")
leia (idade)
horas<- (idade * 8760)
se  (horas > 400) entao
   horas<- (horas + 400 )
senao
     escrevaL("novinho")
     fimse


fimalgoritmoalgoritmo "semnome"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var
v1,v2,total:real
inicio
// Seção de Comandos
escreva("digite um valor")
leia(v1)
escreva("digite um valor")
leia(v2)
total<-(v1+v2)
se total=40 entao
   escreva ("40")
senao
     total<- total+75
fimse
escrevaL (total)
fimalgoritmoalgoritmo "semnome"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var Time,Flamengo:Literal

inicio
Escreva("Digite o nome do seu time")
Leia(time)
Se Time = "Flamengo" entao
escrevaL("campeao")
senao
     escrevaL("perdedor")
fimse
fimalgoritmoalgoritmo "semnome"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var Hora:real


inicio
Escreva("Digite um valor")
Leia(hora)
se hora >= 12 entao
Escreva("Boa tarde")
senao
     Escreva("Bom dia")
fimse
fimalgoritmo

Respostas Data Resposta: 3/27/2008 10:31:21 PM
Jorge Lopes da Silva

algoritmo "hora"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var hora:real
inicio

escreva("Digite a hora")
leia(hora)
 se hora >=12 entao
escreva("boa Tarde")
 senao
escreva("bom dia")
fimse
fimalgoritmo

 

algoritmo "idade"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var idade,total:real
inicio
escreva("Escreva sua idade")
leia(idade)
total<-idade*8750
 se total > 400 entao
escreva("seu velho")
 senao escreva("novinho")
fimse
fimalgoritmo

 

algoritmo "soma"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var v1,v2,total:real

inicio
escreva("escreva o primeiro valor")
leia(v1)
escreva("escreva o segundo valor")
leia(v2)
total<-v1+v2
 se total = 40 entao
escreva(40)
 senao
 escreva (total+75)
fimse
fimalgoritmo

 

algoritmo "meu time"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var time:literal

inicio
escreva("escreva seu time")
leia(time)
se time = "saopaulo" entao
escreva("timao")
senao
escreva("perdedor")
fimse
fimalgoritmo

 

 

 

Respostas Data Resposta: 3/27/2008 10:33:38 PM
PAULO ROBERTO VITRAL MOREIRA

algoritmo "bom dia - boa tarde"
// Função :
// Autor :   PAULO ROBERTO - 888451-0
// Data : 27/3/2008
// Seção de Declarações
var HORA:real

inicio
ESCREVA("DIGITE A HORA ATUAL")
LEIA(HORA)
SE(HORA >=12)entao
ESCREVA("BOA TARDE")
SENAO
ESCREVA("BOM DIA")
FIMSE
// Seção de Comandos
fimalgoritmo

 

 

algoritmo "time favorito"
// Função :
// Autor : PAULO ROBERTO - 888451-0
// Data : 27/3/2008
// Seção de Declarações
var  TIME:LITERAL

inicio
ESCREVA("escreva o seu time favorito")
leia(TIME)
se(time = "FLAMENGO")ENTAO
escreva("CAMPEÃO")
senao
escreva("PERDEDOR")
FIMSE
// Seção de Comandos
fimalgoritmo

 

 

algoritmo "soma de dis valores quaisquer"
// Função :
// Autor : PAULO ROBERTO 888451-0
// Data : 27/3/2008
// Seção de Declarações
var v1, v2, soma:inteiro

inicio
escreva("digite o primeir valor")
leia(v1)
escreva("digite o segundo valor")
leia(v2)
soma <- (v1+v2)
se(soma <= 40) entao
  escreva("40")
senao
soma <- (soma+75)
escreva("soma é:", soma)
fimse
// Seção de Comandos
fimalgoritmo

 

 

algoritmo "horas de vida"
// Função :
// Autor : PAULO ROBERTO - 888451-0
// Data : 27/3/2008
// Seção de Declarações
var id, produto: inteiro

inicio
escreva("escreva a sua idade")
leia(id)
produto <- (id*8760)
se(produto > 400)entao
escreva(produto+400)
senao
escreva("novinho")
fimse
// Seção de Comandos
fimalgoritmo

Respostas Data Resposta: 3/27/2008 10:34:32 PM
Sebastião Ramos de Souza

algoritmo "idade"
// Função :
// Autor : Ramos
// Data : 27/03/2008
// Seção de Declarações
var
hora,mes,ano,total:real

inicio
escreva("digite sua idade: ")
leia(ano)
escreva("ha quantos meses foi seu último aniversário: ")
leia(mes)
total<-(ano*24*365+mes*30*24)
se total>400 entao
   total<-(total+400)
   escreval("seu velho, você viveu exatamente: ",total," horas")
senao
   escreva("novinho")
fimse
fimalgoritmo

 

algoritmo "exerc2"
// Função :
// Autor :  Ramos
// Data : 28/03/2008
// Seção de Declarações
var
v1,v2,total:real
inicio
// Seção de Comandos
   escreva("entre com o primeiro valor: ")
      leia(v1)
   escreva("entre com o segundo valor: ")
      leia(v2)
   total<-(v1+v2)
      se (total=40) entao
         escreva("40")
      senao
         escreva(total+75)
      fimse
fimalgoritmo

 

algoritmo "idade"
// Função :
// Autor :   Ramos
// Data : 27/03/2008
// Seção de Declarações
var
time:caracter

inicio
escreva("digite seu time: ")
leia(time)
se (time ="grêmio") entao
   escreva("campeão")
senao
   escreva("perdedor")
fimse
fimalgoritmo

 

algoritmo "Bom dia ou Boa tarde"
// Função :
// Autor :    Ramos
// Data : 27/03/2008
// Seção de Declarações
var
hora:literal

inicio
escreva("digite a hora: ")
leia(hora)
se hora<="12:00" entao
   escreva("Bom dia")
senao
   escreva("Boa tarde")
fimse
fimalgoritmo

Respostas Data Resposta: 3/27/2008 10:34:51 PM
Fábio Soares Rocha

Fabio Soares Rocha

RA813259-3

 

algoritmo "semnome"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var
hora:real
inicio
escreva("que horas são")
leia(hora)
se hora > 12 entao
escreva("Boa Tarde")
senao
escreva("Bom Dia")
fimse
fimalgoritmo

algoritmo "semnome"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var
time:literal
inicio
escreva("Qual é o seu TIME")
leia(time)
se time = "botafogo" entao
escreva("voce tem bom gosto")
senao
escreva("ainda tem tempo para ser BOTAFOGUENSE")
fimse
fimalgoritmo

 

algoritmo "semnome"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var
valor1,valor2,total:real
inicio
escreva("digite valor 1")
leia(valor1)
escreva("digite Valor 2")
leia(valor2)
total<-valor1+valor2
se total = 40 entao
escreva(40)
senao
escreva(total+75)
fimse
fimalgoritmo

 

algoritmo "semnome"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var
idade,total:real
inicio
escreva("qual a sua Idade")
leia(idade)
total<-idade*8760
se idade > 400 entao
escreva("Velhote")
senao
escreva("Garotinho")
fimse
fimalgoritmo

Respostas Data Resposta: 3/27/2008 10:35:14 PM
Douglas Messias Pereira

algoritmo "semnome"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
//escreva um alg que calcule quantas horas vc tem de vida.Setiver mais de 400 horas.entao escreva o valor da hora calculada somada com 400
// total de horas em um ano e igual a 8760
var
idade:real
horas:real
inicio
escreva("digite sua idade")
leia(idade)
horas<-(idade*8760)
se(horas>400)entao
horas<-(horas+400)
escreva(horas)
senao
escreva("novinho")
fimse

// Seção de Comandos
fimalgoritmo

 

algoritmo "semnome"algoritmo "semnome"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var
v1,v2:real
total:real
inicio
escreva("digite v1")
leia(v1)
escreva("digite v2")
leia(v2)
total<-(v1+v2)
se(total=40)entao
escreva(40)
senao
escreva(total+75)
fimse

// Seção de Comandos
fimalgoritmo

 

 

algoritmo "semnome"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var
time:literal
inicio
escreva("digite seu time")
leia(time)
se time="vasco"entao
escreva("campeao")
senao
escreva("perdedor")
fimse
// Seção de Comandos
fimalgoritmo

 

 

algoritmo "semnome"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var
hora:literal
inicio
escreva("digite a hora")
leia(hora)
se hora>="12:00" entao
escreva("boa tarde")
senao
escreva("bom dia")
fimse
// Seção de Comandos
fimalgoritmo

 

 

 

Respostas Data Resposta: 3/27/2008 10:36:30 PM
Gerhard Maurer

algoritmo "semnome"
// Função :
// Autor :Gerhard
// Data : 27/3/2008
// Seção de Declarações
var V1,V2,total:real

inicio
Escreva("digite V1: ")
Leia(v1)
Escreva("digite V2: ")
Leia(V2)
Total<-(v1 + V2)
Se (total=40) entao
Escreva("40")
Senao
escreva("total + 75")
Fimse
fimalgoritmo

 

algoritmo "semnome"
// Função :
// Autor :Gerhard Maurer
// Data : 27/3/2008
// Seção de Declarações
var time: literal

inicio
Escreva ("digite seu time: ")
Leia(time)
Se (time ="vasco") entao
Escreva("campeão")
Senao("perdedor")
fimse
fimalgoritmo

Respostas Data Resposta: 3/27/2008 10:37:59 PM
Rogério de Souza

algoritmo "SOMA"
// Função :
// Autor : rogério de souza
// Data : 27/3/2008
// Seção de Declarações
var
v1, v2, soma, soma2:real
inicio
escreva("valor 1 ")
leia(v1)
escreva("valor 2 ")
leia(v2)
soma<-(v1+v2)
se(soma<=40)entao
escreva("40")
senao
soma2<-(soma+75)
escreva(soma2)
fimse
// Seção de Comandos
fimalgoritmo



algoritmo "HORAS"
// Função :
// Autor : rogério de souza
// Data : 27/3/2008
// Seção de Declarações
var
I, T, T2: real
inicio
escreva("Digite a sua idade")
leia(I)
T<-(I*8760)
se(T>400)entao
T2<-(T+400)
escreva(T2)
senao
escreva("novinho")
fimse
// Seção de Comandos
fimalgoritmo


algoritmo "TIME"
// Função :
// Autor :rogério de souza
// Data : 27/3/2008
// Seção de Declarações
var
time, criciuma:literal
inicio
escreva("Digite seu time favorito ")
leia(time)
se(time = "criciuma")entao
escreva("CAMPEÂO")
senao
escreva("perdedor")
fimse
// Seção de Comandos
fimalgoritmo


algoritmo "HORAS"
// Função :
// Autor :rogério de souza
// Data : 27/3/2008
// Seção de Declarações
var
hora:real
inicio
escreva("Que horas são? ")
leia(hora)
se(hora>12)entao
escreva("boa tarde")
senao
escreva("bom dia")
fimse
// Seção de Comandos
fimalgoritmo

Respostas Data Resposta: 3/27/2008 10:38:55 PM
Márcio Salão Pinto

algoritmo "semnome"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
//escreva um alg que calcule quantas horas vc tem de vida.Setiver mais de 400 horas.entao escreva o valor da hora calculada somada com 400
// total de horas em um ano e igual a 8760
var
idade:real
horas:real
inicio
escreva("digite sua idade")
leia(idade)
horas<-(idade*8760)
se(horas>400)entao
horas<-(horas+400)
escreva(horas)
senao
escreva("novinho")
fimse

// Seção de Comandos
fimalgoritmo


algoritmo "semnome"algoritmo "semnome"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var
v1,v2:real
total:real
inicio
escreva("digite v1")
leia(v1)
escreva("digite v2")
leia(v2)
total<-(v1+v2)
se(total=40)entao
escreva(40)
senao
escreva(total+75)
fimse

// Seção de Comandos
fimalgoritmo

 

algoritmo "semnome"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var
time:literal
inicio
escreva("digite seu time")
leia(time)
se time="vasco"entao
escreva("campeao")
senao
escreva("perdedor")
fimse
// Seção de Comandos
fimalgoritmo


algoritmo "semnome"
// Função :
// Autor :
// Data : 27/3/2008
// Seção de Declarações
var
hora:literal
inicio
escreva("digite a hora")
leia(hora)
se hora>="12:00" entao
escreva("boa tarde")
senao
escreva("bom dia")
fimse
// Seção de Comandos
fimalgoritmo

Respostas Data Resposta: 3/27/2008 10:39:55 PM
José Paulo da Silveira

algoritmo "hora"
// Função :
// Autor : José Paulo da Silveira
// Data : 27/3/2008
// Seção de Declarações
var
hora:real
inicio
escreva("digite a hora")
leia(hora)
se (hora>=12) entao
escreva("boa tarde")
senao
escreva("bom dia")
fimse
// Seção de Comandos
fimalgoritmo

 

algoritmo "time"
// Função :
// Autor : José Paulo da Silveira
// Data : 27/3/2008
// Seção de Declarações
var
time, vasco:literal
inicio
escreva("seu time")
leia(time)
se (time="vasco") entao
escreva("campeão")
senao
escreva("perdedor")
fimse
// Seção de Comandos
fimalgoritmo

 

algoritmo "soma"
// Função :
// Autor : José Paulo da Silveira
// Data : 27/3/2008
// Seção de Declarações
var
v1, v2, total:real
inicio
escreva("digite valor 1 ")
leia(v1)
escreva("digite valor 2 ")
leia(v2)
total<-(v1+v2)
se (total=40) entao
escreva (40)
senao
escreva(total+75)
fimse
// Seção de Comandos
fimalgoritmo

 

algoritmo "idade"
// Função :
// Autor :  José Paulo da Silviera
// Data : 27/3/2008
// Seção de Declarações
var
idade, total, a:real
inicio
Escreva("digite sua idade")
Leia(idade)
Total<-(idade*8760)
se total>400 entao
a<-total+400
escreva(a)
senao
escreva ("novinho")
   fimse
fimalgoritmo

Respostas Data Resposta: 3/27/2008 11:33:18 PM
Rodrigo Henrique

algoritmo "exec 1"

var horas: real
idade: inteiro
inicio
   escreva("sua idade")
   leia(idade)
     horas<-idade*8760
   escreva(horas)
      se(horas>400)entao
         horas<-horas+400
      senao
         escreva("novinho(a)")
      fimse
fimalgoritmo

-------------------------------------

algoritmo "exec 2"

var a, b, total: real
inicio
   escreva("digite o valor a")
   leia(a)
   escreva("digite o valor b")
   leia(b)
     total<-a+b
       se(total<=40) entao
         escreva(40)
       senao
         total<-total+75
       fimse
fimalgoritmo

----------------------------------------------

algoritmo "exec 3"

var time: literal
inicio
   escreva("seu time: ")
   leia(time)
      se (time="gremio") entao
        escreva("campeao")
      senao
        escreva("perdedor")
      fimse
fimalgoritmo

----------------------------------------------

algoritmo "exec 4"

var hora: literal
inicio
   escreva("digite a hora: ")
   leia(hora)
      se (hora>="12:00") entao
        escreva("Boa tarde")
      senao
        escreva("Bom dia")
      fimse
fimalgoritmo

Respostas Data Resposta: 3/27/2008 11:44:58 PM
HELIO

algoritmo "IDADE"
// Função :
// Autor :
// Data : 27/03/2008
// Seção de Declarações
var
    ID, TOTAL:REAL
inicio
ESCREVA("DIGITE SUA IDADE:")
LEIA(ID)
TOTAL <- (24*365*ID)
SE TOTAL > 100000 ENTAO
ESCREVA ("TOTAL DE HORAS VIVIDAS:" )
ESCREVA(TOTAL)
ESCREVA(" VELHO")
SENAO
ESCREVA ("TOTAL DE HORAS VIVIDAS:")
ESCREVA(TOTAL)
ESCREVA(" NOVINHO")
FIMSE
fimalgoritmo

 

 

algoritmo "SOMA DE DOIS VALORES 40 OU +75"
// Função :
// Autor :
// Data : 27/03/2008
// Seção de Declarações
var
  S1,S2,SOMA: real
inicio
ESCREVA ("DIGITE UM VALOR:")
LEIA(S1)
ESCREVA ("DIGETE O SEGUNDO VALOR:")
LEIA(S2)
SOMA <-(S1+S2)
SE SOMA < 41 ENTAO
ESCREVA(40)
SENAO
SOMA<-SOMA + 75
ESCREVA(SOMA)

FIMSE;
fimalgoritmo

 

 

 

algoritmo "TIME"
// Função :
// Autor :
// Data : 27/03/2008
// Seção de Declarações
var
   TIME:LITERAL
inicio
ESCREVA("DIGITE SEU TIME: ")
LEIA(TIME)
SE TIME="PALMEIRAS" ENTAO
ESCREVA("MELHOR DO MUNDO")
SENAO
ESCREVA("ERRADO")
FIMSE
fimalgoritmo

Respostas Data Resposta: 3/27/2008 11:51:30 PM
Jovelino alves rocha

algoritmo "atividade 01"
// Função :
// Autor : jovelino
// Data : 27/3/2008
// Seção de Declarações
var
idade,hora,mes,total:real
inicio
escreva("Digite sua idade: ")
leia(idade)
escreva("Ha quantos meses foi seu ultimo aniversário? ")
leia(mes)
total<-(24*365*idade+24*30*mes)
se total>400 entao
total<-(total+400)
escreva(total)
senao
escreva("novinho(a)")
fimse
fimalgoritmo


algoritmo "atividade 02"
// Função :
// Autor : jovelino
// Data : 27/3/2008
// Seção de Declarações
var
n1,n2,soma:real
inicio
escreva("digite um numero: ")
leia(n1)
escreva("digite outro numero: ")
leia(n2)
soma<-n1+n2
se soma<=40 entao
escreva(40)
senao
escreva(soma+75)
fimse

fimalgoritmo

algoritmo "atividade 03"
// Função :
// Autor : jovelino
// Data : 27/3/2008
// Seção de Declarações
var
time:literal
inicio
escreva("seu time: ")
leia(time)
se time="flamengo" entao
escreva("CAMPEÃO")
senao
escreva("PERDEDOR")
FIMSE

fimalgoritmo

algoritmo "atividade 04"
// Função :
// Autor :  jovelino

// Data : 27/3/2008
// Seção de Declarações
var
hora:literal
inicio
escreva("digite a hora: ")
leia(hora)
se hora<="12:00" entao
escreva("Bom Dia!!!")
senao
escreva("Boa Tarde!!!")
fimse
fimalgoritmo

 

Respostas Data Resposta: 3/28/2008 12:47:00 AM
José Augusto Barbosa de Pinho Maurício,
Conforme conversamos na aula no laboratório, envio os arquivos, no meu computador de erro na postagem do evento.
................................................
Aluno: José Augusto Barbosa de Pinho - RA 655916-6 - Análise de Sistemas - ad1p30
................................................
Algoritmo "Programa Idade"
// Função : Cálculo de horas da idade
var
     id,total,a:real
inicio
escreval("Escreva sua idade: ")
leia(id)
       total<- (id*8760)
       se id>400 entao
          a<-total+400
          escreval(a, "horas")
       senao
            escreval("novinho")
       fimse
fimalgoritmo
..........................................................

algoritmo "Programa Cálculo"
// Função : Calcula 2 números
var
n1,n2,s:real
inicio
escreval("Digite um número")
leia(n1)
escreval("Digite um número")
leia(n2)
s<-(n1+n2)
          se s<=(40)entao
             escreval("40")
          senao
          escreval(s+75)
    fimse
fimalgoritmo
...............................................................................................
algoritmo "Programa Time"
// Função : reconhecimento
var
time:caracter
inicio
escreval("Digite seu time favorito:")
leia(time)
          se time = "vasco" entao
             escreval("Campeão")
          senao
               escreval("Perdedor")
          fimse
fimalgoritmo
................................................................
algoritmo "Programa Hora Cumprimento"
var
hora:real
inicio
escreval("Digite a hora:")
leia(hora)
          se hora>=(12)entao
             escreval("Boa Tarde")
          senao
             escreval("Bom dia")
          fimse
fimalgoritmo
Respostas Data Resposta: 3/28/2008 1:32:02 AM
Victor

algoritmo "horas"
// Função :
// Autor : Victor e Alba
// Data : 28/3/2008
// Seção de Declarações
var
hora:literal
inicio
      escreva("ha hora é:")
      leia(hora)
se(hora>="12:00")entao
      escreva("boa tarde")
senao
      escreva("bom dia")
fimse
fimalgoritmo


algoritmo "horas vividas"
// Função :
// Autor : Victor e Alba
// Data : 28/3/2008
// Seção de Declarações
var
horas,idade:inteiro
inicio
      escreva("sua idade é:")
      leia(idade)
      horas<-idade*8760)
se(horas>400)entao
      escreva("horas vividas e igual:",horas+400)
senao
      escreva("novinho")
fimse

// Seção de Comandos
fimalgoritmo


algoritmo "soma dois valores"
// Função :
// Autor : Victor e Alba
// Data : 28/3/2008
// Seção de Declarações
var
v1,v2,soma:real
inicio
      escreva("valor 1:")
      leia(v1)
      escreva("valor 2:")
      leia(v2)
      soma<-v1+v2
se(soma=40)entao
      escreva("40")
senao
      escreva("soma e igual ha:",soma+75)
fimse
fimalgoritmo


algoritmo "time"
// Função :
// Autor : Victor e Alba
// Data : 28/3/2008
// Seção de Declarações
var
time:literal
inicio
      escreva("seu time favorito:")
      leia(time)
se(time="cruzeiro")entao
      escreva("campeao")
senao
     escreva("perdedor")
fimse
fimalgoritmo

Respostas Data Resposta: 3/28/2008 3:42:08 PM
Paulo Henrique Barros de Almeida

algoritmo "horasvida+400"
// Função : Calcula horas de vida e soma 400 o escreve "novinho"
// Autor :  Paulo Henrique Barros de Almeida - RA 837804-5
// Data : 28/3/2008
// Seção de Declarações
var
idade, soma: real
inicio
escreval ("Digite a sua idade:")
Leia (idade)
soma <- (( 24 * 365 )* idade)
    se soma > 400 entao
    soma <- (soma + 400)
    escreval ("horas vividas + 400 é igual:", soma)
    senao
    escreval ("novinho")
    fimse
    // Seção de Comandos
fimalgoritmo

******************************************************

algoritmo "soma e escreve 40 ou add 75"
// Função : soma dois valores e escreve 40 ou adiciona 75
// Autor :  Paulo Henrique Barros de Almeida - RA 837804-5
// Data : 28/3/2008
// Seção de Declarações
var
v1, v2, total: real
inicio
escreval ("Digite o 1º valor:")
Leia (v1)
escreval ("Digite o 2º valor:")
Leia (v2)
total <- (v1 + v2)
    se total <= 40 entao
    escreval ("O total da soma é: 40")
    senao
    total <- total + 75
    escreval ("O tototal somado a 75 é:", total)
    fimse
    // Seção de Comandos
fimalgoritmo

**********************************************

algoritmo "escreve nome do time favorito campeão"
// Função : escreve o nome do time e diz se é ou não campeão
// Autor :  Paulo Henrique Barros de Almeida - RA 837804-5
// Data : 28/3/2008
// Seção de Declarações
var
fav : caractere
inicio
escreval ("Digite o nome do seu time favorito:")
Leia (fav)
    se fav = "Brasil" entao
    escreval ("Seu time favorito é o campeão")
    senao
    escreval ("Seu time é um grande perdedor")
    fimse
    // Seção de Comandos
fimalgoritmo

******************************************************

algoritmo "diz a hora e responde bom dia ou boa tarde"
// Função : diz a hora e responde bom dia ou boa tarde
// Autor :  Paulo Henrique Barros de Almeida - RA 837804-5
// Data : 28/3/2008
// Seção de Declarações
var
hora : literal
inicio
escreval ("Digite as horas:")
Leia (hora)
    se hora >= "12:00" entao
    escreval ("Boa Tarde!!!")
    senao
    escreval ("Bom Dia!!!")
    fimse
    // Seção de Comandos
fimalgoritmo

Respostas Data Resposta: 3/30/2008 5:29:01 PM
jerry adriane oliveira costa

algoritmo "semnome"
// Função : Soma
// Autor : Jerry - RA7728522
// Data : 29/3/2008
// Seção de Declarações
var v1,v2,total:real
inicio
 escreva("dgt v1 ")
leia(v1)
 escreva("dgt v2 ")
leia(v2)
total<-v1+v2
se total=40 entao
 escreva("o total é 40")
senao
total<-total+75
 escreva("o total + 75 é")
 escreva(total)
fimse
// Seção de Comandos
fimalgoritmo

##########################################

algoritmo "semnome"
// Função : Saudação
// Autor : Jerry
// Data : 30/3/2008
// Seção de Declarações
var
horas:literal
inicio
 escreva("dgt quantas horas ")
leia(horas)
se horas>"12"entao
 escreva("Boa tarde!")
senao
 escreva("Bom dia!")
fimse
// Seção de Comandos
fimalgoritmo

##########################################

algoritmo "semnome"
// Função : Teste de Q.I
// Autor : Jerry
// Data : 29/3/2008
// Seção de Declarações
var time:literal

inicio
 escreva("Qual o melhor time do mundo? ")
leia(time)
se(time<>"flamengo")entao
 escreva("É GOSTAR DE SOFRER!")
senao
 escreva("CAMPEÃO")
fimse
// Seção de Comandos
fimalgoritmo

###########################################

algoritmo "semnome"
// Função : É brincadeira
// Autor : Jerry
// Data : 29/3/2008
// Seção de Declarações
var idade,horas_vivida,novinho:real

inicio
 escreval("dgt sua idade")
leia(idade)
horas_vivida<-365*24
 escreva(horas_vivida)
 escreva(" horas de vida,")
se(horas_vivida>400)entao
 escreva(" 'velhinho'")
senao
 escreva(" novinho")
fimse
// Seção de Comandos
fimalgoritmo

Respostas Data Resposta: 3/31/2008 1:16:16 AM
Leandro Martins

Leandro Martins RA : 920414-8

Atividades da aula do dia 27/03

=========================================

(1)

algoritmo "Velhinho ou Novinho?"

// Função : Cálculo com condição

// Autor : Leandro Martins

// Data : 30/3/2008

// Seção de Declarações

var

I, D, H: real

inicio

// Seção de Comandos

Escreva ("Informe a sua idade: ")

Leia (I)

D <- I * 365;

H <- D * 24;

Se H > 100000 Entao

 Escreva("Você é velhinho, ")

Senao

 Escreva("Você é novinho, ")

FimSe

 Escreval ("viveu: ", H, " horas")

Fimalgoritmo

==========================================

(2)

algoritmo "Qual é o seu time?"

// Função : Determina uma condição

// Autor : Leandro Martins

// Data : 30/3/2008

// Seção de Declarações

var

time: Caractere

inicio

// Seção de Comandos

Escreva("Qual é o time de futebol que você torce?: ")

Leia (time)

Se time = "Vasco" Entao

 Escreva("Esse time é Campeão")

Senao

 Escreva("Credo! esse time é perdedor")

FimSe

Fimalgoritmo

=============================================

(3)

algoritmo "Condição entre valores"

// Função :  Somar dois valores e impor condição

// Autor :  Leandro Martins

// Data : 30/3/2008

// Seção de Declarações

var

X, Y, CALC: Real

inicio

// Seção de Comandos

Escreva ("Informe o primeiro valor: ")

Leia (X)

 Escreva ("Informe o segundo valor: ")

Leia (Y)

CALC <- X + Y;

Se CALC = 40 Entao

 Escreva("( 40 ) ")

Senao

CALC <- CALC + 75;

 Escreval("A soma dos valores, com a condição, é: ", CALC)

FimSe

 Escreval ("O resultado é: ", CALC)

Fimalgoritmo

=====================================================

(4)

algoritmo "Bom dia ou Boa tarde?"

// Função : Hora do dia com condição

// Autor : Leandro Martins

// Data : 30/3/2008

// Seção de Declarações

var

hora: literal

inicio

// Seção de Comandos

Escreva("Informe a hora atual (Ex.: 13:27): ")

Leia(hora)

Se hora >= "12:00" Entao

 Escreva("Boa tarde!!")

Senao

 Escreva ("Bom dia!!")

FimSe

Fimalgoritmo

=============================================================

Respostas Data Resposta: 3/31/2008 11:22:01 AM
Glauco Souza

algoritmo "Horas de vida"
// Função :CALCULE QUANT. DE HORAS DE VIDA, SE > Q 400 SOME 400
// Autor :GLAUCO SOUZA
// Data : 31/3/2008
// Seção de Declarações
var
idade, hsdv: inteiro

inicio
// Seção de Comandos
   escreva("DIGITE SUA IDADE:")
   leia(idade)
   hsdv <- (24 * 365)*idade
        se hsdv > 400 entao
           escreva (hsdv + 400)
        senao
             escreva("novinho")
        fimse
fimalgoritmo


// Função :SE SOMA = 40 ESCREVA 40 SENAO SOME 75
// Autor :GLAUCO SOUZA
// Data : 31/3/2008
// Seção de Declarações
var
valor1, valor2, somavalor: real

inicio
// Seção de Comandos
   escreva("DIGITE DOIS VALORES:")
   leia(valor1)
   leia(valor2)
   somavalor <- (valor1 + valor2)
        se somavalor <=40 entao
           escreva ("40")
        senao
             escreva(somavalor + 75)
        fimse
fimalgoritmo

algoritmo "Time favorito"
// Função :ESCREVA ALG. QUE PEDE SEU TIME
// Autor :GLAUCO SOUZA
// Data : 31/3/2008
// Seção de Declarações
var
TIME :LITERAL

inicio
// Seção de Comandos
   escreva("DIGITE SEU TIME FAVORITO:")
   leia(TIME)
        se TIME = "FLAMENGO" ENTAO
           escreva ("CAMPEAO")
        senao
             escreva("PERDEDOR")
        fimse
fimalgoritmo

algoritmo "Hora do dia"
// Função :SE HORA >= 12:00hs ESCREVA BOM DIA OU BOA NOITE
// Autor :GLAUCO SOUZA
// Data : 31/3/2008
// Seção de Declarações
var
HORA :REAL

inicio
// Seção de Comandos
   escreva("DIGITE A HORA:")
   leia(HORA)
        se HORA >= 12 ENTAO
           escreva ("BOA TARDE")
        senao
             escreva("BOM DIA")
        fimse
fimalgoritmo

Respostas Data Resposta: 3/31/2008 4:25:02 PM
ALESSANDRO SANTOS MACEDO

ALESSANDRO SANTOS MACEDO

AD1P30

RA 917728-0

algoritmo "QUESTAO 1"
// Função :
// Autor :
// Data : 31/3/2008
// Seção de Declarações
var
hora:literal


inicio
escreva ("hora")
leia (hora)
     se hora <"12:00" entao
escreva ("bom dia")
        senao
        escreva ("boa tarde")
        fimse

// Seção de Comandos
fimalgoritmo

algoritmo "QUESTAO 2"
// Função :
// Autor :
// Data : 31/3/2008
// Seção de Declarações
var
n1,n2,total:real

inicio
escreva ("n1 ")
leia (n1)
escreva ("n2 ")
leia (n2)
total <-(n1+n2)
se total <= 40 entao
escreva ("40")
senao
total <- total+75
escreva (total)
fimse

// Seção de Comandos
fimalgoritmo

 

algoritmo "questao 3"
// Função :
// Autor :
// Data : 31/3/2008
// Seção de Declarações
var
time:literal

inicio

escreval("time")
leia (time)
se time="vasco" entao
escreva ("campeão")
senao
escreva ("perdedor")
fimse
// Seção de Comandos
fimalgoritmo

algoritmo "questao 4"
// Função :
// Autor :
// Data : 31/3/2008
// Seção de Declarações
var
idade,horas,total:real

inicio
escreval("idade")
leia(idade)
total <-idade*8760
se horas<400 entao
escreva (total+400)
escreva ("novinho(a)")
fimse
// Seção de Comandos
fimalgoritmo

Respostas Data Resposta: 4/4/2008 12:40:58 AM
zenália gomes
Zenália Gomes Saraiva   RA 716428-9



algoritmo "tempo"
// Função :
// Autor :
// Data : 1/4/2008
// Seção de Declarações
var idade,total:real

inicio
escreva("digite sua idade")
leia(idade)
total<-(idade*8760)

se(total > 400) entao
     escreval("novo")
senao
     escreval("velho")
fimse

escreval("voce viveu ",total," horas")

fimalgoritmo


__________________________

algoritmo "soma"
// Função :
// Autor :
// Data : 1/4/2008
// Seção de Declarações
var valor1,valor2,total:real

inicio
escreva("digite o valor 1")
leia(valor1)
escreva("digite o valor 2")
leia(valor2)
total<-(valor1+valor2)
se(total=40)entao
    escreval("igual a 40")
senao
    total<-total+75
fimse

escreval("soma",total)

fimalgoritmo


___________________________




algoritmo "jogo"
// Função :
// Autor :
// Data : 3/4/2008
// Seção de Declarações
var time:literal

inicio
escreva("qual o seu time favorito")
leia(time)
se(time="flamengo")entao
   escreva("campeão")
senao
   escreva("perdedor")
fimse

fimalgoritmo



____________________________


algoritmo "hora"
// Função :
// Autor :
// Data : 3/4/2008
// Seção de Declarações
var hora:inteiro

inicio
escreva("digite a hora ")
leia(hora)
se(hora<12)entao
   escreval("bom dia")
senao
   escreval("boa tarde")
fimse

fimalgoritmo
Respostas Data Resposta: 4/4/2008 10:34:33 AM
Anderson Santana Rosa

algoritmo "Média de horas no computado por ano"

Autor : Anderson Santana Rosa

Data : 29/3/2008

var

nome:literal

horas,media:real

inicio

escreva("digite seu nome ")

leia(nome)

escreva("Quantas horas você fica no computador ")

leia(horas)

media<-(horas*365)

escreva(nome," este ano você ficou",media," horas no computador ")

fimalgoritmo

 

algoritmo ?Horas trabalhadas?

Autor :Anderson Santana Rosa

Data : 29/3/2008

var

v1,v2,v3,v4,v5,v6,v7,soma,media:real

inicio

escreva("digite quantas horas você trabalhou na segunda-feira  ")

leia(v1)

escreva("digite quantas horas você trabalhou na terça-feira  ")

leia(v2)

escreva("digite quantas horas você trabalhou na quarta-feira  ")

leia(v3)

escreva("digite quantas horas você trabalhou na quinta-feira  ")

leia(v4)

escreva("digite quantas horas você trabalhou na sexta-feira  ")

leia(v5)

escreva("digite quantas horas você trabalhou no sábado  ")

leia(v6)

escreva("digite quantas horas você trabalhou no domingo  ")

leia(v7)

soma<-(v1+v2+v3+v4+v5+v6+v7)

escreva("Você trabalhou ",soma," por semana")

fimalgoritmo

 

algoritmo ? Média da conta de energia?

Autor : Anderson Santana Rosa

Data : 29/3/2008

var

v1,v2,v3,v4,v5,v6,v7,v8,v9,v10,v11,v12,soma,media:real

inicio

escreva("digite o valor da 1ª conta  ")

leia(v1)

escreva("digite o valor da 2ª conta  ")

leia(v2)

escreva("digite o valor da 3ª conta  ")

leia(v3)

escreva("digite o valor da 4ª conta  ")

leia(v4)

escreva("digite o valor da 5ª conta  ")

leia(v5)

escreva("digite o valor da 6ª conta  ")

leia(v6)

escreva("digite o valor da 7ª conta  ")

leia(v7)

escreva("digite o valor da 8ª conta  ")

leia(v8)

escreva("digite o valor da 9ª conta  ")

leia(v9)

escreva("digite o valor da 10ª conta  ")

leia(v10)

escreva("digite o valor da 11ª conta  ")

leia(v11)

escreva("digite o valor da 12ª conta  ")

leia(v12)

soma<-(v1+v2+v3+v4+v5+v6+v7+v8+v9+v10+v11+v12)

media<-(soma/12)

escreva("À media do seu consumo de energia anual é de ",media)

fimalgoritmo

 

algoritmo ?Média salarial?

Autor : Anderson Santana Rosa

Data : 29/3/2008

var

v1,v2,v3,v4,v5,v6,v7,v8,v9,v10,v11,v12,soma,media:real

inicio

escreva("digite o valor do seu 1º salário   ")

leia(v1)

escreva("digite o valor do seu 2º salário   ")

leia(v2)

escreva("digite o valor do seu 3º salário   ")

leia(v3)

escreva("digite o valor do seu 4º salário   ")

leia(v4)

escreva("digite o valor do seu 5º salário   ")

leia(v5)

escreva("digite o valor do seu 6º salário   ")

leia(v6)

escreva("digite o valor do seu 7º salário   ")

leia(v7)

escreva("digite o valor do seu 8º salário   ")

leia(v8)

escreva("digite o valor do seu 9º salário   ")

leia(v9)

escreva("digite o valor do seu 10º salário  ")

leia(v10)

escreva("digite o valor do seu 11º salário  ")

leia(v11)

escreva("digite o valor do seu 12º salário  ")

leia(v12)

soma<-(v1+v2+v3+v4+v5+v6+v7+v8+v9+v10+v11+v12)

media<-(soma/12)

escreva("À media do seu salário anual é de ",media)

fimalgoritmo

 

algoritmo ?Qual a sua idade?

Autor : Anderson Santana Rosa

Data : 29/3/2008

var

idade,total:inteiro

inicio

escreva("Qual é a sua idade  ")

leia(idade)

total<-(idade*365*24)

escreva("Você viveu ",total," horas")

fimalgoritmo

 

algoritmo "soma"

Autor : Anderson Santana Rosa

Data : 29/3/2008

var

v1,v2,total:real

inicio

escreva("digite o primeiro valor  ")

leia(v1)

escreva("digite o segundo valor  ")

leia(v2)

total<-(v1+v2)

escreva(total)

fimalgoritmo

 

algoritmo "Soma de dois nº"

Autor : Anderson Santana Rosa

Data : 28/3/2008

var

v1,v2,total,soma:real

inicio

escreva("digite o primeiro valor  ")

leia(v1)

escreva("digite o segundo valor  ")

leia(v2)

total<-(v1+v2)

se(total=40)entao

escreva(" 40 ")

senao

soma<-(total+75)

escreva(soma)

fimse

fimalgoritmo

 

algoritmo "primeiro X segundo"

Autor : Anderson Santana Rosa

Data : 29/3/2008

var

v1,v2,total:real

inicio

escreva("digite o primeiro valor  ")

leia(v1)

escreva("digite o segundo valor  ")

leia(v2)

total<-(v1*v2)

escreva(total)

fimalgoritmo

 

algoritmo "time favorito"

Autor : Anderson Santana Rosa

Data : 28/3/2008

var

time,argentina:literal

inicio

escreva(" qual é o seu time favorito ")

leia(time)

se(time="argentina")entao

escreva(" ____campeão____ ")

senao

escreva(" ____perdedor___")

fimse

fimalgoritmo

 

algoritmo "horas em vida"

Autor : Anderson Santana rosa

Data : 28/3/2008

var

anos,total,dias:real

inicio

escreva("digite sua idade  ")

leia(anos)

se(anos>0)entao

total<-(anos*365*24)

escreva("você teve ",total, " horas de vida seu velho")

fimalgoritmo

senao

escreva("digite quantos dias de vida  ")

leia(dias)

total<-(dias*24)

fimse

se(total>400)entao

escreva("você teve ",total, " horas de vida seu velho")

fimalgoritmo

senao

escreva(" você é um bebe novinho de ",total," horas de vida")

fimse

fimalgoritmo

 

algoritmo "Informe as horas"

Autor : Anderson Santana Rosa

Data : 29/3/2008

var

horas:literal

inicio

escreva(" Que horas são?  ")

leia(horas)

se(horas>="12:00")entao

escreva("_____Boa tarde____")

senao

escreva("______Bom dia______")

fimse

fimalgoritmo

Respostas Data Resposta: 4/4/2008 10:34:34 AM
Anderson Santana Rosa

algoritmo "Média de horas no computado por ano"

Autor : Anderson Santana Rosa

Data : 29/3/2008

var

nome:literal

horas,media:real

inicio

escreva("digite seu nome ")

leia(nome)

escreva("Quantas horas você fica no computador ")

leia(horas)

media<-(horas*365)

escreva(nome," este ano você ficou",media," horas no computador ")

fimalgoritmo

 

algoritmo ?Horas trabalhadas?

Autor :Anderson Santana Rosa

Data : 29/3/2008

var

v1,v2,v3,v4,v5,v6,v7,soma,media:real

inicio

escreva("digite quantas horas você trabalhou na segunda-feira  ")

leia(v1)

escreva("digite quantas horas você trabalhou na terça-feira  ")

leia(v2)

escreva("digite quantas horas você trabalhou na quarta-feira  ")

leia(v3)

escreva("digite quantas horas você trabalhou na quinta-feira  ")

leia(v4)

escreva("digite quantas horas você trabalhou na sexta-feira  ")

leia(v5)

escreva("digite quantas horas você trabalhou no sábado  ")

leia(v6)

escreva("digite quantas horas você trabalhou no domingo  ")

leia(v7)

soma<-(v1+v2+v3+v4+v5+v6+v7)

escreva("Você trabalhou ",soma," por semana")

fimalgoritmo

 

algoritmo ? Média da conta de energia?

Autor : Anderson Santana Rosa

Data : 29/3/2008

var

v1,v2,v3,v4,v5,v6,v7,v8,v9,v10,v11,v12,soma,media:real

inicio

escreva("digite o valor da 1ª conta  ")

leia(v1)

escreva("digite o valor da 2ª conta  ")

leia(v2)

escreva("digite o valor da 3ª conta  ")

leia(v3)

escreva("digite o valor da 4ª conta  ")

leia(v4)

escreva("digite o valor da 5ª conta  ")

leia(v5)

escreva("digite o valor da 6ª conta  ")

leia(v6)

escreva("digite o valor da 7ª conta  ")

leia(v7)

escreva("digite o valor da 8ª conta  ")

leia(v8)

escreva("digite o valor da 9ª conta  ")

leia(v9)

escreva("digite o valor da 10ª conta  ")

leia(v10)

escreva("digite o valor da 11ª conta  ")

leia(v11)

escreva("digite o valor da 12ª conta  ")

leia(v12)

soma<-(v1+v2+v3+v4+v5+v6+v7+v8+v9+v10+v11+v12)

media<-(soma/12)

escreva("À media do seu consumo de energia anual é de ",media)

fimalgoritmo

 

algoritmo ?Média salarial?

Autor : Anderson Santana Rosa

Data : 29/3/2008

var

v1,v2,v3,v4,v5,v6,v7,v8,v9,v10,v11,v12,soma,media:real

inicio

escreva("digite o valor do seu 1º salário   ")

leia(v1)

escreva("digite o valor do seu 2º salário   ")

leia(v2)

escreva("digite o valor do seu 3º salário   ")

leia(v3)

escreva("digite o valor do seu 4º salário   ")

leia(v4)

escreva("digite o valor do seu 5º salário   ")

leia(v5)

escreva("digite o valor do seu 6º salário   ")

leia(v6)

escreva("digite o valor do seu 7º salário   ")

leia(v7)

escreva("digite o valor do seu 8º salário   ")

leia(v8)

escreva("digite o valor do seu 9º salário   ")

leia(v9)

escreva("digite o valor do seu 10º salário  ")

leia(v10)

escreva("digite o valor do seu 11º salário  ")

leia(v11)

escreva("digite o valor do seu 12º salário  ")

leia(v12)

soma<-(v1+v2+v3+v4+v5+v6+v7+v8+v9+v10+v11+v12)

media<-(soma/12)

escreva("À media do seu salário anual é de ",media)

fimalgoritmo

 

algoritmo ?Qual a sua idade?

Autor : Anderson Santana Rosa

Data : 29/3/2008

var

idade,total:inteiro

inicio

escreva("Qual é a sua idade  ")

leia(idade)

total<-(idade*365*24)

escreva("Você viveu ",total," horas")

fimalgoritmo

 

algoritmo "soma"

Autor : Anderson Santana Rosa

Data : 29/3/2008

var

v1,v2,total:real

inicio

escreva("digite o primeiro valor  ")

leia(v1)

escreva("digite o segundo valor  ")

leia(v2)

total<-(v1+v2)

escreva(total)

fimalgoritmo

 

algoritmo "Soma de dois nº"

Autor : Anderson Santana Rosa

Data : 28/3/2008

var

v1,v2,total,soma:real

inicio

escreva("digite o primeiro valor  ")

leia(v1)

escreva("digite o segundo valor  ")

leia(v2)

total<-(v1+v2)

se(total=40)entao

escreva(" 40 ")

senao

soma<-(total+75)

escreva(soma)

fimse

fimalgoritmo

 

algoritmo "primeiro X segundo"

Autor : Anderson Santana Rosa

Data : 29/3/2008

var

v1,v2,total:real

inicio

escreva("digite o primeiro valor  ")

leia(v1)

escreva("digite o segundo valor  ")

leia(v2)

total<-(v1*v2)

escreva(total)

fimalgoritmo

 

algoritmo "time favorito"

Autor : Anderson Santana Rosa

Data : 28/3/2008

var

time,argentina:literal

inicio

escreva(" qual é o seu time favorito ")

leia(time)

se(time="argentina")entao

escreva(" ____campeão____ ")

senao

escreva(" ____perdedor___")

fimse

fimalgoritmo

 

algoritmo "horas em vida"

Autor : Anderson Santana rosa

Data : 28/3/2008

var

anos,total,dias:real

inicio

escreva("digite sua idade  ")

leia(anos)

se(anos>0)entao

total<-(anos*365*24)

escreva("você teve ",total, " horas de vida seu velho")

fimalgoritmo

senao

escreva("digite quantos dias de vida  ")

leia(dias)

total<-(dias*24)

fimse

se(total>400)entao

escreva("você teve ",total, " horas de vida seu velho")

fimalgoritmo

senao

escreva(" você é um bebe novinho de ",total," horas de vida")

fimse

fimalgoritmo

 

algoritmo "Informe as horas"

Autor : Anderson Santana Rosa

Data : 29/3/2008

var

horas:literal

inicio

escreva(" Que horas são?  ")

leia(horas)

se(horas>="12:00")entao

escreva("_____Boa tarde____")

senao

escreva("______Bom dia______")

fimse

fimalgoritmo

Respostas Data Resposta: 4/4/2008 4:35:18 PM
Ramon Ferreira da Silva Segue conforme sugerido...
Ramon, RA.: 780513-6,  Turma de GR.



algoritmo "hs d vida condições"
// Função :
// Autor :Ramon
// Data : 04/04/2008
// Seção de Declarações
var
i,t:real
inicio
escreval("Programa para calcular horas de vida condicionada.")
escreval("Digite sua idade:")
leia(i)
t <- (i*8760)
se(t>400) entao
escreval(t+400)
senao
escreval("novinho(a).")
fimse
fimalgoritmo
// Seção de Comandos
fimalgoritmo


------------------------------------------------------------------------

algoritmo "soma"
// Função :
// Autor :Ramon
// Data : 04/04/2008
// Seção de Declarações
var
a,b,p:real
inicio
escreva ("entre com valor 1:")
leia(a)
escreval("entre com valor 2:")
leia(b)
p <- (a+b)
se(p <=40)entao
escreva("40")
senao
escreva(p+75)
fimse
// Seção de Comandos
fimalgoritmo


---------------------------------------------------------------------------

algoritmo "time do coração"
// Função :
// Autor :Ramon
// Data : 04/04/2008
// Seção de Declarações
var
time:literal
inicio
escreva ("Qual Seu time Favorito:")
leia(time)
se(time = "Flamengo")entao
escreva("Penta Campeão")
senao
escreva("Time Fraco")
fimse
// Seção de Comandos
fimalgoritmo


--------------------------------------------------------------------------

algoritmo "Cortesia"
// Função :
// Autor :Ramon
// Data : 04/04/2008
// Seção de Declarações
var
w:literal
inicio
escreval("Digite a hora")
leia(w)
se(w <="12:00")entao
escreva("Bom dia")
senao
escreva("Boa tarde")
fimse
// Seção de Comandos
fimalgoritmo


------------------------------------------------------------------------
Respostas Data Resposta: 4/7/2008 2:49:42 PM
Karla Raquel Dias Algoritmo 1
Var
 Idade:Real
 Horas:Real

Inicio

   Escreva('sua idade)
   Leia (idade)
   Horas<-idade *8760
 Se(horas>400)
   Horas<-(horas+400)
   Escreva (horas)
 Senao
   Escreva ('novinho (a)')
 fimse
fimalgoritmo.

_________________

Algoritmo 2
Var
Horas:literal

Inicio
   Escreva ('digite hora')
   Leia (hora)
 Se horas>='12:00' entao
   Escreva ('boa tarde')
 Senao
   Escreva ('bom dia')
 fimse
fimalgoritmo

______________________

Algoritmo 3

Var
time favorito:literal

Inicio
   Escreva('digite time favorito')
   Leia (time favorito)
 Se (timefavorito='flamengo' ) entao
   Escreva ('campeao')
 Senao
   Escreva('nenhum melhor que flamengo')
 fimse
fimalgoritmo

______________________

Algoritmo 4

Var
v1 e v2 :real
soma:real

Inicio
    Escreva ('digite v1')
    Leia (v1)
    Escreva ('digite v2')
    Leia (v2)
    soma<-v1+v2
 Se (soma=40) entao
    Escreva('40')
 Senao
    soma<-soma+75
    Escreva('a soma é', soma)
 fimse
    Escreval('o resultado soma e'soma)
fimalgoritmo
__________________


Respostas Data Resposta: 4/18/2008 11:03:42 PM
Mauricio Junior Espero que tenha entendido e não só copiado.
Respostas Data Resposta: 4/18/2008 11:04:50 PM
Ericson Flavio Borges Monteiro

1

// Função :  Calcular as horas vividas com condicão
// Autor :  Ericson Flavio B. Monteiro
// Data : 27/3/2008
// Seção de Declarações
var
idade, dias, horas: real
inicio
escreva ("Digite sua idade: ")
leia (idade)
dias <- idade * 365;
horas <- dias * 24;
se horas > 400 entao
   escreval("velhinho")
senao
   escreva("novinho")
fimse
   escreval ("Seu total de horas vividas e: ", horas)
fimalgoritmo

__________________________________

2

algoritmo "Times"
// Função : Time do Coracao
// Autor : Ericson Flavio B. Monteiro
// Data : 27/3/2008
// Seção de Declarações
var
time: caractere
inicio
escreva("digite o nome do seu time: ")
leia (time)
se time = "..." entao
   escreva("Campeão")
senao
   escreva("Perdedor")
fimse
fimalgoritmo

____________________________________

3

algoritmo "Numeros"
// Função :  Somar dois numeros com condicao
// Autor :  Ericson Flavio B. Monteiro
// Data : 27/3/2008
// Seção de Declarações
var
valor1, valor2, soma: real
inicio
escreva ("digite o valor 1: ")
leia (valor1)
escreva ("digite o valor 2: ")
leia (valor2)
soma <- valor1 + valor2;
se soma = 40 entao
   escreva("40")
senao
     soma <- soma + 75;
     escreval("A soma é: ", soma)
fimse
escreval ("O resultado da soma e: ", soma)
fimalgoritmo

___________________________

4

algoritmo "Bom dia, tarde e noite"
// Função : Hora do dia com condicao
// Autor : Ericson Flavio B. Monteiro
// Data : 27/3/2008
// Seção de Declarações
var
hora: literal
inicio
escreva("digite a hora atual: ")
leia(hora)
se hora >= "12:00" entao
   escreva("Boa Tarde")
senao
   escreva ("Bom dia")
fimse
fimalgoritmo

Respostas Data Resposta: 4/18/2008 11:21:57 PM
Mauricio Junior Espero que tenha entendido e não só copiado.
Respostas Data Resposta: 4/24/2008 9:54:06 PM
carlos

algoritmo "horas de vida"
// Função :informar quantas horas temos de vida
// Autor :Carlos Augusto RA7800231
// Data : 04/04/2008
// Seção de Declarações
var
idade, total: inteiro

inicio
// Seção de Comandos
escreva ("Qual a sua idade atual? ")
leia (idade)
total <- idade * 8760
escreval ("você tem ",total, " horas vividas.")
fimalgoritmo

algoritmo "soma de valores"
// Função :somar dois números
// Autor :Carlos Augusto RA 780231
// Data : 04/04/2008
// Seção de Declarações
var
v1,v2,total:real
inicio
// Seção de Comandos
escreva ("digite o primeiro valor ")
leia (v1)
escreva ("digite o segundo valor ")
leia (v2)
total <- (v1+v2)
escreval ("a soma de dois valores é nada mais nada menos que: ",total)
fimalgoritmo

algoritmo "classificaçao de times"
// Função :dar qualidades aos times
// Autor : carlos augusto mendonça da silva RA 7800231
// Data : 04/04/2008
// Seção de Declarações
var
time: caractere
classificacao : caractere

inicio
// Seção de Comando
escreva ("qual seu time? ")
leia (time)
se time = "vasco" entao
escreval ("timão")
         senao
         escreval ("perna de pau")
 fimse
fimalgoritmo

algoritmo "saudação"
// Função :informar qual saudação usada de acordo com a hora do dia.
// Autor : carlos augusto augusto mendonça da silva RA 7800231
// Data : 04/04/2008
// Seção de Declarações
var
saudacao : caractere
horas : inteiro
inicio
// Seção de Comandos
 Escreva("que horas são? ")
 Leia (horas)
 Escolha horas
 caso 1,2,3,4,5,6,7,8,9,10,11,12
 saudacao <- ("bom dia")
 caso 13,14,15,16,17,18
 saudacao <- "boa tarde"
 caso 19,20,21,22,23,24
 saudacao <- "boa noite"
  outrocaso
 saudacao <-"troque seu relógio"
 Fimescolha
 Escreva ("a saudação usada é: ",saudacao)

fimalgoritmo

Respostas Data Resposta: 4/24/2008 9:56:23 PM
carlos

algoritmo "horas de vida"
// Função :informar quantas horas temos de vida
// Autor :Carlos Augusto RA7800231
// Data : 04/04/2008
// Seção de Declarações
var
idade, total: inteiro

inicio
// Seção de Comandos
escreva ("Qual a sua idade atual? ")
leia (idade)
total <- idade * 8760
escreval ("você tem ",total, " horas vividas.")
fimalgoritmo

algoritmo "soma de valores"
// Função :somar dois números
// Autor :Carlos Augusto RA 780231
// Data : 04/04/2008
// Seção de Declarações
var
v1,v2,total:real
inicio
// Seção de Comandos
escreva ("digite o primeiro valor ")
leia (v1)
escreva ("digite o segundo valor ")
leia (v2)
total <- (v1+v2)
escreval ("a soma de dois valores é nada mais nada menos que: ",total)
fimalgoritmo

algoritmo "classificaçao de times"
// Função :dar qualidades aos times
// Autor : carlos augusto mendonça da silva RA 7800231
// Data : 04/04/2008
// Seção de Declarações
var
time: caractere
classificacao : caractere

inicio
// Seção de Comando
escreva ("qual seu time? ")
leia (time)
se time = "vasco" entao
escreval ("timão")
         senao
         escreval ("perna de pau")
 fimse
fimalgoritmo

algoritmo "saudação"
// Função :informar qual saudação usada de acordo com a hora do dia.
// Autor : carlos augusto augusto mendonça da silva RA 7800231
// Data : 04/04/2008
// Seção de Declarações
var
saudacao : caractere
horas : inteiro
inicio
// Seção de Comandos
 Escreva("que horas são? ")
 Leia (horas)
 Escolha horas
 caso 1,2,3,4,5,6,7,8,9,10,11,12
 saudacao <- ("bom dia")
 caso 13,14,15,16,17,18
 saudacao <- "boa tarde"
 caso 19,20,21,22,23,24
 saudacao <- "boa noite"
  outrocaso
 saudacao <-"troque seu relógio"
 Fimescolha
 Escreva ("a saudação usada é: ",saudacao)

fimalgoritmo

Respostas Data Resposta: 4/24/2008 10:15:55 PM
RICARDO

1º exercício

algoritmo "CalculoHosrasVida"

// Função : Calcular o quantidade de horas de vida se esta >400

// Autor : 884509-3 - Ricardo Santos Gomes

// Data : 24/04/2008

var

idade, totalHoras: real

inicio

escreva("Informe sua idade: ")

leia(idade)



totalHoras <- ((idade*365)*24)

se totalHoras > 400 entao

escreval("O total de horas +400 = ", totalHoras+400)

senao

escreval("novinho")

fimse

fimalgoritmo





2º exercício

algoritmo "Soma"
// Função : Somar dois valores e ver se é menor ou igual 40
// Autor : 884509-3 - Ricardo Santos Gomes
// Data : 24/04/2008

var
v1,v2,soma: real

inicio
escreva ("Digite o primeiro valor ")
leia(v1)
escreva ("Digite o segundo valor ")
leia (v2)

soma <-v1+v2

se soma > 40 entao
escreva ("Valor da soma +75 = ", soma+75)
senao

escreva ("40")
fimse

fimalgoritmo



3º exercício

algoritmo "time"
// Função : Verifica se vc torce direito
// Autor : 884509-3 - Ricardo Santos Gomes
// Data : 24/04/2008

var
time:caractere

inicio
escreva (?Qual he o seu time ")
leia(time)

se time = "abc" entao
escreva ("HE CAMPEÃO!!!!!")
senao
escreva ("PERDEDOR, MUDA PRO ABC!!!!")
fimse

fimalgoritmo



4º exercício

algoritmo "Saudacao"
// Função : Verifica se he bom dia ou boa tarde
// Autor : 884509-3 - Ricardo Santos Gomes
// Data : 24/04/2008

var
hora :real

inicio
escreva ("Que horas sao: ")
leia (hora)


se hora >=12 entao
escreva ("Boa tarde!")
senao
escreva ("Boa dia!")
fimse

fimalgoritmo


Respostas Data Resposta: 4/24/2008 10:30:20 PM
carlos

algoritmo "horas de vida"
// Função :informar quantas horas temos de vida
// Autor :Carlos Augusto RA7800231
// Data : 04/04/2008
// Seção de Declarações
var
idade, total: inteiro

inicio
// Seção de Comandos
escreva ("Qual a sua idade atual? ")
leia (idade)
total <- idade * 8760
escreval ("você tem ",total, " horas vividas.")
fimalgoritmo

algoritmo "soma de valores"
// Função :somar dois números
// Autor :Carlos Augusto RA 780231
// Data : 04/04/2008
// Seção de Declarações
var
v1,v2,total:real
inicio
// Seção de Comandos
escreva ("digite o primeiro valor ")
leia (v1)
escreva ("digite o segundo valor ")
leia (v2)
total <- (v1+v2)
escreval ("a soma de dois valores é nada mais nada menos que: ",total)
fimalgoritmo

algoritmo "classificaçao de times"
// Função :dar qualidades aos times
// Autor : carlos augusto mendonça da silva RA 7800231
// Data : 04/04/2008
// Seção de Declarações
var
time: caractere
classificacao : caractere

inicio
// Seção de Comando
escreva ("qual seu time? ")
leia (time)
se time = "vasco" entao
escreval ("timão")
         senao
         escreval ("perna de pau")
 fimse
fimalgoritmo

algoritmo "saudação"
// Função :informar qual saudação usada de acordo com a hora do dia.
// Autor : carlos augusto augusto mendonça da silva RA 7800231
// Data : 04/04/2008
// Seção de Declarações
var
saudacao : caractere
horas : inteiro
inicio
// Seção de Comandos
 Escreva("que horas são? ")
 Leia (horas)
 Escolha horas
 caso 1,2,3,4,5,6,7,8,9,10,11,12
 saudacao <- ("bom dia")
 caso 13,14,15,16,17,18
 saudacao <- "boa tarde"
 caso 19,20,21,22,23,24
 saudacao <- "boa noite"
  outrocaso
 saudacao <-"troque seu relógio"
 Fimescolha
 Escreva ("a saudação usada é: ",saudacao)

fimalgoritmo

Respostas Data Resposta: 4/24/2008 11:25:23 PM
Heitor Santos

algoritmo "horas"

// Autor : Heitor Santos

// Turma: GR1P30

// Data : 24/4/2008

 

var

 horas, idade: inteiro

 

inicio

  escreva("informe sua idade em anos: ")

  leia(idade)

  horas<-(idade*8760)

  se horas>400 entao

   escreval("horas= ", (horas+400))

  senao

   escreva("Novinho")

  fimse

fimalgoritmo

_____________________________________________

 

algoritmo "soma"

// Autor : Heitor Santos

// Turma: GR1P30

// Data : 24/4/2008

 

var

 valor1, valor2, total: real

 

inicio

 escreva("Informe o primeiro número da soma: ")

 leia(valor1)

 escreva("Informe o segundo número da soma: ")

 leia(valor2)

 total<-(valor1+valor2)

 se total<=40 entao

  escreva("total=40")

 senao

  escreval("total+75=",total+75)

 fimse

fimalgoritmo

_______________________________________________

 

algoritmo "times"

// Autor : Heitor Santos

// Turma: GR1P30

// Data : 24/4/2008

 

var

 time: literal

 

inicio

 escreva("Informe qual seu time: ")

 leia(time)

 se time="Palmeiras" entao

  escreva("Supercampeão")

 senao

  escreval(time, " é um timeco")

 fimse

fimalgoritmo

____________________________________________

 

algoritmo "horas"

// Autor : Heitor Santos

// Turma: GR1P30

// Data : 24/4/2008

 

var

 hora: inteiro

 

inicio

 escreva("Informe as horas (sem minutos): ")

 leia(hora)

 se hora>=12 entao

  escreva("Boa Tarde")

 senao

  escreval("Bom Dia")

 fimse

fimalgoritmo

Respostas Data Resposta: 4/25/2008 10:32:45 AM
RICARDO Correção do exercício 3.

Por algum motivo ao copiar e colar, ou talvez por desatenção , na linha 10 do 3o exercício, foi trocado o " " " por " ? ", por isso, republico a seguir:

algoritmo "time"
// Função : Verifica se vc torce direito
// Autor : 884509-3 - Ricardo Santos Gomes
// Data : 25/04/2008

var
time:caractere

inicio

escreva ("Qual he o seu time ")
leia(time)

se time = "abc" entao
escreva ("HE CAMPEÃO!!!!!")
senao
escreva ("PERDEDOR, MUDA PRO ABC!!!!")
fimse

fimalgoritmo
Respostas Data Resposta: 4/25/2008 11:00:08 AM
FRANCISCO JONILDO SILVA LIMA

____________________________________________________

algoritmo "HORAS QUE VC VIVEU"
// Função :
// Autor :
// Data : 14/3/2008
// Seção de Declarações
var
IDADE, HsV: INTEIRO
inicio
ESCREVA("DIGITE A SUA IDADE: ")
LEIA(IDADE)
HsV<-(24*365)*IDADE
ESCREVA("VOCÊ JA VIVEU: ", HsV," HORAS")
// Seção de Comandos
fimalgoritmo

____________________________________________________

algoritmo "SOMAR DOIS VALORES"
// Função :
// Autor :
// Data : 14/3/2008
// Seção de Declarações
var  V1, V2, TOTAL: REAL

inicio
ESCREVA ("DIGITE O PRIMEIRO VALOR: ")
LEIA (V1)
ESCREVA ("DIGITE O SEGUNDO VALOR: ")
LEIA (V2)
TOTAL<-(V1+V2)
SE TOTAL<=40 ENTAO
ESCREVA("O VALOR É 40")
SENAO
TOTAL<-TOTAL+75
ESCREVAL("O VALOR TOTAL É: ",TOTAL)
FIMSE
// Seção de Comandos
fimalgoritmo
____________________________________________________

algoritmo "SEU TIME"
// Função :
// Autor :
// Data : 25/4/2008
// Seção de Declarações
var
TIME:LITERAL
inicio
ESCREVA("DIGITE O NOEM DO SEU TIME: ")
LEIA(TIME)
SE TIME="FLAMENGO" ENTAO
ESCREVA("CAMPIÃO")
SENAO
ESCREVA("PERDEDOR")
FIMSE

// Seção de Comandos
fimalgoritmo
____________________________________________________

algoritmo "SALDAÇÃO"
// Função :
// Autor :
// Data : 25/4/2008
// Seção de Declarações
var
HORA:INTEIRO
inicio
ESCREVA("DIGITE A HORA: ")
LEIA(HORA)
SE HORA<=12 ENTAO
ESCREVA("BOM DIA")
SENAO
ESCREVA("DOA NOITE")
FIMSE
// Seção de Comandos
fimalgoritmo
____________________________________________________

Respostas Data Resposta: 4/25/2008 11:22:18 AM
mario ricardo de sousa Aluno: Mário Ricardo de Sousa  RA: 6269087
algoritmo "horas de vida condições"
// Função :
// Autor :MARIO
// Data : 25/04/2008
// Seção de Declarações
var
x,t:real
inicio
escreval("Programa para calcular horas de vida condicionada.")
escreval("Digite sua idade:")
leia(i)
t <- (x*8760)
se(t>400) entao
escreval(t+400)
senao
escreval("novinho(a).")
fimse
fimalgoritmo
// Seção de Comandos
fimalgoritmo


------------------------------------------------------------------------

algoritmo "soma"
// Função :
// Autor :MARIO
// Data : 25/04/2008
// Seção de Declarações
var
x,y,p:real
inicio
escreva ("entre com valor 1:")
leia(x)
escreval("entre com valor 2:")
leia(y)
p <- (x+y)
se(p <=40)entao
escreva("40")
senao
escreva(p+75)
fimse
// Seção de Comandos
fimalgoritmo


---------------------------------------------------------------------------

algoritmo "time do coração"
// Função :
// Autor :MARIO
// Data : 25/04/2008
// Seção de Declarações
var
time:literal
inicio
escreva ("Qual Seu time Favorito:")
leia(time)
se(time = "Flamengo")entao
escreva("Penta Campeão")
senao
escreva("Time Fraco")
fimse
// Seção de Comandos
fimalgoritmo


--------------------------------------------------------------------------

algoritmo "Cortesia"
// Função :
// Autor :MARIO
// Data : 25/04/2008
// Seção de Declarações
var
w:literal
inicio
escreval("Digite a hora")
leia(w)
se(w <="12:00")entao
escreva("Bom dia")
senao
escreva("Boa tarde")
fimse
// Seção de Comandos
fimalgoritmo
Respostas Data Resposta: 4/25/2008 2:35:02 PM
Andr[e Luiz Cavalli

algoritmo "Horas de vida"
// Função : Horas vividas
// Autor: André Luiz Cavalli - RA: 940939-4

var idade,total:real

inicio
escreval("Programa para calcular horas de vida.")
escreva("Digite sua idade:")
leia(idade)
total <- (idade*24*365)
se (total>400) entao
   escreval("Total:",total+400)
senao
   escreva("Você é tão novinho(a).")
fimse
fimalgoritmo

#######################################

algoritmo "Soma de valores"
// Função : Soma de valores com condição.
// Autor: André Luiz Cavalli - RA: 940939-4

var x,y,total:real

inicio
escreval("Soma de valores condicionada.")
escreva("Digite o valor 1:")
leia(x)
escreva("Digite o valor 2:")
leia(y)
total <- (x+y)
se (total <=40) entao
  escreva("O valor não atendeu o mínimo de 40")
senao
  escreval("O valor total somado a 75 é:",total+75)
fimse
fimalgoritmo

#######################################

algoritmo "Time favorito"
// Função : Time favorito.
// Autor: André Luiz Cavalli - RA: 940939-4

var tc:literal

inicio
escreval("Programa time do coração")
escreva("Digite seu time do coração: ")
leia(tc)
se (tc = "Corinthians") entao
  escreva("O melhor!")
senao
  escreva("Coringão é a sua salvação!")
fimse
fimalgoritmo

#######################################

algoritmo "Saudação"
// Função :
// Autor: André Luiz Cavalli - RA: 940939-4
var h:literal
inicio
escreval("Programa hora condicionada")
escreval("Digite a hora")
leia(h)
se(h >="12:00")entao
escreva("Boa tarde")
senao
escreva("Bom dia")
fimse
fimalgoritmo

Respostas Data Resposta: 4/25/2008 5:35:15 PM
Fábio Queiroz Brabo

Algoritmo "exercicio_01"
var
 id, tot : Inteiro
Inicio
  escreva("Digite sua idade: ")
  leia(id)
  tot <- (id*8760)
  se tot > 400 entao
    tot <- tot+400
    escreval("O total de horas vividas mais 400 é ",tot)
  senao
    escreva("Novinho")
  fimse
FimAlgoritmo

Algoritmo "exercicio_02"
var
  n1,n2,tot : real
Inicio
  escreva("Digite um número: ")
  leia(n1)
  escreva("Digite outro número: ")
  leia(n2)
  tot <- n1+n2
  se tot > 40 entao
    tot <- tot+74
    escreval("O valor da soma dos números + 75 é: ",tot)
  senao
    escreva("40")
  fimse
FimAlgoritmo

Algoritmo "exercicio_03"
var
  time : literal
Inicio
  escreva("Digite o nome do seu time: ")
  leia(time)
  se time="FLAMENGO" entao escreva("CAMPEÃO!!")
   senao escreva("PERDEDOR!!")
  fimSe
FimAlgoritmo

Algoritmo "exercicio_04"
var
  hor : real
Inicio
  escreva("Que horas são? ")
  leia(hor)
  se hora >= 12 entao escreva("Boa tarde")
  senao escreva("Bom dia!")
  fimSe
FimAlgoritmo

Respostas Data Resposta: 4/25/2008 5:37:39 PM
Rodrigo Henrique Rodrigo Henrique
AD1P30
RA- 8375208

algoritmo "exec 1"

var horas: real
idade: inteiro
inicio
   escreva("sua idade")
   leia(idade)
     horas<-idade*8760
   escreva(horas)
      se(horas>400)entao
         horas<-horas+400
      senao
         escreva("novinho(a)")
      fimse
fimalgoritmo

-------------------------------------

algoritmo "exec 2"

var a, b, total: real
inicio
   escreva("digite o valor a")
   leia(a)
   escreva("digite o valor b")
   leia(b)
     total<-a+b
       se(total<=40) entao
         escreva(40)
       senao
         total<-total+75
       fimse
fimalgoritmo

----------------------------------------------

algoritmo "exec 3"

var time: literal
inicio
   escreva("seu time: ")
   leia(time)
      se (time="gremio") entao
        escreva("campeao")
      senao
        escreva("perdedor")
      fimse
fimalgoritmo

----------------------------------------------

algoritmo "exec 4"

var hora: literal
inicio
   escreva("digite a hora: ")
   leia(hora)
      se (hora>="12:00") entao
        escreva("Boa tarde")
      senao
        escreva("Bom dia")
      fimse
fimalgoritmo

Respostas Data Resposta: 4/25/2008 7:47:23 PM
Gerhard Maurer hgjhgjhgjgj
Respostas Data Resposta: 4/25/2008 8:00:19 PM
Gerhard Maurer

Algoritmo horas de vida

var

idade,horas:real

inicio

escreva ("sua idade  ")

leia (idade)

horas <-idade*8760

se (horas > 400)

escreva ("horas")

senao

escreva ("novinho")

fimse

fimalgoritmo

 

 

Algoritmo horas

var

horas:real

inicio

escreva ("Digite horas ")

leia (horas)

se horas >= 1200 entao

escreva ("Boa tarde")

senao

escreva ("Bom dia")

fimse

fimalgoritmo

 

 

Respostas Data Resposta: 4/25/2008 9:04:30 PM
LAURO LUIZ DA CONCEIÇÃO

algoritmo "Como Vai Você"
// Função :
// Autor :
// Data : 4/3/quinta-feira
// Seção de Declarações

var
hora:inteiro

inicio
escreval("Digite as horas: formato hhmm ")
leia (hora)
se hora <1200 entao
   escreva("Bom Dia")
fimse
se hora >= 1200 entao
   se hora >= 1800 entao
      se hora >2400 entao
         escreva (" Hora Digitada é Inválida ! ")
      senao
         se hora = 2400 entao
            escreva (" Esta Hora Corresponde a 00:00 hs - Bom Dia ! ")
         senao
            escreva("Boa Noite")
         fimse
      fimse
   senao
      escreva("Boa Tarde")
   fimse
fimse
fimalgoritmo

algoritmo "Seu Time"
// Função :
// Autor :
// Data : 3/4/2008
// Seção de Declarações
var
   time:literal
inicio
      escreva ("Digite o nome do seu Time")
      leia (time)
      escolha time
              caso "flamengo"
                   escreva ("Mengão - Maior Torcida do Brasil")
              caso "vasco"
                   escreva ("vasco da gama do Rio de Janeiro")
              caso "palmeiras"
                   escreva ("Palmeiras Futebol Clube")
              caso "botafogo"
                   escreva ("Segunda Divisão do Rio")
              caso "Goias"
                   escreva ("Goias - Elite do futebol goiano")
              caso "brasiliense"
                   escreva ("Brasiliense - Que time é esse")
              caso "sao paulo"
                   escreva ("Sao Paulo - Quinta maior torcida do País")
              caso "sao caetano"
                   escreva ("São Caetano")
              outrocaso
                       escreva ("Esse Time ta falido")
          fimescolha
          fimalgoritmo

fimalgoritmo

algoritmo "Multiplicador"
// Função :
// Autor :
// Data : 3/4/2008
// Seção de Declarações
var

multi:real
plicador:real
total:real

inicio
      escreva ("digite o primeiro valor")
      leia (multi)
      escreva ("digite o segundo valor")
      leia (plicador)
      total<-multi*plicador
      se total <= 100 entao
         escreva ("valor menor que 100")
      senao
         escreval ("resultado é ", total)

      fimse

fimalgoritmo

Respostas Data Resposta: 4/25/2008 9:38:24 PM
Sebastião Ramos de Souza

1º exercício

algoritmo "Cálculo de Horas vividas"

// Função : Calcular a quantidade de horas de vida se esta >400

// Autor : 9552995 - Sebastião Ramos de Souza

// Data : 24/04/2008

var

idade, total: real

inicio

escreva("Entre com sua idade: ")

   leia(idade)

      total <-((idade*365)*24)

   se total >400 entao

   escreva("O total de horas vividas +400 = ", total)

senao

   escreva("novinho")

fimse

fimalgoritmo

 

2º exercício

algoritmo "Soma"

// Função : Somar dois valores e ver se é menor ou igual 40

// Autor : 9552995 - Sebastião Ramos de Souza

// Data : 24/04/2008

var

v1,v2,soma: real

inicio

escreva ("Entre com o primeiro valor: ")

   leia(v1)

escreva ("Entre com o segundo  valor: ")

   leia (v2)

     soma <-v1+v2

se soma > 40 entao

   escreva ("O valor da soma + 75 é = a", soma+75)

senao

   escreva ("40")

fimse

fimalgoritmo

 

 

3º exercício

algoritmo "Time"

// Função : Verifica se você torce pra um bom time

// Autor : 9552995 - Sebastião Ramos de Souza

// Data : 24/04/2008

var

time:caractere

inicio

escreva ("Qual o time do seu coração? ")

   leia(time)

se time = "grêmio" entao

   escreva ("É Campeão!!!")

senao

   escreva ("Perdedor, que tal mudar de time???")

fimse

fimalgoritmo

 

4º exercício

algoritmo "Saudação"

// Função : Verifica se Bom Dia ou Boa Tarde

// Autor : : 9552995 - Sebastião Ramos de Souza

// Data : 24/04/2008

 

var

hora :real

inicio

    escreva ("Que horas sao? ")

          leia (hora)

  se hora >=12 entao

    escreva ("Boa tarde!!!")

  senao

    escreva ("Bom dia!!!")

  fimse

fimalgoritmo

Respostas Data Resposta: 4/26/2008 12:05:10 PM
Shady Almeida

Mauricio Bom Dia!
Encaminhei ontem via e-mail porque o fórum estava fora do ar, de qualquer forma segue os algoritmos.

Sinfloriano de Almeida
RA: 912810-7

 

+++++++++++++++++++++++++++++++

Algoritmo "Programa Dia"
// Função : Caso/Outrocaso
// Autor : Sinfloriano de Almeida
// Data : 3/4/2008
// Seção de Declarações
var
hora:inteiro
inicio
      Escreva("Digite a hora no formato HH:MM   ")
      Leia(hora)
      Escolha hora
      caso<1200
      escreva("Bom Dia!")
      caso<=1800
      Escreva("Boa Tarde!")
      Outrocaso
      Escreva("Boa Noite!")
      Fimescolha
fimalgoritmo


===================================================

algoritmo "Torcidas"
// Função :Caso/Outrocas
// Autor : Sinfloriano de Almeida
// Data : 3/4/2008
// Seção de Declarações
var time:literal
inicio
      Escreva("Qual o seu time???     ")
      leia(time)
      Escolha time
      caso "FLAMENGO"
      Escreva("TU ÉS TIME DE TRADIÇÃO, RAÇA AMOR E PAIXÃO O MEU MENGOOO!!!!")
      caso "PALMEIRAS"
      ESCREVA("PORCOOOOOOOOOOO, PORRRRRRRRRRRRRRRRRCOOOOOOOOOOOOO")
      CASO "SÃO PAULO"
      ESCREVA("É FORÇCA JOVEM O MELHOR DO BRASIL")
      Outrocaso
      Escreva("Derrotado!")
      Fimescolha
// Seção de Comandos
fimalgoritmo


===================================================

Algoritmo "Soma de valores"
// Função : Soma de 02 valores
// Autor : Sinfloriano de Almeida
// Data : 3/4/2008
// Seção de Declarações
var
soma,a,b:inteiro
inicio
Escreva("Digite um número...  ")
Leia(a)
Escreva("Digite outro número...  ")
Leia(b)
soma<-(a*b)
Se (soma>=100) Entao
 escreva(soma)
Senao
escreva("Menor..")
fimse

// Seção de Comandos
fimalgoritmo

 

 

 


===================================================

Algoritmo "Idade"
// Função : Calculo Idade/Horas
// Autor : Sinfloriano de Almeida
// Data : 27/03/2008
// Seção de Declarações
var
    ID, TOTAL:REAL
inicio
ESCREVA("DIGITE SUA IDADE:")
LEIA(ID)
TOTAL <- (24*365*ID)
SE TOTAL > 100000 ENTAO
ESCREVA ("TOTAL DE HORAS VIVIDAS:" )
ESCREVA(TOTAL)
ESCREVA(" VELHO")
SENAO
ESCREVA ("TOTAL DE HORAS VIVIDAS:")
ESCREVA(TOTAL)
ESCREVA(" NOVINHO")
FIMSE
fimalgoritmo

=================================================

Algoritmo "Período Dia"
// Função :  Período Dia
// Autor : Sinfloriano de Almeida
// Data : 03/04/2008
// Seção de Declarações
var
  HORA:INTEIRO
inicio
 ESCREVA("QUANTAS HORAS SÃO?: ")
 LEIA(HORA)
           ESCOLHA
         CASO<1200
      ESCREVA("BOM DIA")

         CASO<=1800
       ESCREVA("BOA TARDE")

 OUTROCASO
 ESCREVA("BOA NOITE")

              FIMESCOLHA
fimalgoritmo

================================================

Algoritmo "Soma de 02 valores"
// Função : Calculo da soma de 02 valores
// Autor : Sinfloriano de Almeida
// Data : 16/3/2008
// Seção de Declarações
var
S1, S2, calculo:inteiro
inicio
escreva("Digite o primeiro valor a ser somado: ")
leia(S1)
escreva("Digite o segundo valor a ser somado: ")
leia(S2)
calculo <- (S1+S2)
ESCREVA ("A SOMA DE DOIS VALORES É:")
escreva(calculo)
// Seção de Comandos
fimalgoritmo

=================================================

Algoritmo "Multiplicação de valores"
// Função : Calculo multiplicação de valores
// Autor : Sinfloriano de Almeida
// Data : 16/3/2008
// Seção de Declarações
var
M1, M2, calculo:real
inicio
escreva("Digite o primeiro valor a ser multiplicado: ")
leia(M1)
escreva("Digite o segundo valor a ser multiplicado: ")
leia(M2)
calculo <- (M1*M2)
escreva(calculo)
fimalgoritmo

===================================================

Algoritmo "Média Semestral"
// Função : Calculo média salarial
// Autor : Sinfloriano de Almeida
// Data : 20/3/2008
// Seção de Declarações
var
n1, n2, n3, n4, n5, n6, media:real
inicio
escreva("Qual a nota da 1º prova? ")
leia(n1)
escreva("Qual a nota da 2º prova? ")
leia(n2)
escreva("Qual a nota da 3º prova? ")
leia(n3)
escreva("Qual a nota da 4º prova? ")
leia(n4)
escreva("Qual a nota da 5º prova? ")
leia(n5)
escreva("Qual a nota da 6º prova? ")
leia(n6)
media <- (n1+n2+n3+n4+n5+n6)/6
ESCREVA("A MÉDIA DA SUAS NOTAS SEMESTRAIS SÃO:")
escreva(media)
// Seção de Comandos
fimalgoritmo

==================================================

Algoritmo "Média Salarial"
// Função : Calculo da média salarial
// Autor : Sinfloriano de Almeida
// Data : 13/3/2008
// Seção de Declarações
var
J,F,M,A,MA,JUN,JUL,AG,S,O,NO,D,TER, calculo :real
inicio
escreva("INFORME SEU SALÁRIO  DE JANEIRO: ")
leia(J)
escreva("INFORME SEU SALÁRIO  DE FEVEREIRO: ")
leia(F)
escreva("INFORME SEU SALÁRIO  DE MARÇO: ")
leia(M)
escreva("INFORME SEU SALÁRIO  DE ABRIL: ")
leia(A)
escreva("INFORME SEU SALÁRIO  DE MAIO: ")
leia(MA)
escreva("INFORME SEU SALÁRIO  DE JUNHO: ")
leia(JUN)
escreva("INFORME SEU SALÁRIO  DE JULHO: ")
leia(JUL)
escreva("INFORME SEU SALÁRIO  DE AGOSTO: ")
leia(AG)
escreva("INFORME SEU SALÁRIO  DE SETEMBRO: ")
leia(S)
escreva("INFORME SEU SALÁRIO  DE OUTUBRO: ")
leia(O)
escreva("INFORME SEU SALÁRIO  DE NOVEMBRO: ")
leia(NO)
escreva("INFORME SEU SALÁRIO  DE DEZEMBRO: ")
leia(D)
escreva("INFORME SEU DECIMO TERCEIRO: ")
leia(TER)
calculo <- (J+M+A+MA+JUN+JUL+AG+S+O+NO+D+TER)/13
escreva(calculo)

fimalgoritmo

====================================================

Algoritmo "Média da conta de luz"
// Função : Calcular média da conta de luz
// Autor : Sinfloriano de Almeida
// Data : 16/3/2008
// Seção de Declarações
var
j, f, m, a, mai, ju, juh, ag, s, o, n, d, calculo:real
inicio
escreva("Qual o valor da sua conta de luz no mês de Janeiro ? ")
leia(j)
escreva("Qual o valor da sua conta de luz no mês de Fevereiro ? ")
leia(f)
escreva("Qual o valor da sua conta de luz no mês de Março ? ")
leia(m)
escreva("Qual o valor da sua conta de luz no mês de Abril ? ")
leia(a)
escreva("Qual o valor da sua conta de luz no mês de Maio ? ")
leia(mai)
escreva("Qual o valor da sua conta de luz no mês de Junho ? ")
leia(ju)
escreva("Qual o valor da sua conta de luz no mês de Julho ? ")
leia(juh)
escreva("Qual o valor da sua conta de luz no mês de Agosto ? ")
leia(ag)
escreva("Qual o valor da sua conta de luz no mês de Setembro ? ")
leia(s)
escreva("Qual o valor da sua conta de luz no mês de Outubro ? ")
leia(o)
escreva("Qual o valor da sua conta de luz no mês de Novembro ? ")
leia(n)
escreva("Qual o valor da sua conta de luz no mês de Dezembro ? ")
leia(d)
calculo <- (j+f+m+a+mai+ju+juh+ag+s+o+n+d)/12
ESCREVA ("A MÉDIA DA SUA CONTA DE LUZ É:")
escreva(calculo)
fimalgoritmo

==============================================================

Algoritmo Horas vividas
// Função : Calcular horas de vida
// Autor : Sinfloriano de Almeida
// Data : 16/3/2008
// Seção de Declarações
var
idade, calculo:inteiro
inicio
escreva("Quantos anos voce tem ?: ")
leia(idade)
calculo <- (idade*8760)
escreva(calculo)
// Seção de Comandos
fimalgoritmo

========================================================

Algoritmo "HORAS NA SEMANA"
// Função : Calculo de Horas da semana
// Autor : Sinfloriano de Almeida
// Data : 16/3/2008
// Seção de Declarações
var
HOR, SEMAN, CALCULO:INTEIRO
inicio
ESCREVA("QUANTAS HORAS TEM 1 DIA ? ")
LEIA(HOR)
ESCREVA("QUANTOS DIAS TEM UMA SEMANA ? ")
LEIA(SEMAN)
CALCULO <- (7*24)
ESCREVA ("EXISTEM")
ESCREVA(CALCULO)
ESCREVA (" HORAS NA SEMANA")
// Seção de Comandos
fimalgoritmo

===========================================================

Algoritmo "Gasto anual com almoço"
// Função : Calcular gasto anual com almoço
// Autor : Sinfloriano de Almeida
// Data : 20/3/2008
// Seção de Declarações
var
gasto, calculo:real
inicio
escreva("Digite a média do seu gasto de almoço diario: ")
leia(gasto)
calculo <- (gasto*231)
escreva("A média de seu gasto anual é: ")
escreva(calculo)

// Seção de Comandos
fimalgoritmo

=================================================

Algoritmo "DIVISÃO DE 2 VALORES"
// Função : Dividir 02 valores
// Autor : Sinfloriano de Almeida
// Data : 16/3/2008
// Seção de Declarações
var
D1, D2, calculo:real
inicio
escreva("Digite o primeiro valor a ser dividido: ")
leia(D1)
escreva("Digite o segundo valor a ser dividido: ")
leia(D2)
calculo <- (D1/D2)
escreva(calculo)
fimalgoritmo

===================================================

Algoritmo "Calculo de Km/H"
// Função : Calcular Km/H
// Autor : Sinfloriano de Almeida
// Data : 20/3/2008
// Seção de Declarações
var
dis, temp, calculo:real
inicio
escreva("Digite a distancia percorrida em Metros: ")
leia(dis)
escreva("Digite o tempo percorrido em segundos: ")
leia (temp)
calculo <- (dis/temp)*3,6
escreva(calculo)

// Seção de Comandos
fimalgoritmo

Respostas Data Resposta: 4/26/2008 12:14:03 PM
Shady Almeida Sinfloriano de Almeida
RA: 912810-7




+++++++++++++++++++++++++++++++
Algoritmo "Programa Dia"
// Função : Caso/Outrocaso
// Autor : Sinfloriano de Almeida
// Data : 3/4/2008
// Seção de Declarações
var
hora:inteiro
inicio
      Escreva("Digite a hora no formato HH:MM   ")
      Leia(hora)
      Escolha hora
      caso<1200
      escreva("Bom Dia!")
      caso<=1800
      Escreva("Boa Tarde!")
      Outrocaso
      Escreva("Boa Noite!")
      Fimescolha

fimalgoritmo


===================================================

algoritmo "Torcidas"
// Função :Caso/Outrocas
// Autor : Sinfloriano de Almeida
// Data : 3/4/2008
// Seção de Declarações
var time:literal
inicio
      Escreva("Qual o seu time???     ")
      leia(time)
      Escolha time
      caso "FLAMENGO"
      Escreva("TU ÉS TIME DE TRADIÇÃO, RAÇA AMOR E PAIXÃO O MEU MENGOOO!!!!")
      caso "PALMEIRAS"
      ESCREVA("PORCOOOOOOOOOOO, PORRRRRRRRRRRRRRRRRCOOOOOOOOOOOOO")
      CASO "SÃO PAULO"
      ESCREVA("É FORÇCA JOVEM O MELHOR DO BRASIL")
      Outrocaso
      Escreva("Derrotado!")
      Fimescolha
// Seção de Comandos
fimalgoritmo


===================================================

Algoritmo "Soma de valores"
// Função : Soma de 02 valores
// Autor : Sinfloriano de Almeida
// Data : 3/4/2008
// Seção de Declarações
var
soma,a,b:inteiro
inicio
Escreva("Digite um número...  ")
Leia(a)
Escreva("Digite outro número...  ")
Leia(b)
soma<-(a*b)
Se (soma>=100) Entao
 escreva(soma)
Senao
escreva("Menor..")
fimse

// Seção de Comandos
fimalgoritmo



===================================================

Algoritmo "Idade"
// Função : Calculo Idade/Horas
// Autor : Sinfloriano de Almeida
// Data : 27/03/2008
// Seção de Declarações
var
    ID, TOTAL:REAL
inicio
ESCREVA("DIGITE SUA IDADE:")
LEIA(ID)
TOTAL <- (24*365*ID)
SE TOTAL > 100000 ENTAO
ESCREVA ("TOTAL DE HORAS VIVIDAS:" )
ESCREVA(TOTAL)
ESCREVA(" VELHO")
SENAO
ESCREVA ("TOTAL DE HORAS VIVIDAS:")
ESCREVA(TOTAL)
ESCREVA(" NOVINHO")
FIMSE
fimalgoritmo

=================================================

Algoritmo "Período Dia"
// Função :  Período Dia
// Autor : Sinfloriano de Almeida
// Data : 03/04/2008
// Seção de Declarações
var
  HORA:INTEIRO
inicio
 ESCREVA("QUANTAS HORAS SÃO?: ")
 LEIA(HORA)
           ESCOLHA
         CASO<1200
      ESCREVA("BOM DIA")

         CASO<=1800
       ESCREVA("BOA TARDE")

 OUTROCASO
 ESCREVA("BOA NOITE")

              FIMESCOLHA
fimalgoritmo

================================================

Algoritmo "Soma de 02 valores"
// Função : Calculo da soma de 02 valores
// Autor : Sinfloriano de Almeida
// Data : 16/3/2008
// Seção de Declarações
var
S1, S2, calculo:inteiro
inicio
escreva("Digite o primeiro valor a ser somado: ")
leia(S1)
escreva("Digite o segundo valor a ser somado: ")
leia(S2)
calculo <- (S1+S2)
ESCREVA ("A SOMA DE DOIS VALORES É:")
escreva(calculo)
// Seção de Comandos
fimalgoritmo

=================================================

Algoritmo "Multiplicação de valores"
// Função : Calculo multiplicação de valores
// Autor : Sinfloriano de Almeida
// Data : 16/3/2008
// Seção de Declarações
var
M1, M2, calculo:real
inicio
escreva("Digite o primeiro valor a ser multiplicado: ")
leia(M1)
escreva("Digite o segundo valor a ser multiplicado: ")
leia(M2)
calculo <- (M1*M2)
escreva(calculo)
fimalgoritmo

===================================================

Algoritmo "Média Semestral"
// Função : Calculo média salarial
// Autor : Sinfloriano de Almeida
// Data : 20/3/2008
// Seção de Declarações
var
n1, n2, n3, n4, n5, n6, media:real
inicio
escreva("Qual a nota da 1º prova? ")
leia(n1)
escreva("Qual a nota da 2º prova? ")
leia(n2)
escreva("Qual a nota da 3º prova? ")
leia(n3)
escreva("Qual a nota da 4º prova? ")
leia(n4)
escreva("Qual a nota da 5º prova? ")
leia(n5)
escreva("Qual a nota da 6º prova? ")
leia(n6)
media <- (n1+n2+n3+n4+n5+n6)/6
ESCREVA("A MÉDIA DA SUAS NOTAS SEMESTRAIS SÃO:")
escreva(media)
// Seção de Comandos
fimalgoritmo

==================================================

Algoritmo "Média Salarial"
// Função : Calculo da média salarial
// Autor : Sinfloriano de Almeida
// Data : 13/3/2008
// Seção de Declarações
var
J,F,M,A,MA,JUN,JUL,AG,S,O,NO,D,TER, calculo :real
inicio
escreva("INFORME SEU SALÁRIO  DE JANEIRO: ")
leia(J)
escreva("INFORME SEU SALÁRIO  DE FEVEREIRO: ")
leia(F)
escreva("INFORME SEU SALÁRIO  DE MARÇO: ")
leia(M)
escreva("INFORME SEU SALÁRIO  DE ABRIL: ")
leia(A)
escreva("INFORME SEU SALÁRIO  DE MAIO: ")
leia(MA)
escreva("INFORME SEU SALÁRIO  DE JUNHO: ")
leia(JUN)
escreva("INFORME SEU SALÁRIO  DE JULHO: ")
leia(JUL)
escreva("INFORME SEU SALÁRIO  DE AGOSTO: ")
leia(AG)
escreva("INFORME SEU SALÁRIO  DE SETEMBRO: ")
leia(S)
escreva("INFORME SEU SALÁRIO  DE OUTUBRO: ")
leia(O)
escreva("INFORME SEU SALÁRIO  DE NOVEMBRO: ")
leia(NO)
escreva("INFORME SEU SALÁRIO  DE DEZEMBRO: ")
leia(D)
escreva("INFORME SEU DECIMO TERCEIRO: ")
leia(TER)
calculo <- (J+M+A+MA+JUN+JUL+AG+S+O+NO+D+TER)/13
escreva(calculo)

fimalgoritmo

====================================================

Algoritmo "Média da conta de luz"
// Função : Calcular média da conta de luz
// Autor : Sinfloriano de Almeida
// Data : 16/3/2008
// Seção de Declarações
var
j, f, m, a, mai, ju, juh, ag, s, o, n, d, calculo:real
inicio
escreva("Qual o valor da sua conta de luz no mês de Janeiro ? ")
leia(j)
escreva("Qual o valor da sua conta de luz no mês de Fevereiro ? ")
leia(f)
escreva("Qual o valor da sua conta de luz no mês de Março ? ")
leia(m)
escreva("Qual o valor da sua conta de luz no mês de Abril ? ")
leia(a)
escreva("Qual o valor da sua conta de luz no mês de Maio ? ")
leia(mai)
escreva("Qual o valor da sua conta de luz no mês de Junho ? ")
leia(ju)
escreva("Qual o valor da sua conta de luz no mês de Julho ? ")
leia(juh)
escreva("Qual o valor da sua conta de luz no mês de Agosto ? ")
leia(ag)
escreva("Qual o valor da sua conta de luz no mês de Setembro ? ")
leia(s)
escreva("Qual o valor da sua conta de luz no mês de Outubro ? ")
leia(o)
escreva("Qual o valor da sua conta de luz no mês de Novembro ? ")
leia(n)
escreva("Qual o valor da sua conta de luz no mês de Dezembro ? ")
leia(d)
calculo <- (j+f+m+a+mai+ju+juh+ag+s+o+n+d)/12
ESCREVA ("A MÉDIA DA SUA CONTA DE LUZ É:")
escreva(calculo)
fimalgoritmo

==============================================================

Algoritmo Horas vividas
// Função : Calcular horas de vida
// Autor : Sinfloriano de Almeida
// Data : 16/3/2008
// Seção de Declarações
var
idade, calculo:inteiro
inicio
escreva("Quantos anos voce tem ?: ")
leia(idade)
calculo <- (idade*8760)
escreva(calculo)
// Seção de Comandos
fimalgoritmo

========================================================

Algoritmo "HORAS NA SEMANA"
// Função : Calculo de Horas da semana
// Autor : Sinfloriano de Almeida
// Data : 16/3/2008
// Seção de Declarações
var
HOR, SEMAN, CALCULO:INTEIRO
inicio
ESCREVA("QUANTAS HORAS TEM 1 DIA ? ")
LEIA(HOR)
ESCREVA("QUANTOS DIAS TEM UMA SEMANA ? ")
LEIA(SEMAN)
CALCULO <- (7*24)
ESCREVA ("EXISTEM")
ESCREVA(CALCULO)
ESCREVA (" HORAS NA SEMANA")
// Seção de Comandos
fimalgoritmo

===========================================================

Algoritmo "Gasto anual com almoço"
// Função : Calcular gasto anual com almoço
// Autor : Sinfloriano de Almeida
// Data : 20/3/2008
// Seção de Declarações
var
gasto, calculo:real
inicio
escreva("Digite a média do seu gasto de almoço diario: ")
leia(gasto)
calculo <- (gasto*231)
escreva("A média de seu gasto anual é: ")
escreva(calculo)

// Seção de Comandos
fimalgoritmo

=================================================

Algoritmo "DIVISÃO DE 2 VALORES"
// Função : Dividir 02 valores
// Autor : Sinfloriano de Almeida
// Data : 16/3/2008
// Seção de Declarações
var
D1, D2, calculo:real
inicio
escreva("Digite o primeiro valor a ser dividido: ")
leia(D1)
escreva("Digite o segundo valor a ser dividido: ")
leia(D2)
calculo <- (D1/D2)
escreva(calculo)
fimalgoritmo

===================================================

Algoritmo "Calculo de Km/H"
// Função : Calcular Km/H
// Autor : Sinfloriano de Almeida
// Data : 20/3/2008
// Seção de Declarações
var
dis, temp, calculo:real
inicio
escreva("Digite a distancia percorrida em Metros: ")
leia(dis)
escreva("Digite o tempo percorrido em segundos: ")
leia (temp)
calculo <- (dis/temp)*3,6
escreva(calculo)

// Seção de Comandos
fimalgoritmo

==================================================
Respostas Data Resposta: 5/16/2008 4:34:25 PM
henrique brasiliense

algotitimo "time"

//função

//autor:  henrique brasiliense

//data : 27/03/08

//seção de declaração

var

time,vasco:literal

inicio

escreva("digite seu time")

leia(time)

se(time="vasco")entao

escreva("campeao")

senao

escreva("perdedor")

fimse

// seção de declaração

fimalgoritimo

 

 

 

 

algoritimo"horas"

//função

//autor: henrique brasiliense

//data: 27/03/08

// seção de declaração

var

hora : real

inicio

escreva("que horas são ?")

leia (hora)

se(hora>12)entao

escreva("boa tarde")

senao

escreva("bom dia")

fimse

//seção de comandos

fimalgoritimo

 

 

algoritimo"soma"

//função :

//autor : henrique brasiliense

//data : 27/03/08

// seção de declaraçoes

var

v1,v2,soma,soma2 : real

inicio

escreva("valor1")

leia(v1)

escreva("valor2")

leia(v2)

soma <-(v1+v2)

se(soma<=40)entao

escreva("40")

senao

soma2<-(soma+75)

escreva(soma2)

fimse

// seção de comandos

fimalgoritimo

 

 

algoritimo"horas"

// função :

//autor : henrique brasiliense

// data : 27/03/08

// seção de declaraçoes

var

I,T,T2 : real

inicio

escreva("digite sua idade")

leia(I)

T< -(I*8760)

se(T>400)entao

T2<-(T+400)

escreva(T2)

senao

escreva("novinho")

fimse

// seção de comandos

fimalgoritimo

Respostas Data Resposta: 5/16/2008 4:36:56 PM
henrique brasiliense

algotitimo "time"

//função

//autor:  henrique brasiliense

//data : 27/03/08

//seção de declaração

var

time,vasco:literal

inicio

escreva("digite seu time")

leia(time)

se(time="vasco")entao

escreva("campeao")

senao

escreva("perdedor")

fimse

// seção de declaração

fimalgoritimo

 

 

 

 

algoritimo"horas"

//função

//autor: henrique brasiliense

//data: 27/03/08

// seção de declaração

var

hora : real

inicio

escreva("que horas são ?")

leia (hora)

se(hora>12)entao

escreva("boa tarde")

senao

escreva("bom dia")

fimse

//seção de comandos

fimalgoritimo

 

 

algoritimo"soma"

//função :

//autor : henrique brasiliense

//data : 27/03/08

// seção de declaraçoes

var

v1,v2,soma,soma2 : real

inicio

escreva("valor1")

leia(v1)

escreva("valor2")

leia(v2)

soma <-(v1+v2)

se(soma<=40)entao

escreva("40")

senao

soma2<-(soma+75)

escreva(soma2)

fimse

// seção de comandos

fimalgoritimo

 

 

algoritimo"horas"

// função :

//autor : henrique brasiliense

// data : 27/03/08

// seção de declaraçoes

var

I,T,T2 : real

inicio

escreva("digite sua idade")

leia(I)

T< -(I*8760)

se(T>400)entao

T2<-(T+400)

escreva(T2)

senao

escreva("novinho")

fimse

// seção de comandos

fimalgoritimo

Respostas Data Resposta: 6/12/2008 4:04:07 PM
Thallyson

algoritmo "atividade1"
// Função :
// Autor : Thallyson Pereira Torres
// Data : 1/27/2008
// Seção de Declarações
// total de horas em um ano e igual a 8760
var
idade,horas:real
inicio
Escreva("Quantos anos vc tem ")
leia(idade)
horas<-(idade * 8760)
se (horas > 400) entao
horas<- (horas + 400)
Escreva(horas)
senao
escreva("novinho")
fimse
// Seção de Comandos
fimalgoritmo

 

algoritmo "atividade2"
// Função :
// Autor : Thallyson Pereira Torres
// Data : 1/27/2008
// Seção de Declarações
var
v1,v2,soma:real
inicio
escreva("informe um valor ")
leia(v1)
escreva("informe outro valor ")
leia(v2)
soma<-(v1 + v2)
se (soma <= 40) entao
escreva("40")
senao
soma<- (soma + 75)
escreva(soma)
fimse
// Seção de Comandos
fimalgoritmo

 

algoritmo "atividade3"
// Função :
// Autor : Thallyson Pereira Torres
// Data : 1/27/2008
// Seção de Declarações

var
time:literal
inicio
escreva("Informe o seu time favorito ")
leia(time)
se (time = "vasco") entao
escreva("CAMPEAO")
senao
escreva("PERDEDOR")
FIMSE
// Seção de Comandos
fimalgoritmo

 

algoritmo "atividade4"
// Função :
// Autor :Thallyson Pereira Torres
// Data : 1/27/2008
// Seção de Declarações
var
horas:literal
inicio
escreva("Informe as horas no formato hh:mm ")
leia(horas)
se (horas >="12:00") entao
escreva("boa tarde")
senao
escreva("bom dia")
fimse
// Seção de Comandos
fimalgoritmo


Heroes


Vídeos

 
Curso de C#


Visto por 41 pessoas.

Vídeo: Gerando Hash com .NET


Visto por 907 pessoas.

Criptografia para ser usada na URL


Visto por 1234 pessoas.

Mudar o toque do iPhone


Visto por 1779 pessoas.

12345678