Задание 2 Даны переменные, распределите их в соответствии с типами: А=123; B=’Маша’; C=2.5; D=False; E=8; F=True; G=’123’; H=658.78; Целые Символьные С плавающей точкой Логические

Запись 5 строк в файл }

procedure TForm1.Button1Click(Sender: TObject);

var outfile: TextFile;

begin

AssignFile(outfile, 'outfile.txt')

;Rewrite(outfile);

writeln(outfile, 'Привет из Delphi');

writeln(outfile, 'Моя программа работает, и выводит '

+'данный текст, чтобы доказать это...');

writeln(outfile, '3. Треться строка');

writeln(outfile, '234 четвертая');

writeln(outfile, 'Пятая строка');

CloseFile(outfile);

end;

// вывод на экран точнее в мемо или лист бокс

procedure TForm1.Button2Click(Sender: TObject);

begin

// выводим в мемо

Memo1.Lines.LoadFromFile('outfile.txt');

// либо в лист бокс как тебе лучше

ListBox1.Items.LoadFromFile('outfile.txt');

end;

// кнопка для закрытия

procedure TForm1.Button3Click(Sender: TObject);

begin

Close;

end;

// событие onClose

procedure TForm1.FormClose(Sender: TObject; var CloseAction: TCloseAction);

begin

if MessageDlg('Вы точно хотите выйти?', mtConfirmation, mbOkCancel,0)= mrOk then begin

CloseAction:= caFree;

end

else begin

CloseAction:= caNone;

end;

end;

ЗДЕСЬ!

outfile.txt - это ваш файл(может создаваться автоматически

Объяснение:

Программы - архиваторы

• Главная страница Программы архивации

• 7 - ZIP.

• ARJ.

• RAR.

• WINRAR.

• WINZIP.

• Архиваторы MS - DOS.

• Архиваторы Windows.

На сегодняшний день существующие архиваторы можно разделить на три группы:

1. файловые;

2. программные;

3. дисковые.

Файловые архиваторы позволяют упаковывать один или несколько файлов в единый архив. Размер архива, как правило, меньше чем суммарный размер исходных файлов. Воспользоваться архивными данными и программами пока они находятся в архиве нельзя. Для распаковки архива требуется разархиватор, который совмещен с архиватором в единой программе.

Программные архиваторы позволяют упаковывать за один прием один единственный файл - выполняемую программу типа *.exe, которая при запуске самораспаковывается в оперативной памяти и начинает работу. Программа становится в два раза меньше и при этом сохраняет работо

Дисковый архиватор представляет собой резидентный драйвер, который незаметно для пользователя архивирует любую записываемую на диск информацию и распаковывает ее обратно при чтении. При этом на диске создается огромный архив, который отображается как еще один логический раздел винчестера.

Объяснение: