про файлы. Опции

[Beowulf 13th]

Объясните мне глупому. Почему не пишет:

Код

program testa;


uses CRT;

var test: text;

begin
        clrscr;
        assign(test,'test3.txt');
        rewrite(test);
        writeln(test,'asdfasdfsdf');

end.

создается файл, но он пустой.

[Гость]

нет, нельзя напрямую в файл что-то записывать (всмысле текст который тебя интересует) создай переменную типа стринг и в нее запиши то что тебя интересует, затем пиши Writeln(test,st);
st:='678ghjfdgfhgfhg';
Writeln(test,st);