Создать текстовый файл, записать в него построчно данные, которые вводит пользователь. Окончанием ввода пусть служит пустая строка.
В первую очередь нужно создать файл по указанному адресу и открыть его на запись. В разных языках программирования это делается по-разному.
После того как файл открыт на запись, можно запустить бесконечный цикл, в котором будет считываться с клавиатуры строка и далее записываться в файл. Тело цикла также должно содержать проверку на пустую строку: если была введена пустая строка, то цикл должен прерываться.
Pascal
var
f: text;
name, str: string;
begin
write('Файл: ');
readln(name);
assign(f, name);
rewrite(f);
while True do begin
readln(str);
if str = '' then break;
writeln(f, str);
end;
close(f);
end.
Файл: test1
hello world
one two three
back
3 4 5 6
В том же каталоге, где сохранена программа, будет создан файл test1 с содержимом, которое было введено в терминале.
Язык Си
#include < stdio.h>
#include < string.h>
#define N 255
main() {
FILE *f;
char s[N], name[N];
gets(name);
f = fopen(name,"w");
while (1) {
gets(s);
if (strlen(s) == 0) break;
fprintf(f,s);
fprintf(f,"\n");
}
fclose(f);
}
nums.txt
one two tree ...
один два ...
1 2 3 4 ...
1 10 11 100 ...
В том же каталоге, что и программа создается файл nums.txt, куда записываются строки, введенные пользователем.
Python
python создать текстовый файл
fname = input('Файл: ')
f = open(fname,'w')
while True:
s = input()
if s == '': break
f.write(s+'\n')
f.close()
Файл: /home/pl/Рабочий стол/text2.txt
Ввод данных в
текстовый файл
____________
1 а 2 б wwwww
Будет создан файл text2.txt в каталоге /home/pl/Рабочий стол/ и содержащий данные, введенные пользователем в процессе выполнения программы.
КуМир
использовать Файлы П
алг
нач
цел ф
лит имя, строка
вывод "Имя файла: "
ввод имя
ф := открыть на запись (имя)
вывод "Вводите строки ниже:", нс
нц пока да
ввод строка
если строка = "!" то
закрыть(ф)
выход
все
Фвывод ф, строка
Фвывод ф, нс
кц
кон
Basic-256
print "Имя файла: ";
input name$
open name$
while True
input s$
if s$ = "" then gosub stop
writeline s$
end while
stop:
close
Имя файла: text.txt
Это текст
который записывается
в файл.
Файл text.txt создается в каталоге, где сохранена программа, и в него записываются строки ниже.
Подписаться
0 комментариев
Межтекстовые Отзывы
Посмотреть все комментарии
Pascal
var f: text; name, str: string; begin write('Файл: '); readln(name); assign(f, name); rewrite(f); while True do begin readln(str); if str = '' then break; writeln(f, str); end; close(f); end.
Файл: test1 hello world one two three back 3 4 5 6
В том же каталоге, где сохранена программа, будет создан файл test1 с содержимом, которое было введено в терминале.
Язык Си
#include < stdio.h> #include < string.h> #define N 255 main() { FILE *f; char s[N], name[N]; gets(name); f = fopen(name,"w"); while (1) { gets(s); if (strlen(s) == 0) break; fprintf(f,s); fprintf(f,"\n"); } fclose(f); }
nums.txt one two tree ... один два ... 1 2 3 4 ... 1 10 11 100 ...
В том же каталоге, что и программа создается файл nums.txt, куда записываются строки, введенные пользователем.
Python
python создать текстовый файл
fname = input('Файл: ') f = open(fname,'w') while True: s = input() if s == '': break f.write(s+'\n') f.close()
Файл: /home/pl/Рабочий стол/text2.txt Ввод данных в текстовый файл ____________ 1 а 2 б wwwww
Будет создан файл text2.txt в каталоге /home/pl/Рабочий стол/ и содержащий данные, введенные пользователем в процессе выполнения программы.
КуМир
использовать Файлы П алг нач цел ф лит имя, строка вывод "Имя файла: " ввод имя ф := открыть на запись (имя) вывод "Вводите строки ниже:", нс нц пока да ввод строка если строка = "!" то закрыть(ф) выход все Фвывод ф, строка Фвывод ф, нс кц кон
Basic-256
print "Имя файла: "; input name$ open name$
while True input s$ if s$ = "" then gosub stop writeline s$ end while
stop: close
Имя файла: text.txt Это текст который записывается в файл.
Файл text.txt создается в каталоге, где сохранена программа, и в него записываются строки ниже.