Проверочная работа составить программы для вычисления: a) среднего арифметического кубов двух целых чисел m и n. ответ дать с точность до трёх знаков после запятой. б) дано четырёхзначное число. найти остаток от деления чисел образованных первыми двумя цифрами и последними двумя цифрами этого числа

{среднего арифметического кубов двух целых чисел m и n.ответ дать с точность до трёх знаков после запятой. }var      m, n: integer; begin      read(m, n);       writeln((m * m * m + n * n * n) / 2: 3); end.

 

{дано четырёхзначное число. найти остаток от деления  чисел образованных первыми двумя цифрами и последними  двумя цифрами этого числа}var      i, n, n1, n2: integer; begin      read(n);       n1 : = n div 100;       n2 : = n mod 100;       writeln(n1 mod n2); end.

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). ну а размеры файлов можешь и сам посмотреть сделав эту лабу.  бывают же ленивые