Для того, чтобы осуществить поиск произвольной цифры в access используют такой символ.. 1. * 2. ? 3. #

Var i, a, s: integer; begin       readln(a);       for i : = a to 500 do           s : = s + i;       writeln(s); end.2)  var i, a, s, c, b: integer; begin      readln(a, b);       for i : = a to b do      begin          s : = s + i;           c : = c + 1;       end;       writeln(s / c: 4: 2); end.3)const n=10; var i, b, s: integer;     a: array [0..n] of integer; begin      readln(b);       for i : = 0 to n do a[i] : = random(9000);       for i : = 0 to n do          if (a[i] < b) then s : = s + i;       for i : = 0 to n - 2 do          if (a[i+1] = b) then  writeln('(', a[i], '; ', a[i+2], ')');       writeln(s); end.=)

Обьясняется различие в размерах файлов тем, что разные кодировки используют разное кол-во памяти, к примеру обычный *.txt файл хранит просто набор символов, а *.rtf уже хранит такие характеристики как размер шрифта цвет выравнивание и много других параметров. разные расширения текстовых данных сделаны для хранения максимального кол-ва данных в наименьшем возможном ко-во памяти (txt), и наоборот хранения текста в исходном виде с исходными характеристиками (rtf). ну а размеры файлов можешь и сам посмотреть сделав эту лабу.  бывают же ленивые