Сохранение пароля в текстовый документ - Turbo Pascal
Формулировка задачи:
Доброго времени суток! Прошу пoмoчь с заданием : в ТП вводишь пароль,он записывается в текстовой документ.А потом когда заходишь в текстовой документ,вылазивает любая картинка. Прошу пoмoщи, т.к сегодня сдавать уже на итоговую оценку
Решение задачи: «Сохранение пароля в текстовый документ»
textual
Листинг программы
var
f:text;
s:string;
begin
assign(f,'parol.txt');
rewrite(f);
write('Введите пароль: '); readln(s);
writeln(f,s);
writeln('Пароль сохранен успешно.');
close(f);
end.
Объяснение кода листинга программы
- объявляются переменные f и s типа text и string соответственно
- выполняется команда assign(f,'parol.txt'), которая устанавливает имя файла для записи в переменную f
- выполняется команда rewrite(f), которая очищает содержимое файла f
- выполняется команда write('Введите пароль: '), readln(s), которая запрашивает у пользователя пароль и сохраняет его в переменную s
- выполняется команда writeln(f,s), которая записывает пароль в файл f
- выводится сообщение 'Пароль сохранен успешно.'
- выполняется команда close(f), которая закрывает файл f