Question

Задача в паскале. Помогите пожалуйста решить!

Answer 1

Ответ:

• var t:text;
• begin
• assign(t,'test.txt');
• rewrite(t);
• writeln(t, 'Первая строка'+0);
• writeln(t, 'Вторая строка'+0);
• writeln(t, 'Третья строка'+0);
• writeln(t, 'Четвёртая строка'+0);
• writeln(t, 'Пятая строка'+0);
• close(t);
• end.

Пример работы: