armazenar o nome de um aluno e suas notas
Publicado por NewLinuxer 13/12/2005
[ Hits: 5.498 ]
programa para armazenar as quatro notas e o nome de um aluno com registro e no final mostrar os dados informados
Program registro03; Type registro = Record nome:string[30]; nota:array [1..4] of integer; End; Var reg:registro; contador:integer; Begin ClrScr; Write('Informe o nome do aluno: '); readln(reg.nome); For contador := 1 to 4 do Begin Write('Informe a nota ',contador,': '); readln(reg.nota[contador]); End; Writeln; Writeln('As notas informadas do aluno',reg.nome,' são:'); For contador :=1 to 4 do Writeln('Nota ',contador,'= ', reg.nota[contador]); Readkey; End.
calculo da somatoria da diagonal principal
Calculadora completa com porcentagem(Lazarus)
Criptografador(Conceito criptografia)Lazarus
Como transformar um áudio em vídeo com efeito de forma de onda (wave form)
Como aprovar Pull Requests em seu repositório Github via linha de comando
Como gerar um podcast a partir de um livro em PDF
Organizando seus PDF com o Zotero
Erro no realm join [Resolvido]
Um programa para baixar vídeos: Parabolic
Como Definir o Painel Principal em Múltiplos Monitores no Linux Mint
Sempre que vou baixar algum pacote acontece o erro dpkg (7)
como instalo panfrost-dri e o driver panfrost fork , ou panfrost (12)