UMC-ASTEC

Salvar "Print Screen" - Java

2012-10-09T14:52:00.000-03:00

import java.awt.Rectangle;
import java.awt.Robot;
import java.awt.Toolkit;
import java.awt.image.BufferedImage;
import java.io.File;
import java.text.SimpleDateFormat;
import java.util.Date;
import javax.imageio.ImageIO;
import javax.swing.JOptionPane;

public class Main {
    public static void main(String[] args) {
        try{
            BufferedImage imagem = new Robot().createScreenCapture(new Rectangle(Toolkit.getDefaultToolkit().getScreenSize()));

            SimpleDateFormat dateFormat = new SimpleDateFormat("ddMMyyyyhhmm");
            String data = dateFormat.format(new Date());

            File file = new File("D:\\imagem" + data + ".jpg");

            ImageIO.write(imagem, "jpg", file);

        }catch(Exception e){
            JOptionPane.showMessageDialog(null, "Erro: " + e);
        }
    }
}

Como tocar MP3 - Java

2012-09-28T17:31:00.003-03:00

Esses dias tive a curiosidade de saber como tocar MP3 em java, e com alguns minutos descobri o quanto isso pode ser simples, graças as centenas de bibliotecas opensource que a comunidade JAVA já está acostumada. Darei um breve exemplo usando a biblioteca JLayer.
Para começar, faça o donwload em http://www.javazoom.net/javalayer/javalayer.html. É um arquivo bem pequeno que já vem com a documentação e o único jar necessário.
Adicione o arquivo jl1.0.jar ao CLASS_PATH da sua aplicação e análise o exemplo a seguir:
import java.io.FileInputStream;
import java.io.FileNotFoundException;
import javazoom.jl.decoder.JavaLayerException;
import javazoom.jl.player.Player;

public class Tocador {
public static void main (String args[]){
FileInputStream in;
try {
//Inicializa o FileInputStream com o endereço do arquivo para tocar
in = new FileInputStream("D:/Hey Jude.mp3");

//Cria uma instancia da classe player passando para ele o InpuStream do arquivo
Player p = new Player(in);

//executa o som
p.play();
} catch (FileNotFoundException e) {
e.printStackTrace();
} catch (JavaLayerException e) {
e.printStackTrace();
}
}
}

Retirado em 28/09/2012 do site : http://falandoemtecnologia.wordpress.com/2009/09/22/como-tocar-mp3-em-java/

Inverter número inteiro com 3 algarismos - JAVA

2012-08-29T14:05:00.000-03:00

    public void inverterNumero(){
       int x, a, b, c;
       x= 123;
       a= x / 100;
       b= (x % 100) / 10;
       c= (x % 100) % 10;
       System.out.println(c + b + a);
   }

Obter o nome do mês a partir de uma data - Java

2012-07-17T17:39:00.000-03:00

public static void main(String[] args) throws ParseException {
       Date data = null;
        try {
            data = new SimpleDateFormat("yyyy-MM-dd").parse("2012-07-17");

            String dataFormatada = new SimpleDateFormat("MM").format(data);

            System.out.println(dataFormatada);

            SimpleDateFormat sdf = new SimpleDateFormat("MM");
           Date mesDate = sdf.parse(dataFormatada);
           sdf.applyPattern("MMMM");
           System.out.println(sdf.format(mesDate));

        }
        catch (ParseException e) {
            e.printStackTrace();
        }
    }

Subversion e Ant - Capturando o número da última revisão - Ant

2012-06-18T15:02:00.000-03:00

O número da revisão será exibido no console e será salvo no arquivo "build.txt"

Estrutura do Projeto

build.xml

Download do projeto.

Remover acentuação - JAVA

2012-05-30T10:23:00.000-03:00

Uma solução fácil e simples.

String input = "áéíóú-ÁÉÍÓÚ";
input = Normalizer.normalize(input, Normalizer.Form.NFD);
input = input.replaceAll("[^\\p{ASCII}]", "");
System.out.println(input);

Solução retirada do: http://javafree.uol.com.br/topic-871337-Remover-acentuacao.html

Como colocar bordas arredondadas em um Bitmap?

