Написать небольшой рассказ, сказку, сочинение про одно из агригатных состояний вещества

program n_1;

var i, n: integer;

begin

  n: =0;

  for i: =100 to 999 do if i mod 5 = 2 then n: =n+1;

  writeln(n);

end.

var

  i, c: integer;

begin

  c : = 0;

  for i : = 100 to 999 do

    if i mod 5 = 2 then begin

      c : = c + 1;

      write (i, ', ');   // здесь выводятся эти числа,
если это не нужно - удалите строку

    end;

  writeln;

  writeln ('результат = ', c);

  readln;

end.

Проведешь сам, а я расскажу что надо делать:
Для проведения эксперимента нам понадобится брусок с разными гранями(чтобы высота не была равна ширине), динамометр, нить и какая-либо гладкая поверхность(гладкая - в смысле без ям и бугром, подойдет стол)
Также забыл - в бруске должен быть крюк, или что-нибудь другое за что зацепим нить.
Сначала закрепим брусок на грани с большей площадью и, прикрепив к нему нить с динамометром, будем "тащить" его по столу, желательно равномерно(даже обязательно, потому что только при равномерном движении сила упругости пружины динамометра будет равна силе трения). Запишем показания динамометра в таблицу(или на листик)
Затем перевернем брусок на грань с меньшей площадью и проделаем то же самое. Также запишем показания в таблицу. Исходя из показаний получим, что от площади поверхности сила трения не зависит. Показания могут немного колебаться, т.к. стол может быть слегка неровным, тело может двигаться с небольшим ускорением, т.к. идеально равномерного движения практически невозможно добиться.

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