Создаём и сохраняем логин / пароль. Создается файл «C:\temp\password.txt»

Создаём и сохраняем логин / пароль. Создается файл «C:\temp\password.txt»

Тема в разделе "Темы со старого форума", создана пользователем Бэкап, 05.05.2015.

Загрузка...
Ответов: 0 Просмотров: 296 Ответить в теме
Воспользуйтесь функцией автоматического продвижения темы для увеличения числа просмотров темы, продаж платного контента и узнаваемости Вашего бренда. Услуга продвижения действует на протяжении 3-х дней и стоит всего 50 STF Wallet.

Продвинуть тему
  1. Бэкап
    uses crt;
    var Name_all,Adres,Name_file,pas,log:string;
    t:text;
    b:integer;
    begin
    Adres:='C:\temp';
    Name_file:='password.txt';
    write('Введитье логин: ');
    readln(log);
    write('Введите пароль: ');
    readln(pas);
    writeln('Сохранить - введите 1');
    writeln('Выйти - введите 2');
    readln(b);
    if b = 2 then begin
    Clrscr;
    writeln('Программа прервана, нажмите Enter');
    exit;
    end;
    Name_all:= Adres+'\'+Name_file;
    assign(t,Name_all);
    rewrite(t);
    writeln(t,log);
    writeln(t,pas);
    close(t);
    Clrscr;
    writeln('Данные сохранены');
    end.
     
    05.05.2015 Сообщений: Симпатий:
В этой теме всего одна страница
Вам, как гостю, ограничены возможности взаимодействия с темами. Пройдите бесплатную регистрацию и откройте для себя море возможностей.