Ir ao conteúdo
  • Cadastre-se

raidenxyz

Membro Júnior
  • Posts

    1
  • Cadastrado em

  • Última visita

Tudo que raidenxyz postou

  1. Opa, estava buscando matéria para fazer um trabalho e acabei me deparando com sua postagem. Como uma pessoa que entrou no mundo da programação recentemente tentei reformular o seu codigo. Espero ajudar Program Pzim ; Var total,i :integer; compra: array [1..4] of integer; Begin for i:=1 to 4 do begin Writeln('Digite o valor das compras feitas: '); readln(compra[i]); total := total + compra[i]; end; for i:=1 to 4 do begin writeln('O valor da ',i, ' compra é ' ,compra[i]); end; Writeln('O valor total é ',total); readkey(); End.

Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas comunidades 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

×
×
  • Criar novo...

Ebook grátis: Aprenda a ler resistores e capacitores!

EBOOK GRÁTIS!

CLIQUE AQUI E BAIXE AGORA MESMO!