Настя играла в сапёр , Аня играла в Pizza , Саша играл в "Паук" , Иван играл в «Маджонг» , а Артём играл в гонки
Объяснение:
1) Вычёркиваем то, что назвали ребята, ведь все они оказались неправы (см. вложение 1)
2) Так как ребята предполагали, что другие играли в определённые игры, значит они и сами в них не играли (например, Саша думал, что в гонки играет Аня, а это значит, что Саша не играл в гонки), значит у них тоже вычёркиваем те игры, которые они назвали (см. вложение 2)
3) Теперь, у некоторых ребят осталось по одной клетке и сначала мы узнаем, что Саша играл в "Паук", потом нам станет понятно, что Артём играл в гонки, затем мы поймём, что Аня играла в Pizza, после единственным вариантом игры Ивана остаётся Маджонг и в конце мы поймём, что Настя играла в сапёр.
var
i,j,k,n,p:longint;
f:array[1..10,1..2] of longint;
begin
p:=2; i:=1;
f[1,1]:=1; f[1,2]:=1;
Write('Введите натуральное число не больше 2 147 483 647: ');
Read(n);
while n<>1 do begin
if (n mod p)=0 then begin
if f[i,1]<>p then
begin Inc(i); f[i,1]:=p; f[i,2]:=1 end
else Inc(f[i,2]);
n:=n div p
end
else inc(p)
end;
k:=i;
for i:=2 to k do
for j:=1 to f[i,2] do Write(f[i,1],' ');
Writeln
end.
Тестовое решение:
Введите натуральное число не больше 2 147 483 647: 37534
2 7 7 383