2012-04-30T12:04:00.000-03:00

private static Bitmap getRoundedCornerBitmap(Bitmap bitmapOld, int roundPixel) {
   Bitmap output = Bitmap.createBitmap(bitmapOld.getWidth(), bitmapOld.getHeight(),    Config.ARGB_8888);
   Canvas canvas = new Canvas(output);
   final Paint paint = new Paint();
   final Rect rect = new Rect(0, 0, bitmapOld.getWidth(), bitmapOld.getHeight());
   final RectF rectF = new RectF(rect);
   final float roundPx = roundPixelSize;
   paint.setAntiAlias(true);
   canvas.drawRoundRect(rectF, roundPx, roundPx, paint);
   paint.setXfermode(new PorterDuffXfermode(Mode.SRC_IN));
   canvas.drawBitmap(bitmapOld, rect, rect, paint);

   return output;
}

Fonte: http://debugcodigos.blogspot.com.br/2012/02/para-nunca-mais-esquecer-3-android.html

Entendendo o serialVersionUID - JAVA

2012-03-28T15:18:00.002-03:00

O serialVersionUID é uma dúvida constante entre muitos desenvolvedores. Afinal, quando e para que exatamente usá-lo? Devo gerar um número aleatório bem grande, ou um número qualquer? Essas perguntas são comuns, e ao desenvolvedor experiente é necessário conhecer a fundo esse detalhe do processo de serialização do Java.

Quando um objeto é serializado no Java, essa sequência de bytes, além de conter seus atributos de instância não transientes, carrega consigo um número que indentifica a “versão” da classe que foi usada durante o processo. Esse é o chamado serialVersionUID, ou seja, o indentificador de versão de serialização de uma classe. Esse número é utilizado para saber se o objeto que estamos recuperando é de uma versão “compatível” com a versão da classe que foi utilizada quando serializamos o objeto: em outras palavras, os arquivos .class não precisam ser necessariamente os mesmos para que o processo de serialização ocorra com sucesso.

Por exemplo, considere a seguinte classe Usuario:

package br.com.caelum;

public class Usuario implements Serializable {

  private String login;

}

Essa classe possui o serialVersionUID igual a 2806421523585360625L. Esse número não é aleatório! Ele é um hash (SHA) calculado em cima dos nomes dos seus atributos, e assinaturas dos métodos em uma ordem bem definida pela especificação do processo de serialização. E como eu sei esse número? O JDK vem com a ferramenta serialver, que implementa esse mesmo hash:

serialver br.com.caelum.Usuario

Se o serialVersionUID utilizado durante a serialização não bater exatamente com oserialVersionUID da classe que está sendo usada para recuperar essa informação, uma exception é lançada: java.io.InvalidClassException.

Por exemplo, se adicionarmos um novo atributo na nossa classe Usuario:

public class Usuario implements Serializable {

  private String login;

  private String senha;

}

Agora teremos o serialVersionUID valendo 416295346730660862L. Caso você serialize umUsuario com a primeira classe aqui definida, e tentar recuperar essa informação usando essa nova versão de classe, receberemos a conhecida java.io.InvalidClassException. Esse é o comportamente que em muitos casos queremos, mas algumas vezes fazemos pequenas modificações na classe as quais percebemos que não impactarão no processo de serialização, e precisamos manter compatibilidade com a versão antiga daquela classe. Para isso, basta definirmos explicitamente qual é o nosso serialVersionUID, e no caso de querer manter compatibilidade com a classe Usuario anterior, vamos utilizar o valor de serialVersionUID que seria gerado pela JVM: 2806421523585360625L. O código ficaria:

public class Usuario implements Serializable {

  private static final long serialVersionUID = 2806421523585360625L;

  private String login;

  private String senha;

}

Às vezes recebemos um warning do Eclipse, e ele pede para que seja definido oserialVersionUID da classe em questão. Isso ocorre porque você implementa Serializable ou uma de suas mães a implementa. O Eclipse então te abre três opções: utilizar o@SurpressWarnings para você assumir o risco, usar um valor default, ou usar o valor gerado. O gerador de UIDs do Eclipse é exatamente o mesmo gerador utilizado pelo Java SE para criar os UIDs padrão! Reforçando, esse número não é um número aleatório!

Quando alguém esquece de manter o mesmo serialVersionUID para duas versões compatíveis de uma classe, podemos ter problemas em usar diferentes versões do software que são teoricamente compatíveis. Isso muitas vezes acontece em servidores de aplicação, e se seu cliente esta desatualizado em relação a versão dos jars necessários pelo servidor, podemos ter algunsInvalidClassExceptions que poderiam ser facilmente evitados se o serialVersionUID tivesse sido corretamente aplicado. Claro que algumas outras vezes as versões realmente não são compatíveis e a exception procede.

Esse grave problema pode acontecer mesmo usando classes do Java SE entre diferentes versões, como é o caso da classe java.text.AttributedCharacterIterator.Attribute (utilizada pelajava.awt.Font). Do Java 1.3 para o Java 1.4 essa classe foi levemente alterada, e oserialVersionUID gerado pelo algoritmo da JVM desta classe mudou de-1514471214376796190L para -9142742483513960612L. Quando alguém serializava umajava.awt.Font em uma versão não podia desserializa-la em outra, sendo que as versões tecnicamente são compatíveis: a não definição explícita do serialVersionUID gerou um bug no Java SE. Como isto foi resolvido? Definiram o serialVersionUID como -1514471214376796190L, que é o valor que seria gerado pela JVM na versão anterior da classe.

Como então devemos proceder para escolher um serialVersionUID apropriado? É muito simples: se essa classe está nascendo neste momento, você pode se dar ao luxo de utilizar umserialVersionUID, como por exemplo:

public class Usuario implements Serializable {

  private static final long serialVersionUID = 1L;

  private String login;

}

Porém se você está definindo o serialVersionUID de uma classe já em produção, e sabe que a mudança que está fazendo é compatível com a versão anterior, você deve utilizar oserialVersionUID que seria gerado pela JVM na primeira versão, como foi o caso aqui quando adicionamos o atributo senha na classe Usuario, e também foi o caso da correção do bug da classe java.text.AttributedCharacterIterator.Attribute. Quando você fizer uma alteração onde percebe que o cliente precisará de atualização das classes envolvidas, basta definir um serialVersionUID diferente dos anteriormente utilizados.

Para completar, implementar uma interface que não define métodos (Serializable) e ser forçado a escrever um atributo sem um contrato mais burocrático é um tanto estranho em uma linguagem como o Java. Sem dúvida, se esse mecanismo todo tivesse sido inventado já com a existência de anotações, Serializable seria uma anotação e version um atributo dela, talvez obrigatório, criando algo como @Serializable(version=12345L). Boas serializações e invocações remotas!

Fonte: http://blog.caelum.com.br/entendendo-o-serialversionuid/

Instalar APK a partir da sua aplicação - Android

2012-02-27T21:00:00.000-03:00

File apk = new File( Environment.getExternalStorageDirectory() + "/Copas.apk");
Intent it = new Intent(Intent.ACTION_VIEW);
it.setDataAndType(Uri.fromFile(apk),
"application/vnd.android.package-archive");
startActivity(it);

Fonte: http://nglauber.blogspot.com/2012/02/android-dicas-6.html

Capturar memória do PC (RAM) - Java

2012-01-27T13:08:00.002-02:00

1º post do ano de 2012! :D

import java.lang.management.ManagementFactory;
import com.sun.management.OperatingSystemMXBean;

public class CapturaRAM {

    public static void main(String[] args) {
        OperatingSystemMXBean mxbean = (OperatingSystemMXBean) ManagementFactory.getOperatingSystemMXBean();
        System.out.println("Memoria total : " + (((new Double(mxbean.getTotalPhysicalMemorySize()) / 1024) / 1024) /1024) + " GB ");
    }
}

Mais sobres as funções utilizadas:
ManagementFactory
OperatingSystemMXBean

Configurar Hibernate via (xml) e (programação) - JAVA

2011-12-29T09:11:00.001-02:00

xml:

hibernate.cfg.xml

""<""?xml version="1.0" encoding="UTF-8"?>
""<""!DOCTYPE hibernate-configuration PUBLIC "-//Hibernate/Hibernate Configuration DTD 3.0//EN" "http://hibernate.sourceforge.net/hibernate-configuration-3.0.dtd">
""<""hibernate-configuration>
""<""session-factory>
"<"property name="hibernate.dialect">org.hibernate.dialect.MySQLDialect
"<"property name="hibernate.connection.driver_class">com.mysql.jdbc.Driver
"<"property name="hibernate.connection.url">jdbc:mysql://localhost:3306/nomeDoBancoDados
"<"property name="hibernate.connection.username">root
"<"property name="hibernate.connection.password">root
"<"mapping class="br.com.umcastec.bean.Cliente"/>
"<"/session-factory>
"<"/hibernate-configuration>

programação:
HibernateUtil.java

package br.com.umcastec.util;

import org.hibernate.SessionFactory;
import org.hibernate.cfg.AnnotationConfiguration;
import org.hibernate.cfg.Configuration;

public class HibernateUtil {

private static final SessionFactory sessionFactory;

static {

AnnotationConfiguration annotationConfig = new AnnotationConfiguration();

try {

annotationConfig.setProperty("hibernate.dialect", "org.hibernate.dialect.MySQLDialect");
annotationConfig.setProperty("hibernate.connection.driver_class", "com.mysql.jdbc.Driver");
annotationConfig.setProperty("hibernate.connection.url", "jdbc:mysql://localhost:3306/nomeDoBancoDados");
annotationConfig.setProperty("hibernate.connection.username", "root");
annotationConfig.setProperty("hibernate.connection.password", "root");

annotationConfig.addAnnotatedClass(br.com.umcastec.bean.Cliente.class); //add todas as classes "JPA annotated"

} catch (Exception ex) {
ex.printStackTrace();
}

sessionFactory = annotationConfig.buildSessionFactory();

}

public static SessionFactory getSessionFactory() {
return sessionFactory;
}
}

obs: no trecho de código do xml, coloquei aspas no símbolo "<".

break em for(;;) usando Label - Java

2011-11-29T18:17:00.001-02:00

forPai : for(int i = 0; i <10;i++){
for(int j=0; j<10;j++){
break forPai; //aqui faz com quer o primeiro for(;;) saia do for externo;
}
}

Reproduzir vídeo - Android

2011-10-30T13:07:00.002-02:00

@Override
public void onCreate(Bundle bundle ) {
       super.onCreate(bundle );

       VideoView videoView = new VideoView(this);
        setContentView(videoView);
        videoView.setVideoPath("sdcard/videos/video01.3gp");
        videoView.setMediaController(new MediaController(this));
        videoView.requestFocus();
}

Emitir um Beep em Java - Java

2011-09-29T12:36:00.000-03:00

import java.awt.Toolkit;

public class EmitirBeep {
public static void main(String[] args) {
Toolkit.getDefaultToolkit().beep();// 1ª opção
System.out.print ("\u0007");// 2ª opção
}
}

Verificar se há conexão com internet - Android

2011-08-31T07:49:00.003-03:00

public boolean conexaoInternet(Context context) {

ConnectivityManager conn = (ConnectivityManager) context.getSystemService(Context.CONNECTIVITY_SERVICE);

NetworkInfo net = conn.getActiveNetworkInfo();

return (net != null && net.isConnected());

}

Hello Android

2011-07-29T14:28:00.001-03:00

package com.example.helloandroid;

import android.app.Activity;
import android.os.Bundle;
import android.widget.TextView;

public class HelloAndroid extends Activity {
   /** Called when the activity is first created. */
   @Override
   public void onCreate(Bundle savedInstanceState) {
       super.onCreate(savedInstanceState);
       TextView tv = new TextView(this);
       tv.setText("Hello, Android");
       setContentView(tv);
   }
}

Fonte: http://developer.android.com/resources/tutorials/hello-world.html

O que é SPED Fiscal? - SPED

2011-06-29T12:37:00.002-03:00

1) O que é SPED Fiscal?

O SPED Fiscal é um conjunto de escrituração de documentos fiscais, apuração de alguns impostos e outras informaçoes de interesse dos fiscos das unidades federativas e da Receita Federal do Brasil

