тк Борисов жил с ученым из Ярославля, то Борисов не оттуда и не с Москвы и Санкт-Петербурга. следовательно, он с Новосибирска
Григорьев не Москвич и не с Ярославля. и теперь понятно, что не с Новосибирска. следовательно, он с Санкт-Петербурга
Егоров не с Москвы, остается один вариант, он с Ярославля
а Викторов значит с Москвы
можно сделать таблицу (по ней легко решать такие задачи):
Москва. Новосиб. С-п. Ярославль.
Борисов. - + - -
Викторов. + - - -
Григорьев. - - + -
Егоров. - - - +
begin
var A := ArrRandom(10, 10, 50);
A.Println;
var X := ReadInteger();
var ind := A.Indices(p -> p = X);
if ind.Count > 0 then print(ind) else print('таких нет');
end.
Объяснение: