Пользователь вводит с клавиатуры два числа. нужно
посчитать отдельно сумму четных, нечетных и чисел,
кратных 9 в указанном диапазоне, а также среднеарифметическое каждой группы.

9 кг /2=4.5/2=2.250 кг. сделали два взешивания. далее к в чашку с гирьками  в 250 гр добавляем крупу до равновесия  т.е 2 кг, от третье взвешивание. 

первое

заголовок: уходид из дома

4.порощаться

6.выключить свет,газ,

второе

заголовок: приход в квартиру

3.поверни ключ

4.вынь ключ из скважины 

если n это количество чисел, начинаем с 3

var

i,n,p: integer

begin

readln(n);

i: =3;

p: =1;

while i< =3*n do

begin

p: =p*i;

i: =i+3;

end;

writeln(p);

end.

если n это верхняя граница чисел

var

i,n,p: integer

begin

readln(n);

for i: =3 to n

if i mod 3 = 0 then

p: =p*i;

writeln(p);

end.

24576/8=3072 символа

ответ: 3072 символа