Grupo Lógica de Programação
ESTAMOS EM CONSTRUÇÃO - DESENVOLVIMENTO


Seja Bem Vindo ao Forum Grupo Lógica de Programação é uma satisfação recebê-los aqui.. espero que gostem desse espaço que foi feito para todos nós PROGRAMADORES.. Então venha fazer Parte deste Time tambem.. Saiba que este Forum foi feito com muita dedicação para o bem estar de todos vocês.. Então Registre-se e Decole no Mundo da Programação.....
Ao se Registrar você tem direito a participar do CHAT que só é visivel ao membros registrados. e pode bater papo com algum outro membro que estiver on line.. caso tenha alguma duvida pode olhar no Menu FAQ as perguntas mais recentes.
Bons Estudos é o que deseja todos nós que fazemos o GRUPO LÓGICA DE PROGRAMAÇÃO acontecer...

(EL MENSAJERO [FUNDADOR])

Participe do fórum, é rápido e fácil

Grupo Lógica de Programação
ESTAMOS EM CONSTRUÇÃO - DESENVOLVIMENTO


Seja Bem Vindo ao Forum Grupo Lógica de Programação é uma satisfação recebê-los aqui.. espero que gostem desse espaço que foi feito para todos nós PROGRAMADORES.. Então venha fazer Parte deste Time tambem.. Saiba que este Forum foi feito com muita dedicação para o bem estar de todos vocês.. Então Registre-se e Decole no Mundo da Programação.....
Ao se Registrar você tem direito a participar do CHAT que só é visivel ao membros registrados. e pode bater papo com algum outro membro que estiver on line.. caso tenha alguma duvida pode olhar no Menu FAQ as perguntas mais recentes.
Bons Estudos é o que deseja todos nós que fazemos o GRUPO LÓGICA DE PROGRAMAÇÃO acontecer...

(EL MENSAJERO [FUNDADOR])
Grupo Lógica de Programação
Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Tudo sobre Linguagens e Lógica de Programação - O Maior Grupo de Estudos para Programação


[Resolvido]super Basico! Ajuda!

2 participantes

Grupo Lógica de Programação  :: Central de Ajuda (Programação) :: Seção de Ajuda :: Central de Ajuda [PASCAL]

Ir para baixo

[Resolvido]super Basico! Ajuda! Empty [Resolvido]super Basico! Ajuda!

Mensagem por Gmaster Sáb 22 Set 2012, 23:22

Criar um procedimento chamado metade que divida um valor do tipo real (passando com parametro) pela metade.
Escrever um progama de vetor A de 30 elementos reais e, usando o procedimento metade divida todos seus elementos pela metade.

E facil Mais so Muito noob.
Da Pra alguem faser pra mim! Pfv!
Se quiser Explicar parte por parte agradeceria! Very Happy

Gmaster
Novo no Fórum
Novo no Fórum

Mensagens : 1
Pontos : 4
Reputação : 0
Data de inscrição : 22/09/2012

Ir para o topo Ir para baixo

[Resolvido]super Basico! Ajuda! Empty Re: [Resolvido]super Basico! Ajuda!

Mensagem por Vanessa Thaisa Qua 04 Set 2013, 11:48

Código:
Program Pzim ;
const
   max=30;
type   
   vetor = Array [1..max] of Real;
var   
   x:integer;
   vetorA: vetor;
   
procedure divide (divideVetor: vetor);
var i:integer;
begin
   for i:= 1 to max do
   begin
      vetorA[i]:= divideVetor[i] / 2;   
   end;
end;
 Begin
    writeln('Vetor original: ');
     for x:= 1 to max do
     begin
         vetorA[x]:= x;
         write(vetorA[x]:2:0,' ');
     end;
  
     divide(vetorA);
     writeln;
     writeln('vetor metade');
   for x:= 1 to max do
     begin
        write(vetorA[x]:2:1,' ');
     end;
  
 End.
Vanessa Thaisa
Vanessa Thaisa
Conselheiro
Conselheiro

Mensagens : 5
Pontos : 11
Reputação : 0
Data de inscrição : 03/07/2010
Idade : 38
Localização : Campo Grande - MS - Brasil

Ir para o topo Ir para baixo

Ir para o topo

- Tópicos semelhantes

Grupo Lógica de Programação  :: Central de Ajuda (Programação) :: Seção de Ajuda :: Central de Ajuda [PASCAL]

 
Permissões neste sub-fórum
Não podes responder a tópicos