Semnet

comente ai o que vcs acharam

Fala galera eu fiz um Smart Tv no visualg , ela contem Netflix , Playstation e Spotify , comente o que você achou do codigo ai em baixo algoritmo "SmartTV" ' // Criador Cauã Souza // Data de criação: 13/10/2019 var TV , pro, lg , mail, busca: Caractere series, filmes : caractere // netflix ps, game , jogar: caractere // parte do playstation spotify , plano, play, Tocar: caractere // parte do spotify pass: Inteiro // netflix/playtation senha Procedimento Musica() inicio Escreval("|~-~-~-~-~-~-~-~-~-~-~-~-~-~-~|") Escreval("| < = > |") Escreval("|0:00 .__________________ 3:20|") FimProcedimento inicio // USE PARA DIGITAR O PROGRAMA/MUSICA/FILMES DESEJADO O Q TIVER DEPOIS DO // 'TRAÇO' como THE WALKING DEAD - TWD . USE SOMENTE O 'TWD' Repita Escreval("Ligar TV ? S/N") Leia(TV) Ate TV = "S" Limpatela Escreval("~-~-~-~-~-~-SAMSUNG~-~-~-~-~-~-") Escreval("Programas: Netflix , Playstation") Escreval("Spotify") Escreval("Selecione o programa desejado: ") Leia(pro) LimpaTela Escolha pro // netflix -------------- Caso "Netflix" Escreval("Abrindo Netflix") Escreval("Digite seu email:") Leia(Mail) Escreval("Digite sua senha:") Leia(Pass) Escreval("Bem Vindo") LimpaTela Escreval("Filmes ou Series") Leia(busca) Escolha busca Caso "Series" Limpatela Escreval("Series Em Alta ") Escreval("The Walking Dead em Breve - TWD") Escreval("Games Of Thrones - GOT") Escreval("Stranger Things - ST") Escreval("Lucifer ") Leia(series) LimpaTela Se (series = "TWD") entao Escreval("The Walking Dead") Escreval("10º Temporada") Escreva("Episodios:16") senao Se (series = "GOT") entao Escreval("Game Of Thrones") Escreval("8º Temporada") Escreval("Episodios:6") senao Se (Series = "ST")entao Escreval("Stranger Things") Escreval("3º Temporada") Escreval("Epsodios: 8") senao Se (series = "Lucifer") entao Escreval("Lucifer") Escreval("4º Temporadas") Escreval("Episodios: 10") FimSe FimSe FimSe FimSe Caso "Filmes" Limpatela Escreval("Filmes Em Alta") Escreval("Coringa") Escreval("Vingadores Ultimato - VU") Escreval("ToyStore 4 - TS4") Escreval("Zumbilandia 2 - ZM2") Leia(Filmes) limpaTela Se (filmes = "Coringa") entao Escreval("Coringa") Escreval("Lançamento: 2019") Escreval("Duração: 2h2m") Escreval("Suspense/Drama") senao Se (filmes = "VU") entao Escreval("Vingadores Ultimato") escreval("Lançamento: 2019") escreval("Duração:3h2m ") Escreval("Fantasia/Fic.C") senao Se (Filmes = "TS4") Escreval("Toy Store 4") Escreval("Lançamento: 2019") Escreval("Duração: 1h40m") Escreval("Aventura/Fantasia") senao Se (filmes = "ZM2") Escreval("Zumbilandia 2") Escreval("Lançamento: 2019") Escreval("Duração: 1h39m") Escreval("Acão/Zumbi") Fimse FimSe FimSe FimSe FimEscolha//netflix final ---------------- Caso "Playstation" Escreval("Abrindo PlayStation") Escreval("Logue em sua conta") Escreval("Login:") leia(Mail) Escreval("Senha:") Leia(pass) Escreval("Bem Vindo") Escreval("Ver Loja ou Jogos intalados? - Loja/Instalados") leia(ps) Limpatela Escolha ps Caso "Instalados" Escreval("Jogos instalados na sua conta:") Escreval("The Last of Us - TLFU") Escreval("Grnad Theft Auto V - GTA5") Escreval("Fortnite") Escreval("Homem Aranha - HA") Escreval("God of War 4 - GOW4") Escreval("Selecione algum jogo") Leia(jogar) Caso "Loja" Escreval("Bem Vindo as lojas") Escreval("----EM DESTAQUE----") Escreval("") Escreval("PROMOÇÕES ANIVERSARIO SONY----") Escreval("RESIDENT EVIL 7 - RE7") Escreval("One Piece Grand Cruise - OPGC") Escreval("Doom VRF - DOOM") Escreval("Ice Combat 7 - IC7") Escreval("") Escreval("PROMOCÕES DIAS DAS CRIANÇAS----") Escreval("Red Dead Redeption 2 - RDR2") Escreval("Resident Evil 2 Remake - RE2") Escreval("Overwatch") Escreval("Grand Theft Auto V - GTA V") Escreval("Qual jogo voce quer ver?") Leia(game) LimpaTela Se (game = "RE7") entao Escreval("Resident Evil 7") Escreval("Capcom") Escreval("Survivor Horror") senao Se (game = "OPGC")entao Escreval("One Piece Grand Cruise") Escreval("BANDAI NAMCO") escreval("Aventura/Ação") senao Se (game = "DOOM")entao Escreval("DOOM VRF") Escreval("Bethesda") Escreval("RealidadeVirtual/Tiro") senao Se (game = "RE2")entao Escreval("Resident Evil 2 Remake") Escreval("Capcom") escreval("Survivor Horror") senao Se (game = "IC7")entao Escreval("Ice Combat 7") Escreval("BANDAI NAMCO/Project Aces") escreval("Simulador Combate Aereo ") senao Se (game = "RDR2")entao Escreval("Red Dead Redeption 2") Escreval("Rockstar Games") Escreval("Acao - Aventura") senao Se (game = "Overwatch")entao Escreval("Overwatch") Escreval("Blizzard") escreval("Acao em Primeira Pessoa") senao Se (game = "GTA5")entao Escreval("Grand Theft Auto V") Escreval("Rockstar Games") Escreval("Acao e Aventura") FimSe FimSe FimSe FimSe Fimse FimSe fimSe fimse Fimescolha // playstation final ---- Caso "Spotify" Escreval(" ABRINDO SPOTIFY ") Escreval("Bem Vindo") Escreval("Sua Conta Ja Estava Logada") Escreval("TESTAR PREMIUM GRATIS POR 3 MESES - Premium") Escreval("Abrir MediaPlayer - MediaPlayer") Leia(Spotify) limpaTela Se (Spotify = "Premium")entao Escreval("~-~-PLANOS~-~-") Escreval("Premium - 3 Meses Gratis - SOLO") Escreval("Valor: R$16.90") Escreval("Prmium Duo - 3 Meses Gratis - DUO") Escreval("Valor: R$21.90") Escreval("Prmium Familiar - 3 Meses Gratis - FAMILIAR") EscrevaL("Valor: R$26.90 ") Leia(Plano) LimpaTela Se (Plano = "Solo")entao Escreval("Comprando...") Escreval("Você acabou de aitvar o Spotify") Escreval("Abrindo MediaPlayer") senao Se (plano = "Duo")entao Escreval("Comprando...") Escreval("Você acabou de ativar o Spotify Duo") Escreval("Abrindo MediaPlayer") senao Se (plano = "Familiar")entao Escreval("Comprando...") Escreval("Você acabou de ativar o Spotify Familiar") Escreval("Abrindo MediaPlayer ") fimSe Fimse fimSe FimSe Se(Spotify = "MediaPlayer")entao Escreval("Abrindo MediaPlayer") FimSe Escreval("TOCADO RECENTEMENTE~-~-~-~-~-~-") Escreval("") Escreval("Musica Eletronica - Eletronica") Escreval("") Escreval("MALHAÇÃO~-~-~-~-~-~-~-~-~-~-~-~") Escreval("") Escreval("Pop Warmup 130 - Pop") Escreval("Projeto Verão - Projeto") Escreval("Workout") Leia(Play) LimpaTela Se (Play = "Eletronica")entao Escreval("Musica Eletronica") Escreval("Martin Garrix - Wizard") Escreval("R3HAB - Tiger") Escreval("Borgeus - BigBang") Escreval("KSHMR ,R3HAB - Karate") Escreval("Axwell - More Than You Know ") Escreval("Escreva o SOMENTE o nome do cantor") Leia(Tocar) limpaTela Se (tocar = "Martin Garrix") entao Escreval("Martin Garrix -Wizard") Musica() senao Se (tocar = "R3HAB")entao Escreval("R3HAB - Tiger") Musica() senao Se (tocar = "Borgeus")entao Escreval("Borgeus - BigBang") Musica() senao Se (tocar = "KSHRM")entao Escreval("Borgeus ,R3HAB - Karate") Musica() senao Se (tocar = "Axwell")entao Escreval("Axwell - More Than You Know") Musica() FimSe FimSe fimse FimSe Fimse FimSe Se (Play = "Pop")entao Escreval("Playslist Pop Warmup") Escreval("Martin Garrix - In the Name Of Love") Escreval("Imagine Dragons - Beliver") Escreval("Avicci - Without You") Escreval("Galantis - No Money") Escreval("Cash Cash - All My Love") Escreval("Escreva SOMENTE o nome do cantor") Leia(Tocar) LimpaTela Se (tocar = "Martin Garrix")entao Escreval("Martin garrix - In the Name Of Love") Musica() senao Se (tocar = "Imagine Dragons") entao Escreval("Imagine Dragons - Beliver") Musica() senao Se (tocar = "Avicci - Without You") entao escreval("Galantis - No Money") Music() senao Se (tocar = "Cash Cash")entao Escreval("Cash Cash - All My Love") Musica() fimSe FimSe FimSe FimSe FimSe Se (Play = "Projeto")entao Escreva("Playlist Projeto Verão") Escreval("Alok - Never Let Me Go") Escreval("Vitor Kley - O Sol") Escreval("Macklemore - Glorious") Escreval("Cat Dealers - Sober") Escreval("Kygo - First Time") Escreval("Escreva SOMENTE o nome do cantor") Leia(tocar) limpaTela Se (tocar = "Alok")entao Escreval("Alok - Never Let me Go") Musica() senao Se (tocar = "Vitor Kley") entao Escreval("Vitor Kley - O Sol") Musica() senao Se (tocar = "Macklemore")entao Escreval("Macklemore - Glorious") Musica() senao Se (tocar = "Cat Dealers")entao Escreval("Cat Dealers - Sober") Musica() senao Se (tocar = "Kygo") entao Escreval("kygo - Fist Time") Musica() fimSe fimSe FimSe FimSe FimSe fimse Se (play = "Workout") entao Escreval("Playlist Workout") Escreval("Hardwell - Power") Escreval("Logic - Everyday") Escreval("Imagine Dragons - Natural ") Escreval("R3HAB - Rumors") Escreval("Bourgeus - BigBang") Escreval("Escreva SOMENTE o nome do cantor") Leia(Tocar) LimpaTela Se (tocar = "Hardwell")entao Escreval("Hardwell - Power") Musica() senao Se (tocar = "Logic")entao Escreval("Logic - Everyday") Musica() senao Se (tocar = "Imagine Dragons")entao Escreval("Imagine Dragons - Natural") Musica() senao Se (tocar = "R3HAB")entao Escreval("R3HAB - Rumors") Musica() senao Se (tocar = "Borgeus")entao Escreval("Borgeus - BigBang") Musica() FimSe FimSe fimSe fimSe fimSe FimSe FimEscolha fimalgoritmo

Realmente este era o erro , valeu

Eu fiz um codigo com 380 linhas e os ultimos LimpaTela pararam de funcionar

valeu por tirar minha duvida

Quero saber se para aprender vetores preciso saber sobre funçoes , vou ver uma aula dor curso hj , e ja vi a parte de funçoes mas nao estou 100% (vou revisar amanha cedo) , queria saber se posso começar a ver a parte de VETORES sem problemas

Meu maior problema era isso mesmo , valeu

Depois que eu fico usando visualg e minimizo o ele , as vezes ele não abre mais , ai para fechar tenho que usar o Gerenciador de Tarefas . Tem alguma solução para isso ?

Estou fazendo um negocio tipo CLAHS ROYALE , estava fazendo o sistema de estrelas e percebi que não funciona o Se nem o Escolha algoritmo "ClashRoyale" //Criador: Cauã Souza //Data de inicio: 11/10/2019 var troops: Caractere Win: inteiro inicio Escreval("~-SuperCaua-~") Escreval("Bem Vindo ao ClashRoyale") Escreval("Monte seu deck") Leia(troops) Escolha Troops Caso "Basic" Escreval("voce escolheu O deck Basic") Escreval("Contem as seguintes cartas: ") Escreval("Cavaleiro, MiniPekka, Flechas, Arqueiras, Bomb") Escreval("Principe, Mosqueteira, Gigante") Caso "Advanced" Escreval("voce escolheu o deck Advanced") Escreval("Contem as seguintes cartas:") Escreval("Barril'G, GoblinLan., Gang'G, Foguete,Princesa") Escreval("Cavaleiro, Mago, Valkiria") Caso "Expert" Escreval("voce escolheu o deck Expert") Escreval("Contem as seguintes cartas:") Escreval("Pekka , MagoE., Tronco, Gang'G, Bebe Dra., TorreI") Escreval("Furia, Bruxa,") FimEscolha Escreval("Iniciar Partida") Escreval(" _____________ ") Escreval(" | X | ") Escreval(" | X X | ") Escreval(" | | | | ") Escreval(" | | | | ") Escreval(" |~~~~~~~~~~~~~| PARTIDA EM ANDAMENTO") Escreval(" | | | | ") Escreval(" | | | | ") Escreval(" | X X | ") Escreval(" | X | ") Escreval(" --------------- ") //Sistema de Vitoria Win <- RandI(100) Se (Win < 50) entao Escolha Win Caso (Win < 15) Escreval("voce ganhou 1 Estrela") Caso (Win > 15) e (Win < 35) Escreval("voce ganhou 2 Estrelas") Caso (Win > 35) e (Win < 50) Escreval("voce ganhou 2 Estrelas") fimEscolha Senao Escreval("voce perdeu") FimSe FIMALGORITMO Eu tentei fazer somente com o SE e tambem não funcionou Se (Win <=50) entao Se (Win < 15) entao Escreval("voce Ganhou 1 Estrla") Se (Win < 35)entao Escreval("voce ganhou 2 Estrelas") Se (Win < 50)entao Escreval("voce ganhou 3 Estrelas") Se (Win > 51) entao Escreval("voce Perdeu") FimSe FimSe FimSe FimSe FimSe

Ata é que eu estava em duvida se tinha outra funcionalidade mais importante (Não que isso nao seja) porque to não estou 100% bom nisso ainda

Estou aprendendo funçoes , ja prendi procedimento e quero saber um negocio , na vida de um programador essas duas coisas so servem para "atalho" para não ter que reescrever 50 linhas, ou tem mais coisas importantes alem disso ?

@Simon Viegas Eu queria que aparecece que eu ganhei xp , se no CASO O TIME QUE EU ESCOLHI GANHAR , vamos supor eu escolho o TR , se meu time ganhar ai aparece que eu ganhei xp ,

em vez do ryzen 3 pode colocar um Ryzen 5 1600 e uma rx 570

Esse é o codigo do time que ja esta certo Escolha Time Caso "CT" Escreval("voce entrou para CT") Caso "TR" Escreval("voce entrou para TR") Caso "ALEATORIO" Esc <- randi(100) Se (Esc >0) e (Esc < 50) entao Escreval("voce entrou para TR") senao Se(esc > 50) entao Escreval("voce entrou para CT") Fimse FimSe FimEscolha Quero implementar um sistema onde se o time que eu ganhasse ganharia "xp" , esse é o codigo onde gera quem e o vencedor da partida Escreval("Partida em Andamento") Escreval(".") Escreval(".") Escreval(".") Comp <- RandI(100) Se (Comp <= 50 ) entao Escreval("Os CT ganharam") senao Se (Comp > 50) entao Escreval("Os TR ganharam") Fimse Fimse Se

Estou fazendo um projeto (minijogo) mas eu queria implementar dois sistema mas não sei como começar, ai vai: Tenho dois times , fiz um sistema para eu escolher entrar em um time como , "Escolha o time x" ai eu digito qual eu quero entrar e entra de boa , passando mais pro final do projeto eu fiz um sistema aleatorio que mostra o time vencedor aleatoriamente . O meu problema: Quero que o time vencedor QUE EU ESCOLHI apareça uns comandos como voce ganhou xp, Vamos supor : Eu escolhi time "MIBR" entao se esse time ganhar eu quero que apareça uns comandos

valeu

Eu estou fazendo um curso de visualg ,mas eu queria mais metodos para dar um UP na minha logica , eu vi gente falando q jogar Sudoku ajuda a melhorar é verdade ? Falem metodos para min praticar

Sou mais Otimizar pelas ferramenta do Windows como o cara ai em cima falou , esse video do cara é bom

Eu acho bonito um da Aerocool Aero 500 https://www.terabyteshop.com.br/produto/6740/gabinete-aerocool-aero-500-branco-mid-tower-com-janela?gclid=Cj0KCQjwoebsBRCHARIsAC3JP0LtXHDij8v-JboosxhxwqGLzYP3fBPsMWRm9Yc2jPXO7H1j_ujgC04aAgr4EALw_wcB Edit: Ele tem a cor preta tambem

Eu passei uns arquivos para meu OneDrive (Do pc para pegar no celular) mas no celular ele não deixa fazer o download da minha pasta

Preciso pegar a somas dos 5 numeros algoritmo "AnalisadorDeValores" var to: Inteiro inicio Para To <- 1 ate 5 faca Escreval("Escreval o ",to , "o. numero") Leia(To) FimPara fimalgoritmo

Por que n pega um a20 ou a30 ja que estão quase na mesma faixa de preço

Resolvi criar um codigo "Receita De Bolo" , eu começei a usar visualg a 2 semanas e quero saber se eu estou indo bem para um iniciante (OBS: eu tive a ideia do codigo e montei o exercicio na minha cabeça) algoritmo "ReceitaDeBolo" var Ig, Ac, Ovo, Bat: caractere Forno, min,T: Inteiro inicio Escreval("FAZENDO um BOLO") Repita Escreval("voce tem 1/2 Xicara de Margarina? S/N") Leia(Ig) Ate Ig = "S" Repita Escreval("Tem 1 xicara de açucar ? S/N") Leia(Ac) Ate Ac = "S" Repita Escreval("Tem 3 Ovos ? S/N") Leia(Ovo) Ate Ovo = "S" Escreval("Colocando o resto dos igreditentes") Escreval(".") Escreval(".") Escreval("---------------") Escreval("MODO DE PREPARO") Escreval("---------------") Escreval("Ligue o forno a 180 Graus") leia(Forno) Se (Forno = 180)entao Escreval("Forno Aquecendo...") senao Se (Forno < 180) entao Escreval("A temperatura esta baixa! o bolo nao vai esquentar ") Escreval("Coloque em 180 graus") Leia(Forno) Escreval("Forno em ", Forno, " Graus") senao Escreval("Forno alto demais , O bolo pode queimar") Escreval("Coloque em 180 graus") Leia(Forno) Escreval("Forno em ",Forno, " Graus") FimSe FimSe Escreval("Ligue a batedeira: Ligado/Desligado ") Leia(Bat) Se (Bat = "Ligado")entao Escreval("---------------------------------------------------------------") Escreval("Em uma batedeira bata a margarina e o açucar ate formar um creme") Escreval("claro . Junte os ovos um a um ate formar uma mistura") Escreval("esbranquiçada") Escreval("---------------------------------------------------------------") Senao Escreval("Ligue a batedeira: Ligado/Desligado") Leia(Bat) Escreval("---------------------------------------------------------------") Escreval("Em uma batedeira bata a margarina e o açucar ate formar um creme") Escreval("claro . Junte os ovos um a um ate formar uma mistura") Escreval("esbranquiçada") Escreval("---------------------------------------------------------------") FimSe Escreval("Misture iorgute e o suco de limao e reserve") Escreval("Fazendo o resto do modo de preparo") Escreval(".") Escreval(".") Escreval("Leve o bolo ao forno e deixe por 35 minutos") Escreval("Tempo do bolo: ") leia(T) Se (T = 35)entao Escreval("35 Minutos depois ...") Escreval(" {--|--|--} ") Escreval(" {********} Seu Bolo esta pronto ") Escreval(" \_{________}_/ ") senao Se (T > 35)entao Escreval("Bolo queimado, voce perdeu o bolo so fazendo outro agora :(") senao Escreval("Bolo não esta no ponto, ") Fimse Fimse fimalgoritmo

@devair1010 Obrigado , eu esqueci de colocar as aspas no tr

Tava fazendo um "jogo" e deu um erro "Esperava-se encontrar o entao" mas o entao esta certo algoritmo "Csgo" //Criador: Cauã Souza //Data: 05/10/2019 var time: caractere buy, cash: Inteiro b1 , b2 , b3 , b4: inteiro inicio Escreval("-------CreatForCauã-------") Escreval("-----VisualgOffensive-----") Escreval("Qual time voce vai entrar?") Escreval("------CT , TR------") Leia(Time) Escolha Time Caso "CT" Escreval("voce entrou para CT") Caso "TR" Escreval("voce entrou para TR") FimEscolha Escreval("Seu dinheiro: 10000") Cash <- 10000 Se (Time = TR) entao Escreval("Lista de Armas") Escreval(" 1- USP 500$ 4- AWP 4750$") Escreval(" 2- AK-47 2700$ 3- SCAUT 1500$") Escreval(" /MENU DE COMPRA\ ") Escreval(" / b1 | b4 \ ") Escreval(" / b2 | b3 \ ") b1 <- 500 b2 <- 2700 b3 <- 1500 b4 <- 4750 Senao Escreval("Lista de Armas") Escreval(" 1- USP 500$ 4- AWP 4750$") Escreval(" 2- M4A4 3100$ 3- SCAUT 1500$") Escreval(" /MENU DE COMPRA\ ") Escreval(" / b1 | b4 \ ") Escreval(" / b2 | b3 \ ") b1 <- 500 b2 <- 3100 b3 <- 1500 b4 <- 4750 FimSe Leia(buy) Escolha buy fimalgoritmo