мне нужно взят чесла из файла на жестком диске

[profito]

Я знаком с паскалем но не разу не сталкивался с тем чтобы брать числа из файла причем числа записаны в строке, я бы мог перелопатить много книг и самоучителей но мне важен ваш опыт, кто-небудь знает как можно все число по символьно записать в одномерный массив если знаеет напишите)

[Ybn2]

Тут смотря какие числа, целые или вещественные. Файл текстовый?
Не уверен, но должно работать для целых:

Program zad;
Var
  f:text;
  i:integer;
Begin
   Assign (f,'name.txt'); Reset (f);
   Repeat
     Read (f,i);
     WriteLn (i);
   until Eof(f);
  ReadLn;
end.

Проверьте синтаксис, я писал на ходу.

[profito]

Сообщение от Ybn2

Тут смотря какие числа, целые или вещественные. Файл текстовый?
Не уверен, но должно работать для целых:

Program zad;
Var
  f:text;
  i:integer;
Begin
   Assign (f,'name.txt'); Reset (f);
   Repeat
     Read (f,i);
     WriteLn (i);
   until Eof(f);
  ReadLn;
end.

Проверьте синтаксис, я писал на ходу.

реально только этого не хватала терь должна работать спасибо