Ir ao conteúdo
  • Comunicados

    • Gabriel Torres

      Seja um moderador do Clube do Hardware!   12-02-2016

      Prezados membros do Clube do Hardware, Está aberto o processo de seleção de novos moderadores para diversos setores ou áreas do Clube do Hardware. Os requisitos são:   Pelo menos 500 posts e um ano de cadastro; Boa frequência de participação; Ser respeitoso, cordial e educado com os demais membros; Ter bom nível de português; Ter razoável conhecimento da área em que pretende atuar; Saber trabalhar em equipe (com os moderadores, coordenadores e administradores).   Os interessados deverão enviar uma mensagem privada para o usuário @Equipe Clube do Hardware com o título "Candidato a moderador". A mensagem deverá conter respostas às perguntas abaixo:   Qual o seu nome completo? Qual sua data de nascimento? Qual sua formação/profissão? Já atuou como moderador em algo outro fórum, se sim, qual? De forma sucinta, explique o porquê de querer ser moderador do fórum e conte-nos um pouco sobre você.   OBS: Não se trata de função remunerada. Todos que fazem parte do staff são voluntários.
    • DiF

      Poste seus códigos corretamente!   21-05-2016

      Prezados membros do Fórum do Clube do Hardware, O Fórum oferece um recurso chamado CODE, onde o ícone no painel do editor é  <>     O uso deste recurso é  imprescindível para uma melhor leitura, manter a organização, diferenciar de texto comum e principalmente evitar que os compiladores e IDEs acusem erro ao colar um código copiado daqui. Portanto convido-lhes para ler as instruções de como usar este recurso CODE neste tópico:  
Entre para seguir isso  
ericalucca

[Resolvido] pascal array

Recommended Posts

vocês poderiam me ajudar a fazer esses exercicios ?!!!

ficarei muito agradecida!!!

1_Ler um vetor de 10 elementos e obter outro vetor, cujos componentes são o triplo dos

respectivos componentes do primeiro vetor.

2_. Entrar com números inteiros em um vetor A[50] e um vetor B[50]. Gerar e imprimir o

veto C[50] que será a soma dos vetores A e B.

Compartilhar este post


Link para o post
Compartilhar em outros sites

eu posso ajudar mas não vou resolvê-los para você, sugiro que ao menos tente começar os exercícios e colocar alguma lógica neles. Depois poste o que você já fez e então te ajudarei.

Compartilhar este post


Link para o post
Compartilhar em outros sites
  • Autor do tópico
  • eu posso ajudar mas não vou resolvê-los para você, sugiro que ao menos tente começar os exercícios e colocar alguma lógica neles. Depois poste o que você já fez e então te ajudarei.

    obrigado !! to te mandando mais ou menos o que fiz eu nao sei onde colocar esse tripo!!

    var

    i:inteiro;

    vetor:array[1..10] of intenger;

    begin

    for i:=to 10 do

    writeln('digite o valor, ,i, do vetor');

    readln(vetor);

    end;

    Compartilhar este post


    Link para o post
    Compartilhar em outros sites

    Completando o que você já fez:


    for i:=1 to 10 do
    novo_vetor[2]:=3*vetor[i];
    writeln('Novo vetor:');
    for i:=1 to 10 do
    writeln(novo_vetor[i]:0);

    Agora faça o outro. Podemos ajudar, não vamos fazer os exercícios por você.

    Compartilhar este post


    Link para o post
    Compartilhar em outros sites
  • Autor do tópico
  • Completando o que você já fez:


    for i:=1 to 10 do
    novo_vetor[2]:=3*vetor[i];
    writeln('Novo vetor:');
    for i:=1 to 10 do
    writeln(novo_vetor[i]:0);

    Agora faça o outro. Podemos ajudar, não vamos fazer os exercícios por você.

    muito obrigado!!

    no segundo nao sei de so o inicio como declarar a variavel?

    exemplo

    var

    a[50],b[50]of intenger;

    etc...

    Compartilhar este post


    Link para o post
    Compartilhar em outros sites

    Completando o que você já fez:


    novo_vetor[2]:=3*vetor[i];
    writeln('Novo vetor:');
    for i:=1 to 10 do
    writeln(novo_vetor[i]:0);
    for i:=1 to 10 do

    Agora faça o outro. Podemos ajudar, não vamos fazer os exercícios por você.

    Olá,

    Eu juntei as duas partes... e ao mesmo tempo propus algumas alterações. (os comentário estão no código)

    var
    (*
    i :inteiro;

    // o tipo correto seria "integer" (ou byte)
    *)
    i :integer;

    (*
    vetor :array[1..10] of intenger;

    // o tipo correto seria "integer"
    *)

    vetor,
    novo_vetor :array[1..10] of integer;


    begin

    for i:=to 10 do
    begin {esse "for" precisa de begin/end, já que são mais de uma linha dentro dele}
    (*
    writeln('digite o valor, ,i, do vetor');

    // os textos devem ficar entre ' ' (aspas simpes), mas as variáveis não!
    *)
    writeln('digite o valor',i,' do vetor'); {veja a diferença}
    readln(vetor[i]);
    end; {fim for}

    for i:=1 to 10 do
    (*
    novo_vetor[2]:=3*vetor[i];

    //aqui a posição está fixa (sempre na 2, mas deveria ir em sequência...
    *)
    novo_vetor[i]:=3*vetor[i]; {no caso as posições vão sendo iguais a do primeiro vetor}

    writeln('Novo vetor:');
    for i:=1 to 10 do
    writeln(novo_vetor[i]:0);
    end;

    Código sem os comentários

    var
    i :integer; {controle da posição no vetor}
    vetor, {números lidos do usuário}
    novo_vetor :array[1..10] of integer; {novos valores gerados}

    begin

    {LER OS VALORES DO USUÁRIO}
    for i:=to 10 do
    begin
    writeln('Digite o valor',i,' do vetor');
    readln(vetor[i]);
    end; {fim for}

    {CALCULA E INSERI OS NOVOS VALORES NO NOVO VETOR}
    for i:=1 to 10 do
    novo_vetor[i]:=3*vetor[i];

    {EXIBE OS VALORES DO NOVO VETOR}
    writeln('Novo vetor:');
    for i:=1 to 10 do
    writeln(novo_vetor[i]:0);
    end;

    Qualquer coisa é só postar

    Abraços

    Compartilhar este post


    Link para o post
    Compartilhar em outros sites

    for i:=1 to 10 do
    (*
    novo_vetor[2]:=3*vetor[i];

    //aqui a posição está fixa (sempre na 2, mas deveria ir em sequência...
    *)
    novo_vetor[i]:=3*vetor[i]; {no caso as posições vão sendo iguais a do primeiro vetor}
    [/QUOTE]

    Desculpe, foi erro de digitação.

    Sobre o segundo, aqui vai um começo:

    [code]
    uses
    crt;
    const
    tamanho=50;
    var
    A,B,C: array[1..tamanho] of longint;
    i: byte;
    begin
    for i:=1 to tamanho do
    begin
    clrscr;
    writeln('A - #',i:0);
    readln(A[i]);
    end;
    for i:=1 to tamanho do
    begin
    clrscr;
    writeln('B - #',i:0);
    readln(B[i]);
    C[i]:=A[i]+B[i];
    end;
    clrscr;
    for i:=1 to tamanho do
    writeln('C[',i:0,'] = ',C[i]:0);
    readkey;
    end.

    Compartilhar este post


    Link para o post
    Compartilhar em outros sites
  • Autor do tópico
  • Desculpe, foi erro de digitação.

    Sobre o segundo, aqui vai um começo:


    uses
    crt;
    const
    tamanho=50;
    var
    A,B,C: array[1..tamanho] of longint;
    i: byte;
    begin
    for i:=1 to tamanho do
    begin
    clrscr;
    writeln('A - #',i:0);
    readln(A[i]);
    end;
    for i:=1 to tamanho do
    begin
    clrscr;
    writeln('B - #',i:0);
    readln(B[i]);
    C[i]:=A[i]+B[i];
    end;
    clrscr;
    for i:=1 to tamanho do
    writeln('C[',i:0,'] = ',C[i]:0);
    readkey;
    end.

    Muito obrigada!!

    Compartilhar este post


    Link para o post
    Compartilhar em outros sites

    Caso o autor do tópico necessite, o mesmo será reaberto, para isso deverá entrar em contato com a moderação solicitando o desbloqueio.

    Compartilhar este post


    Link para o post
    Compartilhar em outros sites
    Visitante
    Este tópico está impedido de receber novos posts.
    Entre para seguir isso  





    Sobre o Clube do Hardware

    No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas publicações sobre tecnologia do Brasil. Leia mais

    Direitos autorais

    Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

    ×