тк Борисов жил с ученым из Ярославля, то Борисов не оттуда и не с Москвы и Санкт-Петербурга. следовательно, он с Новосибирска
Григорьев не Москвич и не с Ярославля. и теперь понятно, что не с Новосибирска. следовательно, он с Санкт-Петербурга
Егоров не с Москвы, остается один вариант, он с Ярославля
а Викторов значит с Москвы
можно сделать таблицу (по ней легко решать такие задачи):
Москва. Новосиб. С-п. Ярославль.
Борисов. - + - -
Викторов. + - - -
Григорьев. - - + -
Егоров. - - - +
Объяснение:
function factorial(n:integer):integer;
var
i, p:integer;
begin
p:=1;
for i:=1 to n do
p:=p*i;
factorial:=p;
end;
var
r, m:integer;
k:integer;
begin
randomize;
r:=random(6);
writeln('r = ', r);
for k:=1 to r do begin
m:=random(6);
writeln(m, '! = ', factorial(m));
end;
readln;
end.