pascal ->> if p = 'JA' Then....

hi,

wer kann weiterhelfen? :

ich stelle in pascal eine frage zb.:

var e: String;
...
...
writeln (' Ja od. Nein ?');
readln (e);
If e = 'JA Then

writeln ('bla1');

{wenn hier nochwas steht, dann funzt es nicht}

if e = 'Nein' Then

writeln ('bla2');
...
...
################################

dies alles funktioniert auch, aber wenn ich nach
writeln ('bla1');

 noch eine zeile stehen habe,mit (write / writeln ) dann zeigt er mir dann beim Programmtest "Bla1" + "den anderen text, der dann stehen würde" und leider auch "bla2"

( Ist vielleicht etwas unverständlich beschrieben, aber besser ging es nicht! )

PS: wie lautet der befehl für "öffne eine Datei"??