Submission #1869024

---

Source Code Expand

program Project1;

{$APPTYPE CONSOLE}

uses
  SysUtils,math;
var
  x,a:Integer;
begin
  try
    { TODO -oUser -cConsole Main : ここにコードを記述してください }
    Readln(x);

    a:=1;
    while not(Power(a,4)=x) do
      Inc(a);

    Writeln(a);
    Readln;
  except
    on E: Exception do
      Writeln(E.ClassName, ': ', E.Message);
  end;
end.

Submission Info

Compile Error

/usr/bin/ld.bfd: warning: ./link.res contains output sections; did you forget -T?

Judge Result