Submission #1869023


Source Code Expand

program Project1;

{$APPTYPE CONSOLE}

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

    Writeln(2*(a*b+b*c+c*a));
    Readln;
  except
    on E: Exception do
      Writeln(E.ClassName, ': ', E.Message);
  end;
end.

Submission Info

Submission Time
Task A - 高橋直体
User nmoxya
Language Pascal (FPC 2.6.2)
Score 100
Code Size 376 Byte
Status AC
Exec Time 1 ms
Memory 128 KB

Compile Error

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

Judge Result

Set Name Sample All
Score / Max Score 0 / 0 100 / 100
Status
AC × 4
AC × 14
Set Name Test Cases
Sample example_0.txt, example_1.txt, example_2.txt, example_3.txt
All example_0.txt, example_1.txt, example_2.txt, example_3.txt, random_0.txt, random_1.txt, random_2.txt, random_3.txt, random_4.txt, random_5.txt, random_6.txt, random_7.txt, random_8.txt, random_9.txt
Case Name Status Exec Time Memory
example_0.txt AC 0 ms 128 KB
example_1.txt AC 0 ms 128 KB
example_2.txt AC 0 ms 128 KB
example_3.txt AC 1 ms 128 KB
random_0.txt AC 0 ms 128 KB
random_1.txt AC 0 ms 128 KB
random_2.txt AC 0 ms 128 KB
random_3.txt AC 0 ms 128 KB
random_4.txt AC 0 ms 128 KB
random_5.txt AC 0 ms 128 KB
random_6.txt AC 1 ms 128 KB
random_7.txt AC 0 ms 128 KB
random_8.txt AC 1 ms 128 KB
random_9.txt AC 1 ms 128 KB