escreve os números de 1 a 9 com repeat - until
Publicado por NewLinuxer 14/12/2005
[ Hits: 7.390 ]
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.
calculo da somatoria da diagonal principal
encontrar o maior e o menor valor em um vetor
Calculadora de décimo terceiro salário(Lazarus)
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
IA local no bolso, novo visual no Raspberry Pi OS e mais destaques do software livre
Kernel turbinado, compatibilidade em alta e debate sobre sustentabilidade: o dia no mundo Linux
Kernel turbinado e GNOME 49 dominam o giro do dia no mundo Linux
Novidades Linux: Kernel 6.17, distros em ebulição e segurança em foco
Kernel ganha novos linters Rust e distros avançam com recursos de IA
Dicas
Adicionando o repositório backports no Debian 13 Trixie
Como definir um IP estático no Linux Debian
Tópicos
SAMBA parou de compartilhar (2)
Orientação para instalar o Warsaw - módulo de proteção do Banco do Bra... (8)
systemd-resol... precisa ser reiniciado periodicamente (5)
Alguém que utilize o Warsaw do BB no Ubuntu 24.04 [RESOLVIDO] (6)
Fedora não reconhece James Donkey 102 Wireless Gaming Mouse (2)
Top 10 do mês
-
Xerxes
1° lugar - 83.282 pts -
Fábio Berbert de Paula
2° lugar - 54.365 pts -
Buckminster
3° lugar - 25.055 pts -
Alberto Federman Neto.
4° lugar - 18.672 pts -
edps
5° lugar - 18.037 pts -
Mauricio Ferrari
6° lugar - 17.830 pts -
Alessandro de Oliveira Faria (A.K.A. CABELO)
7° lugar - 16.348 pts -
Sidnei Serra
8° lugar - 15.615 pts -
Daniel Lara Souza
9° lugar - 15.527 pts -
Andre (pinduvoz)
10° lugar - 14.569 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:
