Submission #1936764

---

Source Code Expand

program Project1;

{$APPTYPE CONSOLE}

uses
  SysUtils;
var
  n:Integer;
begin
  try
    { TODO -oUser -cConsole メイン : ここにコードを記述してください }
    Readln(n);

    Writeln(n*800 - n div 15 * 200);
    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