armazenar o nome de um aluno e suas notas
Publicado por NewLinuxer 13/12/2005
[ Hits: 5.368 ]
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.
Criptografador(Conceito criptografia)Lazarus
mostrar a meior e a menor temperatura do ano com vetor
média dos numeros informados em posiçoes pares em um vetor
mais um modelo de programa com vetor
Atenção a quem posta conteúdo de dicas, scripts e tal (6)
Configuração para desligamento automatizado de Computadores em um Ambiente Comercial
O mínimo que você precisa saber sobre o terminal (parte 2)
O mínimo que você precisa saber sobre o terminal (parte 1)
Como iniciar uma máquina virtual do VirtualBox automaticamente no boot do LUbuntu 18 LTS
Como deixar as abas do Firefox mais fininhas
Mudar o gerenciador de login (GDM para SDDM)
"Tentando" fazer com que programas rodem no Wayland e no X11
Erro ao iniciar Ubuntu 24.04.1 LTS - Management Owner Key - MoK (3)
Notebook instalado com Linux Debian de fábrica dando problema (3)