Pascal beolvasás rekord típusú tömbbe egy külső, "bemenet. Txt" szöveges állományból?

Lényegében lenne egy bemenet.txt ami valahogy így nézni ki:

2014.05.16. 17:50 B 50 2013.05.18. 15:50 K 30

2014.05.16. - dátum

17:50 - idő

B/K - bankszámlára érkezett pénz vagy ép kivetek

programmal eddig idáig juttattam ami elég kevés de mivel nem tudom hogyan tudnám beolvasni eszt külsőleg ezzel kérnék egy kis segítéseget meg mutatná valaki hogyan fojtassam?

program bankszamla;

uses crt;

type

bank = record

datum : integer;

ido : integer;

penz : string;

end;

var i : integer;

a : array[1..1000] of bank;

f : text;

begin

clrscr;

Assign(f, 'bemenet.txt');

Reset(f);