Leonardo Teixeira

Ainda nao consigo ver os arquivos, fica do mesmo jeito.

recomenda um SO linux especifico?

Amigos, estou com um pendrive aqui de um cliente, ele estava com fotos e arquivos da pessoa, porém sumiram e ainda continuam ocupando espaço. Eu ja rodei os comandos padroes para identificar o Recycler e nao há o virus, só haviam as pastas dentro do pendrive. Após falhar, eu resolvi rodar uma verificação no pendrive e corrigir os erros, porém piorou ao que parece, as pastas viraram arquivos sem extensão e foi criada uma pasta chamada "FOUND.000" com arquivos CHK. Rodei o Recuva (programa de recuperaçao de dados), recuperou as fotos mas estão corrompidas. Ao que parece as fotos ainda estão lá, so nao consigo acessá-las. OBS: Ja inseri o pendrive em uma maquina com linux (Fedora 18) sem sucesso.

Quando vou somar as notas bimestrais ta dando o erro "Tipo invalido de operação de soma". Meu professor disse para fazer o codigo como array ou record, ja tentei como array e da erro, vou postar imagem. Com record eu nao sei como faz, pois nunca tentei.

Pessoal, sou novo no fórum, eu faço um curso de programação e to com um trabalho que ta me quebrando a cabeça. Preciso criar um programa que faça um cadastro de aluno com opções , nota de cada bimestre e código do aluno. Meu maior problema é com o código, nao sei se devo usar array ou contador, pois preciso atribuir o codigo ao aluno para depois fazer a consulta.Segue abaixo um pedaço do algoritmo. OBS: qualquer outro erro no programa será corrigido, preciso mesmo resolver a questao do código. Agradeço a todos... ------------------------- Program cadastro_aluno; var responsavel: array [1..60] of string; nota_ano: array [1..60] of integer; nota_bimestre1: array [1..60] of real; nota_bimestre2: array [1..60] of real; nota_bimestre3: array [1..60]of real; nota_bimestre4: array [1..60] of real; sexo: array [1..60] of string; opcao: STRING; nome: array [1..60] of string; tel: array [1..60] of string; endereco: array [1..60] of string; idade: array [1..60] of integer; z: array [1..60] of integer; //chave primaria cont: integer; x, y: integer; //contadores Begin //codigo := 1; x := 0; Writeln ('>>>>>>>>>CADASTRO DE ALUNOS<<<<<<<<<< '); writeln (' '); writeln ('1-Incluir'); writeln ('2-Corrigir'); writeln ('3-Consultar'); writeln ('4-Excluir'); writeln ('E-Sair'); writeln (' '); writeln ('Digite a opção'); read (opcao); writeln (' '); while opcao = '1' do //for codigo := 1 to 60 do begin x := x + 1; for x := 1 to 60 do writeln (x); writeln ('Entre com o nome do aluno : '); read (nome [x]); writeln (' '); writeln ('Entre com o telefone: '); read (tel [x]); writeln (' '); write ('Entre com o endereço do aluno:'); read (endereco [x]); write ('Entre com a idade do aluno:'); read(idade [x]); write ('Entre com o sexo do aluno:'); read(sexo [x]); write ('Entre com o responsável do aluno:'); read (responsavel [x]); write ('Insira a nota do 1o bimestre: '); read (nota_bimestre1 [x]); nota_ano := nota_ano + nota_bimestre1 ; write ('Insira a nota do 2o bimestre: '); nota_ano := nota_ano + nota_bimestre2; read (nota_bimestre2 [x]); write ('Insira a nota do 3o bimestre: '); nota_ano := nota_ano + nota_bimestre3; read (nota_bimestre3 [x]); write ('Insira a nota do 4o bimestre: '); nota_ano := nota_ano + nota_bimestre4; read (nota_bimestre4 [x]); writeln ('Deseja incluir mais um aluno?'); writeln ('1-Incluir'); writeln ('E-Sair'); read (opcao); if opcao = 'E' then BEGIN exit; end; end; End.