Решите задачу по информатике ">

// PascalABC.NET 3.1, сборка 1219 от 16.04.2016
function IsAutomorph(s:string):boolean;
// Возвращает true, если строка s изображает
// автоморфное число, иначе возвращает false
begin
  var b:BigInteger;
  if BigInteger.TryParse(s,b) then
    Result:=sqr(b).ToString.Right(s.Length)=s
  else Result:=false
end;

begin
  var s:=ReadlnString('Введите натуральное число:');
  if IsAutomorph(s) then Println('Автоморфное')
  else Println('Не автоморфное')
end.

Тестовые решения:
Введите натуральное число: 12890625
Автоморфное

Введите натуральное число: 3245
Не автоморфное

Отрицательные:Портит зрения сидя за компьютером (телефоном).Портит здоровье. У некоторых людей когда они там умирают "сдают" нервы, и их нервная система портится.

Мы в игре убиваем, это может также отражаться на человеке.

Положительные:Человек учиться думать наперед, что к чему. Там есть механизмы, он тоже этим развивает мозги, он хорошо начинает понимать информатику. Человек учит английский язык в этой игре. Так-как в игре можно его не выключать. Так же там можно и поставить другие языки и учить их. Там доступны миллионы серверов, на которых человек общается с другими людми, и возможно получает сто то новое.