Páginas

Seja bem-vindo. Hoje é

quinta-feira, 17 de fevereiro de 2011

Visualg

O Visualg interpreta e executa algoritmos como um "programa" normal de computador. Baseado em uma linguagem parecida com o "Portugol" ensinado em cursos em todo o Brasil, possui recursos como simulação da "tela" do computador, visualização de variáveis, "breakpoints", ajuda on-line, impressão dos fontes e outras características que auxiliam o aprendizado das técnicas de programação.

Baixar Aqui
Postado por Socorro Online às 19:10
Marcadores:

14 comentários:

  1. ca14 de abril de 2011 às 15:53

    preciso de ajuda tem alguem ai ?

    ResponderExcluir
  2. Anônimo4 de junho de 2012 às 05:01

    estou numa prova e não sei nada pode me ajudar ???

    ResponderExcluir
  3. Anônimo22 de setembro de 2013 às 11:59

    Gostaria de saber aonde está o erro nesse algoritmo:

    algoritmo "IBGE"
    // Função : O IBGE deseja fazer uma pesquisa entre 360 pessoas. para isso
    // precisa de algoritmo que leia o sexo e o salário de cada pessoa . No final o
    // algoritmo deverá imprimir, a quantidade de pessoas de cada sexo, a soma dos
    // salários por sexo e imprimir qual sexo tem o maior valor de salário.
    var
    sexo:caractere
    salario:real
    salario_m:real
    salario_f:real
    quantidade_m:inteiro
    quantidade_f:inteiro
    x:inteiro
    inicio
    salario<-0
    salario_m<-0
    salario_f<-0
    quantidade_m<-0
    quantidade_f<-0
    para x de 1 ate 2 faca
    escreval("Informe Salario")
    leia(salario)
    escreval("Informe o Sexo")
    leia(sexo)
    se(salario="f")entao
    salario_f<-salario_f+salario
    quantidade_f<-quantidade_f+1
    se(salario="m")entao
    salario_m<-salario_m+salario
    quantidade_m<-quantidade_m+1
    senao
    fimse
    fimse
    fimpara
    se(salario_F>salario_M)entao
    senao
    se(salario_M>salario_F)entao
    fimse
    fimse
    escreval("A Soma dos salário de pessoas do sexo feminino é : " , Salario_f )
    escreval("A Soma dos salário de pessoas do sexo masculino é : " , Salario_m )
    escreval("A qantidade de pessoas do sexo feminino é: " , quantidade_f )
    escreval("A qantidade de pessoas do sexo masculino é: " , quantidade_m )
    fimalgoritmo

    ResponderExcluir
  4. Anônimo6 de junho de 2014 às 10:14

    salario esta como real, nao pode receber "f" ou "m"

    ResponderExcluir
  5. Unknown15 de fevereiro de 2016 às 18:38

    Já lancei a versão 3.0, no site https://sourceforge.net/projects/visualg30/
    E em breve lançarei a versão 3.5 com muitas novidades OK !

    ResponderExcluir
  6. Unknown28 de novembro de 2016 às 12:41

    (Preciso de ajuda, será que alguém pode me ajudar)
    Var

    nome:vetor [1..100] de caractere
    m,n,t,x,y,op:inteiro
    alt: vetor [1..100] de real
    imc: vetor [1..5,1..5] de real
    procedimento "cadastro"
    var
    imc: real
    p: real

    inicio

    escreval (" CADASTRO")
    escreval ("___________________________________")
    escreval ("digite o nome do paciente: ")
    leia (nome[t])
    escreval ("digite a altura do paciente: ")
    leia (alt[t])
    escreval ("digite o peso do paciente: ")
    leia (p)
    imc<- p/(alt[t]*alt[t])
    escreval ("IMC: ", imc)
    se (imc<17) entao
    escreval (" MUITO ABAIXO DO PESO.")
    fimse
    se (imc>17) e (imc< 18.49) entao
    escreval ("ABAIXO DO PESO")
    fimse
    se (imc>18.50) e (imc<24.99) entao
    escreval ("PESO NORMAL")
    fimse
    se (imc>25) e (imc<29.99)entao
    escreval ("ACIMA DO PESO")
    fimse
    se (imc>30) e (imc<34.99)entao
    escreval ("OBESIDADE 1")
    fimse
    se (imc>35) e (imc<39.99)entao
    escreval ("OBESIDADE 2 (SEVERA)")
    fimse
    se (imc>40)entao
    escreval ("OBESIDADE 3 (MÓRBIDA)")
    fimse
    escreval
    t<-t + 1
    fimprocedimento
    procedimento "monitoramento"
    var
    p: real


    inicio
    escreval (" MONITORAMENTO")

    para n de 1 ate t-1 faca
    escreval ("_____________________________________")
    escreval ("NOME: ", nome[n])
    escreval ("ALTURA: ", alt[n])

    escreval ("O peso atual do paciente é: ")
    leia (p)
    escreval ("O imc atual é: ")
    imc[n,m]<- p/(alt[n]*alt[n])
    escreval ("IMC: ", imc[n,m])
    se (imc[n,m]<17) entao
    escreval (" MUITO ABAIXO DO PESO.")
    fimse
    se (imc[n,m]>17) e (imc[n,m]< 18.49) entao
    escreval ("ABAIXO DO PESO")
    fimse
    se (imc[n,m]>18.50) e (imc[n,m]<24.99) entao
    escreval ("PESO NORMAL")
    fimse
    se (imc[n,m]>25) e (imc[n,m]<29.99)entao
    escreval ("ACIMA DO PESO")
    fimse
    se (imc[n,m]>30) e (imc[n,m]<34.99)entao
    escreval ("OBESIDADE 1")
    fimse
    se (imc[n,m]>35) e (imc[n,m]<39.99)entao
    escreval ("OBESIDADE 2 (SEVERA)")
    fimse
    se (imc[n,m]>40)entao
    escreval ("OBESIDADE 3 (MÓRBIDA)")
    fimse


    n<-n+1
    m<-m+1
    fimpara

    fimprocedimento
    procedimento "relatorio"
    var
    linha, g: inteiro

    inicio
    escreval (" RELATÒRIO")
    escreval ("_________________________")
    escreval (" TABELA DE MONITORAMENTO")
    para x de 1 ate 1 faca
    escreval (" ")
    para y de 1 ate t-1 faca
    escreval("PacienTe ",nome[y]," Com IMC = ",imc[y,1]:5:2)
    escreva (imc[n,m]:5:2)
    fimpara
    fimpara
    fimprocedimento
    procedimento "menu"
    inicio
    escreval ("___________________________")
    escreval ("1.CADASTRO DO PACIENTE")
    escreval ("2.MONITORAMENTO DO PACIENTE")
    escreval ("3.RELATÒRIO")
    escreval ("4.SAIR")
    escreval("____________________________")
    leia (op)
    se (op=1) entao
    cadastro
    fimse
    se (op=2) entao
    monitoramento
    fimse
    se (op=3) entao
    relatorio
    fimse
    fimprocedimento
    Inicio
    // Seção de Comandos, procedimento, funções, operadores, etc...
    m<-1
    t<-1
    n<-1
    enquanto (op<>4) faca
    menu
    fimenquanto


    se(op=4) entao
    escreval ("FIM")
    fimse


    Fimalgoritmo

    ResponderExcluir
  7. Unknown26 de abril de 2019 às 11:38

    olá, o que tem de errado com esses pseudocódigos??

    1- Uma empresa decide dar um aumento de 30% aos funcionários, cujo salário é inferior a R$5.000,00. Efetue esse cálculo do salário reajuste.
    Pseudocódigo:

    algoritmo: “salario_reajuste”
    var: x , y : real
    inicio
    escreva (“digite o salario”)
    leia (x)
    se x < 5.000
    entao y <- x + ( x * 0,3 )
    escreva (“o salario reajustado e:”)
    leia (y)
    fimalgoritmo
    fimse


    E


    2- Uma empresa decide dar um aumento a seus funcionários com os seguintes critérios:
    • 50% para aqueles que ganham menos de R$3.000,00
    • 20% para aqueles que ganham entre R$3.000,00 e R$1.000,00 (inclusivo)
    • E 15% para os demais
    Pseudocódigo:

    Pseudocódigo:
    algoritmo: “estrutura_composta”
    var: x , y , z : real
    inicio
    escreva (“digite o salario”)
    leia (x)
    se x < 3.000
    entao se x <- x + ( x * 0,5 )
    escreva (“o aumento salarial e:”)
    leia (x)
    escreva (“digite o segundo salario”)
    leia (y)
    se x < 2.999 e x > 1.000
    entao y <- y + ( y * 0,2 )
    escreva (“o aumento salarial e:”)
    leia (y)
    escreva (“digite o terceiro salario”)
    leia (z)
    se z < 1.999
    entao z <- z + ( z * 0,2 )
    escreva (“o aumento salarial e:”)
    leia (z)
    fimse
    fimalgoritmo

    ResponderExcluir
  8. Unknown5 de junho de 2019 às 11:05

    Gostaria de saber onde estar o erro nesse algoritmo
    algoritmo "media_comparacao"

    var
    hora_aula, valor: vetor [1..5] de real
    professor: vetor [1..5] de literal
    i: inteiro
    salario, maior: real

    inicio
    maior<- 0
    salario<- 0
    para i de 1 ate 5 faca
    escreval("digite o nome do professor",i)
    leia(professor)
    escreval("digite a quantidade de hora_aula do professor",i)
    leia(hora_aula)
    escreval("digite o valor da hora_aula do professor",i)
    leia(valor)
    escreval("x...x...x...x")
    fimpara
    para i de 1 ate 5 faca
    salario<- hora_aula * valor
    escreval("o salario do professor,"i", e:", salario)
    se(salario> maior) entao
    maior<- salario
    fimse
    fimpara
    escreval(" o maior salario e do professor que ganha: ", maior)
    fimalgoritmo
    fimalgoritmo

    ResponderExcluir
  9. Unknown13 de agosto de 2019 às 15:57

    Boa noite!
    Gostaria de saber se tem como utilizar essa ferramenta no linux - ubuntu pois não estou conseguindo.

    ResponderExcluir
  10. Santino Jr12 de setembro de 2019 às 05:56

    preciso fazer uma pagina da internet dar um refresh, mas esta acusando um erro na linha 1. Segue codigo abaixo:
    1 integer face = 4;
    2 string myURL;
    3 integer seq = 0; // sequence number for unique URLs
    4
    5 default
    6 {
    7 state_entry()
    8 {
    9 llRequestURL();
    10 }
    11
    12 http_request(key id, string method, string body)
    13 {
    14 if(method == URL_REQUEST_GRANTED) {
    15 myURL = body;
    16 llSetPrimMediaParams(face,
    17 [PRIM_MEDIA_AUTO_PLAY, TRUE,
    18 PRIM_MEDIA_CURRENT_URL, myURL]);
    19 llSetTimerEvent(5.0);
    20 } else if(method == "GET") {
    21 llHTTPResponse(id, 200, "Sim FPS: " + (string)llGetRegionFPS());
    22 }
    23 }
    24
    25 timer()
    26 {
    27 llSetPrimMediaParams(face,
    28 [PRIM_MEDIA_CURRENT_URL, myURL + "/?r=" + (string)(++seq)]);
    29 }
    30 }

    ResponderExcluir
  11. Unknown6 de outubro de 2019 às 00:16

    Bom dia
    preciso de ajuda neste algoritmo, na execucao encontro sempre erro
    escreval("Digite a primeira nota:");
    leia(n1);
    escreval("Digite a segunda nota:");
    leia(n2);
    escreval("Digite a terceira nota:");
    leia(n3);
    escreval("Digite a quarta nota:");
    leia(n4);
    media<-(n1+n2+n3+n4)/4
    se(media>=7)entao
    escreval ("O aluno esta aprovado com media:",media)
    senao
    escreval("Digite a nota esta de recuperacao com media:,media)
    esvreval("Digite a nota de recuperacao:")
    leia(nrecup)
    mrecup<-(media+nrecup)/2
    se(mrecup>=5)entao
    escreval("O aluno foi aprovado na recuperacao com media:"mrecup)
    senao
    escreval("O aluno nao foi aprovado na recuperacao com media:",
    mrecup)
    fimse
    fimse
    // Seção de Comandos
    fimalgoritmo

    ResponderExcluir
  12. Unknown3 de abril de 2020 às 08:43

    Preciso de ajuda para exibir um nome uma idade e um salário só exibir

    ResponderExcluir

Assinar: Postar comentários (Atom)