escreve os números de 1 a 9 com repeat - until
Publicado por NewLinuxer 14/12/2005
[ Hits: 7.205 ]
programa de exemplo feito pra escrever os números de 1 a nove com o repeat - until
program Exemplo;
uses crt;
var i: integer;
{escreve os números de 1 a 9}
begin
clrscr;
i:= 1;
repeat
writeln(i);
i:= i+1;
writeln;
until(i=10);
readkey;
end.
Operações básicas da matemática
Cálculadora de décimo terceiro
encontrar o maior e o menor valor em um vetor
Existência de triângulo, em Pascal
Sinceramente acho que esse tipo de script soh contribue negativamente para o site. Acredito que o site deveria ser mais seletivo quanto ao que publica. Dar essa quantidade de pontos pra esse tipo de script e o mesmo para qq outro (útil) que eu venha a fazer me desestimula muito a escrever qq coisa por aqui.
caro Jobsavage, gostaria de lhe dizer que esta seção se trata de introdução portanto, é um local para se colocar scripts simples para quem não tem familiaridade com a linguagem.
é uma forma de ensinar a linguagem
Patrocínio
Destaques
Artigos
Armazenando a senha de sua carteira Bitcoin de forma segura no Linux
Enviar mensagem ao usuário trabalhando com as opções do php.ini
Meu Fork do Plugin de Integração do CVS para o KDevelop
Compartilhando a tela do Computador no Celular via Deskreen
Como Configurar um Túnel SSH Reverso para Acessar Sua Máquina Local a Partir de uma Máquina Remota
Dicas
Encontre seus arquivos facilmente com o Drill
Mouse Logitech MX Ergo Advanced Wireless Trackball no Linux
Compartilhamento de Rede com samba em modo Público/Anônimo de forma simples, rápido e fácil
Cups: Mapear/listar todas as impressoras de outro Servidor CUPS de forma rápida e fácil
Tópicos
India's Leading Food Testing Facility | Fare Labs Pvt. Ltd. (0)
Não consigo instalar o WineHQ no meu notebook vaio FE15 (Debian) (7)
Top 10 do mês
-
Xerxes
1° lugar - 67.064 pts -
Fábio Berbert de Paula
2° lugar - 51.463 pts -
Mauricio Ferrari
3° lugar - 15.072 pts -
Alberto Federman Neto.
4° lugar - 13.705 pts -
Daniel Lara Souza
5° lugar - 13.549 pts -
Diego Mendes Rodrigues
6° lugar - 12.552 pts -
Buckminster
7° lugar - 12.210 pts -
edps
8° lugar - 11.615 pts -
Alessandro de Oliveira Faria (A.K.A. CABELO)
9° lugar - 10.639 pts -
Andre (pinduvoz)
10° lugar - 10.233 pts
Scripts
A maior comunidade GNU/Linux da América Latina! Artigos, dicas, tutoriais, fórum, scripts e muito mais. Ideal para quem busca auto-ajuda.
Site hospedado por:
