Как в паскаль абс заполнить массив из строк строками из текстового файла?(txt)

Question

Как в паскаль абс заполнить массив из строк строками из текстового файла?(txt)

Answer 1

uses crt;
var a:array[1..100] of string;
     n,i:integer;  
   f:text;  
   s:string;
begin
 clrscr;
assign(f,'input.txt');
 reset(f);
read(f,n);
readln(f,s);
for i:=1 to n do  begin   readln(f,a[i]);  
writeln(a[i]);  
end;
close(f);
readln;
end.

Comments

спасибо большое, вот хотел сделать черепашку, где код будет находиться в текстовом документе

---

ну или что то в этом роде