begin
ReadInteger('num =').ToString.ToCharArray
.IndexesOf(x -> x = '7').Select(x -> x + 1).Println;
end.
Ответ:
Таблица находится во вложениях
Урок, чтение учебника, чтение расписания,
20 лет. определяем методом подбора.. 14-14,15-5,16-,17-7,18-8,19-9,20-10