Na legislação Sped Fiscal é nomeado Escrituração Fiscal Digital (EFD).

2) Quais os livros que abrangem o SPED Fiscal?

A escrituração Fiscal substitui a escrituração e impressão dos seguintes livros:

Registro de Entradas,

Registro de Saídas,

Registro de Inventário,

Registro de Apuração do IPI e

Registro de Apuração do ICMS.

3) Quem está obrigado a adotar o EFD?

A partir de janeiro de 2009: os contribuintes do Imposto sobre Operações Relativas à Circulação de Mercadorias e sobre Prestações de Serviços de Transporte Interestadual e Intermunicipal e de Comunicação - ICMS ou do Imposto sobre Produtos Industrializados – IPI.

4) Quem está dispensado da EFD?

O fisco da unidade federada do contribuinte e a Secretaria da Receita Federal podem dispensar o contribuinte da obrigação estabelecida. A Legislação do Simples Nacional excetua os contribuintes enquadrados nesse Regime da entrega da EFD.

5 ) Quais os membros do SPED que têm acesso aos livros digitais do EFD?

As unidades federadas onde se localiza o estabelecimento da empresa.

6) Em janeiro de 2009, a entrega do SPED Fiscal substituirá também o Sintegra e as GIAs das UFs que aderiram? Caso não, há alguma previsão?

O objetivo do Fisco é identificar a possibilidade desta substituição no projeto piloto, através do cruzamento dos arquivos do SPED Fiscal com o Sintegra e as GIAs. Caso não seja aprovado, estas obrigações permanecerão paralelas até que possam ser substituídas.

7) Como serão tratados os regimes especiais?

Em relação aos Regimes Especiais cada UF se encarregará de adequá-lo ao cenário do Sped Fiscal. Importante, destacar que para o Sped NF-e o tratamento já foi definido, ou seja, os regimes são cassados, e o contribuinte deve solicitá-los novamente, mas, no modelo eletrônico.

8) Qual a posição do fisco em relação à alíquota de ICMS de produto por UF?

Este campo foi solicitado pela UF de SP, e a informação deve ser fornecida na ótica do informando, por estabelecimento.

9) Qual é a multa para o SPED?

Existe a multa pela falta de entrega do arquivo - R$ 5.000,00, além disso, não caíram as multas previstas para as obrigações substituídas, a saber:
A) IN 86/01 - Penalidades
As penalidades estão previstas no artigo 12 da Lei n.º 8.281/91 que estabelece:
multa de 0,5% (meio por cento) do valor da receita bruta da pessoa jurídica no período, aos que não atenderem à forma em que devem ser apresentados os registros e respectivos arquivos;
multa de 5% (cinco por cento) sobre o valor da operação correspondente, aos que omitirem ou prestarem incorretamente as informações solicitadas.
B) Livros fiscais - Cada estado estabelece uma multa pela falta de escrituração do livro fiscal.

Fonte:

http://www.linsoftnet.com.br/index.php?option=com_content&view=article&id=125:o-que-e-sped-fiscal&catid=39:linsoft-artigos-a-palestras&Itemid=102

Obter propriedades de rede do computador - JAVA

2011-05-25T14:04:00.002-03:00

public void Prop_Rede()
throws UnknownHostException, SocketException
{
List list = new ArrayList();
System.out.println("Obtendo Informacões da Rede:");
InetAddress addr = InetAddress.getLocalHost();
byte[] ipAddr = addr.getAddress();
String hostname = addr.getHostName();

System.out.println("Nome do Computador completo: " + hostname);

InetAddress localHost = Inet4Address.getLocalHost();
NetworkInterface networkInterface = NetworkInterface.getByInetAddress(localHost);
System.out.println("Placa: " + networkInterface.getDisplayName());
try
{
System.out.println("Rede: " + NetworkInterface.getNetworkInterfaces().nextElement());
} catch (SocketException ex) {
Logger.getLogger(Propriedade_sistema.class.getName()).log(Level.SEVERE, null, ex);
}

try
{
Enumeration ifaces = NetworkInterface.getNetworkInterfaces();

while (ifaces.hasMoreElements()) {
NetworkInterface iface = (NetworkInterface)ifaces.nextElement();

System.out.println("Obtendo Informacões da interface: " + iface.getName());
for (InterfaceAddress address : iface.getInterfaceAddresses())
{
System.out.println("IP........: " + address.getAddress().toString());
Object bc = address.getBroadcast();
System.out.println("Broadcast.: " + bc);
System.out.println("Máscara...: " + address.getNetworkPrefixLength());

}

}

}
catch (SocketException ifaces)
{
ex.printStackTrace();
}

}

download do sitema de obter propriedades do PC aqui

Gerar executável ".EXE" de um sistema em Java ".JAR" - Java

2011-04-25T07:52:00.004-03:00

crie ou edite o build.xml do seu projeto

build.xml

"<"project name="JavaApplication2" default="default" basedir=".">

"<"description>Builds, tests, and runs the project JavaApplication2.

"<"property file="build.properties"/>

"<"echo>${launch4j.dir}

"<"taskdef

name="launch4j"

classname="net.sf.launch4j.ant.Launch4jTask"

classpath="${launch4j.dir}/launch4j.jar;

${launch4j.dir}/lib/xstream.jar"

"<"target name="exe">

"<"launch4j configFile="${project.config.exe}"/>

"<"/target>

"<"/project>

crie o arquivo JavaAplication.l4j.xml no mesmo diretório do build.xml

JavaAplication.l4j.xml

"<"launch4jConfig>

"<"headerType>gui

"<"jar>dist/JavaApplication.jar

"<"outfile>dist/JavaApplication.exe

"<"errTitle>JavaAplication

"<"chdir>.

"<"customProcName>true

"<"icon>

"<"jre>

"<"minVersion>1.6.0

"<"opt>-Xmx200m -Xcheck:jni

"<"/jre>

"<"/launch4jConfig>

Download do launch4J

http://sourceforge.net/projects/launch4j/files/launch4j-3/3.0.2/

Descompacte em algum lugar de sua preferência

e crie o arquivo "build.properties" na mesma pasta onde se encontra o "build.xml"

//***

build.properties

launch4j.dir=Coloque aqui o diretório onde você descompactou o launch4J Ex: C:/Documents and Settings/user/Desktop/launch4j

project.config.exe=JavaAplication.l4j.xml

//***

Feito isso, peça pra "construir" o .jar

Obs: coloquei aspas no menor que "<", basta tira-las para funcionar.

Dica enviado por Reinaldo de Carvalho

Java Scripting API - Java

2011-03-27T19:45:00.003-03:00

O JavaTM Scripting API é uma estrutura Indepedent linguagem de script para usar os motores de script a partir do código Java.Com a API Java Script, é possível escrever aplicações personalizáveis / prorrogável na linguagem Java e deixar aescolha de língua scripting personalização para o usuário final.

import javax.script.*;

public class EvalScript {

public static void main(String[] args) throws Exception {

// criar um gerenciador de mecanismo de script

ScriptEngineManager factory = new ScriptEngineManager();

// criar um motor de JavaScript

ScriptEngine engine = factory.getEngineByName("JavaScript");

// cria um objeto Java

String name = "UMC-ASTEC";

// criar a vinculação

engine.put("name", name);

// avaliar o código JavaScript de String

engine.eval("println('Visite sempre o blog, ' + name)");

engine.eval("println('O tamanho da palavra é ' + name.length)");

}

Referência

http://download.oracle.com/javase/6/docs/technotes/guides/scripting/programmer_guide/index.html

Algoritmo

2011-02-12T16:03:00.003-03:00

O que é um algoritmo?
Um algoritmo é uma seguência finita de passos que levam a execução de uma tarefa.
Podemos pensar que algoritmo é igual uma receita de bolo. Estas tarefas não podem ser redundantes nem subjetivas na sua definição, devem ser claras e precisas.

Como se escreve um Algoritmo?
Na hora de escrever um algoritmo precisamos descrever a sequência de instruções, de maneira simples e objetiva.
Duas técnicas simples:

Frases curtas e simples
Ser Objetivo
Dentre outras...

Um algoritmo pode descrever qualquer tarefa padrão, como por exemplo: Fazer um bolo, beber água etc.

Ao montar um algoritmo devemos dividi-lo em três partes:
ENTRADA -> PROCESSAMENTO -> SAÍDA

ENTRADA: São os dados de entrada do algoritmo.
PROCESSAMENTO: São os procedimentos utilizados para chegar ao resultado final.
SAÍDA: São os dados já processados.

Exemplos de algoritmos podem ser vistos aqui:
http://umcastec.blogspot.com/search/label/Algoritmo

Maior ou menor de idade - Visualg

2011-02-12T00:18:00.002-03:00

algoritmo "maimenidade"
// Função : Verifica pela idade se a pessoa é maior ou menor de idade
// Autor : Uandisson
// Data : 11/2/2011
// Seção de Declarações
var
idade, idadepadrao:inteiro
inicio
// Seção de Comandos
idadepadrao := 18

escreva("Qual sua idade? ")
leia(idade)
se idade >= idadepadrao entao
escreva("Ok, maior de idade está liberado!")
senao
escreva("Menor de idade não pode passar!")
fimse

// Fim da Seção de Comandos
fimalgoritmo

Descobrir a idade - Visualg

2011-02-12T00:13:00.001-03:00

algoritmo "descobreidade"
// Função : Descobrir a idade que você terar no ano que você pedi
// Autor : Uandisson
// Data : 11/2/2011
// Seção de Declarações
var
ANOnasc, ANOatual, idade:inteiro //declaração das variáveis que irei utilizar
inicio
// Seção de Comandos

escreva("Seu ano de nascimento. ")//escreve no vídeo o que está entre aspas duplas
leia(ANOnasc)//leitura de teclado da data de nascimento

repita //laço de repetição só sai quando a condição "ate" seja verdadeira
escreva("Ano que deseja que calcule a idade. ")//escreve no vídeo o que está entre aspas duplas
leia(ANOatual)//leitura de teclado da tada que deseja que revele a idade que terá quando chegar lá

se ANOatual <= ANOnasc entao//verifica se a data atual é menor ou igual a data de nascimento informada escreval("Digite uma data maior que a de nascimento.") fimse//final do se ate ANOatual > ANOnasc//so para de repeti se a data atual for maior que a data de nascimento
idade <- ANOatual - ANOnasc//atribui o resultado da subtração do ano atual com o ano de nascimento a variavel idade se idade > 100 entao//verifica se a idade vai ser maior que 100 anos
escreva("Você com ", idade, " anos, talvez você não cheque lá. kkkk")
senao//passando aqui, isso significa que a idade é menor que 100 anos
escreva("No ano ", ANOatual, ", você completara, ", idade, " anos.")//escreve a idade que você fará no ano escolhido
fimse//fim do se

// Fim Seção de Comandos
fimalgoritmo

Jogo da Sorte é um algoritmo feito com Visualg

2011-02-09T14:22:00.006-03:00

Download do Visualg aqui

algoritmo "jogo da sorte"

var

li, ls, tentativas, palpite: inteiro

resposta: caracter

inicio

li <- 0

ls <- 1000

tentativas <- 1

repita

palpite <- (ls - li)\2 + li

escreva("Seu numero é maior, menor ou igual a ", palpite, "? ")

leia(resposta)

se resposta = "igual" entao

escreval("ACERTEI!!")

senao

se resposta = "maior" entao

li <- palpite

senao

se resposta = "menor" entao

ls <- palpite

senao

escreval("Reposta incorreta.")

escreval("Escreva uma das palavras: maior, menor ou igual")

fimse

tentativas <- tentativas + 1

fimse

ate ((tentativas > 10) OU (resposta = "igual"))

se tentativas > 10 entao

escreval("Infelizmente não consegui acertar ...")

senao

escreval("Tentativas: ", tentativas)

fimse

// Seção de Comandos

fimalgoritmo

Visualg

2011-02-09T14:17:00.001-03:00

O VisuAlg é um programa que edita, interpreta e executa algoritmos com uma linguagem próxima do português estruturado, como um programa normal de computador

Fonte: http://pt.wikipedia.org/wiki/Visualg

Download