Manipulação de arquivos (.txt)

[Rodrigo Bresan]

Olá a todos :)

Gostaria de saber como poderia fazer um programa que solicitasse ao usuário o caminho completo de um arquivo de texto, e desse arquivo retirasse a média aritmética dos N valores que nele existem, sendo que o primeiro valor dessa lista indicasse quantos valores viriam a seguir, e a partir desse primeiro que ou outros seriam lidos.

Por exemplo (arquivo .txt):

6

1

4

3

8

1

4

E o programa leria o 6 (N), indicando quantos itens viriam a seguir, e retirasse a média aritmética desses 6 (N) valores, que nesse caso seria 3,5.

* Estou atualmente tentando fazer em modo console / prompt de comando.

Atenciosamente, Rodrigo Bresan.

[Jhonas]

Leitura de arquivo texto

procedure TForm1.Button1Click(Sender: TObject);
var
   Arquivo: TextFile; Line : string;
begin
   AssignFile(Arquivo, 'C:\MinhaPasta\Arq.Txt');
   Reset(Arquivo);
   while not EOF(Arquivo) do
      begin
        ReadLn(Arquivo, Line);
        Memo1.Lines.Append(Line);
      end;
   CloseFile(Arquivo);
end;

com mais esses outros exemplos voce consegue montar o código

http://www.mpsoftwares.com/site1/index.php...tid=4&id=19

http://www.fea.unicamp.br/docentes/ortega/...la06/aula06.htm

http://www.parteli.pro.br/lproII/trabalho/Trab4.htm

http://www.t2ti.com/curso/video/delphi/ini...os/Modulo01.pdf

abraço