1. Это число двузначное?
2. Это число делится на два?
3. Это число делиться на пять?
4. Это число простое?
Ну это всё что я смог придумать
:(
Если человек сидящий в аудитории, то тестотехник
<h3>PascalABC.NET 3.4.2, сборка 1864 от 11.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var a := ArrGen(ReadInteger('n='), i -> (i + 1) * 6);
a.Println;
Println('Среднее', a.Average)
end.
<h3>n= 13</h3><h3>6 12 18 24 30 36 42 48 54 60 66 72 78</h3><h3>Среднее 42 </h3>