intercalar dois arrays (vetores)
Publicado por NewLinuxer 13/12/2005
[ Hits: 12.816 ]
Programa feito para ler dois vetores o mostrar na tela a intercalação dos dois, ou seja, item 1 do primeiro, item 1 do segundo, item 2 do primeiro....
Program exercicio11; uses crt; Type Vetor = array[1..10] of integer; Var Vet1, vet2 : Vetor; Contador : integer; Begin clrscr; For contador := 1 To 10 do Begin Write('Digite o ',contador:2,'§ numero do vetor 1: '); Readln (vet1[contador]); end; Writeln; For contador := 1 To 10 do Begin Write('Digite o ',contador:2,'§ numero do vetor 2: '); Readln (vet2[contador]); end; clrscr; For contador := 1 to 10 do Begin writeln(contador:2, '§ numero do vetor 1= ', vet1[contador]); writeln(contador:2, '§ numero do vetor 2= ', vet2[contador]); end; Readkey; End.
Transformação entre as escalas térmicas Kelvin, Fahrenheit e Celcius
Tocador de vídeo no Lazarus (Delphi 7 para Linux).
Metodo de Ordenacion : Burbuja
Números primos (usando arrays)
Calculadora Completa feita no Lazarus(Delphi 7 para Linux)
Nenhum coment�rio foi encontrado.
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
Como unir duas coleções de ROMs preservando as versões traduzidas (sem duplicatas)
Como instalar o Telegram Desktop no Ubuntu 24.04
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