ответить на вопросы по информатике, тема "архивация".
1. почему есть возможность уменьшать размер файлов?
2. что такое архивация?
3. какие файлы не имеет смысла архивировать?
5. почему перед пересылкой текстового файла по электронной почте имеет смысл предварительно его упаковать архив?
6. какое расширение является оптимальным для хранения текстовой информации на диске в архивированном виде?
7. какое расширение является оптимальным для хранения графической информации на диске в архивированном виде?
8. какое расширение является оптимальным для хранения видео информации на диске в архивированном виде?
9. сравните коэффициент сжатия текстовых и графических файлов и сделайте вывод.
Var
f,s:text;
st,sp:string;
i:integer;
c:char;
begin
assign(s,'text1.txt');
reset(s);
while not Eof(s) do
begin;
readln(s,sp);
st:=st+sp+chr(10)+chr(13);
end;
close(s);
for i:=1 to length(st) div 2 do
begin
c:=st[i];
st[i]:=st[length(st)-i+1];
st[length(st)-i+1]:=c;
end;
assign(f,'text.txt');
rewrite(f);
write(f,st);
close(f);
end.
Текст в файле text1.txt:
Simple text
1And another simple text
2New text
Текст в файле text.txt:
txet weN2
txet elpmis rehtona dnA1
txet elpmiS