Опишите сетевые топологии по методу геометрической связи:

карандаш - графит; ископаемое, состоящее из угля и желез это же вещество, вставленное пруточками в деревянную трубочку, для черченья и рисованья.

напишите цель . то что у вас написано - полный бред. который после устранения синтаксических ошибок(а их тут не одна) работать не будет

по углам комнаты расставить 4 стула и   около каждой стены по одному ( ещё 4 стула). всего 8 стульев : )

s : = 1 ;

for i : = 1 to n do

  if a[i] mod 3 = 0 then

          s : = s * a[i];

writeln(s);