escreve os números de 1 a 9 com repeat - until
Publicado por NewLinuxer 14/12/2005
[ Hits: 7.364 ]
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.
Achar o maior e o menor valor inserido pelo usuario
validando um triângulo e classificando-o como equilátero, isoceles ou escaleno.
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
Comparação entre os escalonadores BFQ e MQ-Deadline (acesso a disco) no Arch e Debian
Conciliando o uso da ZRAM e SWAP em disco na sua máquina
Servidor de Backup com Ubuntu Server 24.04 LTS, RAID e Duplicati (Dell PowerEdge T420)
Visualizar câmeras IP ONVIF no Linux sem necessidade de instalar aplicativos
Dicas
Overclocking Permanente para Drastic no Miyoo Mini Plus
Problemas de chaves (/usr/share/keyrings) no Debian
Converter os repositórios Debian para o novo formato com as chaves
Tópicos
Primeiras impressões do Debian 13 (8)
como resolver o problema de som do linux mint mate (4)
Rede wifi com mesmo ip da rede eth (13)
Top 10 do mês
-
Xerxes
1° lugar - 59.567 pts -
Fábio Berbert de Paula
2° lugar - 34.474 pts -
Buckminster
3° lugar - 18.253 pts -
Mauricio Ferrari
4° lugar - 13.148 pts -
Alberto Federman Neto.
5° lugar - 11.341 pts -
edps
6° lugar - 10.532 pts -
Daniel Lara Souza
7° lugar - 10.281 pts -
Sidnei Serra
8° lugar - 10.078 pts -
Diego Mendes Rodrigues
9° lugar - 9.400 pts -
Alessandro de Oliveira Faria (A.K.A. CABELO)
10° lugar - 8.718 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:
