Поделитесь своими знаниями, ответьте на вопрос:
Вы можете использовать алфавит из двух символов: А и Б. Сколько разных трехсимвольных слов существует в этом алфавите? Для ответа на вопрос постройте схему. Выпишите все слова, начинающиеся на букву Б.
begin
var s:=Range(1,ReadInteger('n='),2).Select(x->Rec(x,x*x,x*x*x));
foreach var e in s do
Writeln(e.Item1:10,e.Item2:10,e.Item3:10)
end.
Тестовое решение:
n= 20
1 1 1
3 9 27
5 25 125
7 49 343
9 81 729
11 121 1331
13 169 2197
15 225 3375
17 289 4913
19 361 6859