escreve os números de 1 a 9 com repeat - until
Publicado por NewLinuxer 14/12/2005
[ Hits: 7.228 ]
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.
soma da diagonal principal de uma matriz
Calculo do Fatorial Utilizando-se de for
Transformação entre as escalas térmicas Kelvin, Fahrenheit e Celcius
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
Passkeys: A Evolução da Autenticação Digital
Instalação de distro Linux em computadores, netbooks, etc, em rede com o Clonezilla
Título: Descobrindo o IP externo da VPN no Linux
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
Dicas
Como configurar posicionamento e movimento de janelas no Lubuntu (Openbox) com atalhos de teclado
Máquinas Virtuais com IP estático acessando Internet no Virtualbox
Instalar o Microsoft Edge no Slackware 15
Instalando Brave Browser no Linux Mint 22
vídeo pra quem quer saber como funciona Proteção de Memória:
Tópicos
Formatando cartão de memoria que nao formata[AJUDA] (18)
Primeira vez utilizando Linux Ubuntu 22.04 e já tenho problemas… (5)
warsaw parou de funcionar após atualização do sistema (solução) (1)
Separar trafego da VPN da VPS (0)
Desde que seja DDR3, posso colocar qualquer memória? [RESOLVIDO] (6)
Top 10 do mês
-
Xerxes
1° lugar - 77.248 pts -
Fábio Berbert de Paula
2° lugar - 55.083 pts -
Mauricio Ferrari
3° lugar - 17.236 pts -
Andre (pinduvoz)
4° lugar - 16.288 pts -
Alberto Federman Neto.
5° lugar - 15.558 pts -
Daniel Lara Souza
6° lugar - 15.530 pts -
Diego Mendes Rodrigues
7° lugar - 15.298 pts -
Buckminster
8° lugar - 14.410 pts -
edps
9° lugar - 12.774 pts -
Alessandro de Oliveira Faria (A.K.A. CABELO)
10° lugar - 12.048 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:
