Programa lê nome (básico) - Pascal para iniciantes

Publicado por rafael farias novaes 28/01/2009

[ Hits: 9.084 ]

Homepage: http://www.vivaolinux.com.br/perfil/verPerfil.php?login=bfmano

Download le o nome.txt




Este programa permite ler nomes. Simples.

  



Esconder código-fonte

program digite_seu_nome;
uses crt;

var nome:string;

begin
  clrscr;
  writeln('Qual é o seu nome:');
  readln(nome);
  if nome='sl@ckw@re' then
    writeln('Você é o cara!')
  else
    writeln('Eu não te conheço!');
  readkey;
end.

Scripts recomendados

Média e soma de números

mais um modelo de programa com vetor

Visualizador de imagem Pascal/Lazarus

Calculadora Empresarial (Baseada nas fórmulas de Logística)Lazarus

Script Tabuada


  

Comentários

Nenhum comentário foi encontrado.


Contribuir com comentário




Patrocínio

Site hospedado pelo provedor RedeHost.
Linux banner

Destaques

Artigos

Dicas

Tópicos

Top 10 do mês

Scripts