with Ada.Text_IO; use Ada.Text_IO;
with Ada.Integer_Text_IO; use Ada.Integer_Text_IO;

procedure Solve is
   A : Integer;
   B : Integer;
   C : Integer;
   M : Integer;
begin
   Get (A);
   Get (B);
   Get (C);
   M := A;
   if B > M then
      M := B;
   end if;
   if C > M then
      M := C;
   end if;
   Put_Line (Integer'Image (A+B+C-M));
end Solve;