escreve os números de 1 a 9 com repeat - until
Publicado por NewLinuxer 14/12/2005
[ Hits: 7.190 ]
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.
Programa que realiza o reajuste salarial de acordo com o cargo
Função Fatorial Recursiva em Ada 95
Existência de triângulo, em Pascal
encontrar o maior e o menor valor em um vetor
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
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
Configuração para desligamento automatizado de Computadores em um Ambiente Comercial
Dicas
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
Criando uma VPC na AWS via CLI
Tópicos
Tem como instalar o gerenciador AMD Adrenalin no Ubuntu 24.04? (7)
Top 10 do mês
-
Xerxes
1° lugar - 67.862 pts -
Fábio Berbert de Paula
2° lugar - 50.066 pts -
Renato Michnik de Carvalho
3° lugar - 27.313 pts -
Buckminster
4° lugar - 17.136 pts -
Mauricio Ferrari
5° lugar - 15.029 pts -
Alberto Federman Neto.
6° lugar - 14.223 pts -
Diego Mendes Rodrigues
7° lugar - 13.624 pts -
Daniel Lara Souza
8° lugar - 13.615 pts -
edps
9° lugar - 11.567 pts -
Andre (pinduvoz)
10° lugar - 11.329 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:
