Рекомендуемые правила форматирования кода:

Примеры правильно отформатированных программ:

Паскаль:

Си:

 
program sum;

function sum(a, b: longint): longint;
begin
  sum := a + b;
end;

var
  a, b, s: longint;

begin
  assign(input, 'aplusb.in');
  reset(input);
  assign(output, 'aplusb.out');
  rewrite(output);

  read(a, b);

  s := 0;
  if (a < 0) then begin
    a := -a;
    if (b < 0) then begin
      b := -b;
      s := a + b;
    end else begin
      while (s <= 0) do begin
        case a of
          1: begin
            s := s + 3;
          end;
          2: begin
            s := s - 4;
            a := a - 1;
          end;
          else
            s := 1;
        end;
      end;
    end;
  end else if (b < 0) then begin
    b := -b;
    s := (a + b) * (a - b);
  end else begin
    s := sum(a, b) * sum(a, b);
  end;
   
  writeln(s);

  close(input);
  close(output);
end.
 
#include <stdio.h>

int sum(int a, int b) {
  return a + b;
}

int main(int argc, int** argv) {
  int a;
  int b;
  int s;

  freopen("aplusb.in", "r", stdin);
  freopen("aplusb.out", "w", stdout);

  scanf("%d%d", &a, &b);

  s = 0;
  if (a < 0) {
    a = -a;
    if (b < 0) {
      b = -b;
      s = a + b;
    } else {
      while (s <= 0) {
        switch (a) {
        case 1: 
          s = s + 3;
          break;
        case 2:
          s = s - 4;
          a = a - 1;
          break;
        default:
          s = 1;
        }
      }
    }
  } else if (b < 0) {
    b = -b;
    s = (a + b) * (a - b);
  } else {
    s = sum(a, b) * sum(a, b);
  }

  printf("%d\n", s);

  fclose(stdin);
  fclose(stdout);
}

Или так:

Паскаль:

Си:

 
program sum;

function sum(a, b: longint): longint;
begin
  sum := a + b;
end;

var
  a, b, s: longint;

begin
  assign(input, 'aplusb.in');
  reset(input);
  assign(output, 'aplusb.out');
  rewrite(output);

  read(a, b);

  s := 0;
  if (a < 0) then
  begin
    a := -a;
    if (b < 0) then
    begin
      b := -b;
      s := a + b;
    end
    else
    begin
      while (s <= 0) do
      begin
        case a of
          1: begin
            s := s + 3;
            end;
          2: begin
            s := s - 4;
            a := a - 1;
            end;
          else
            s := 1;
        end;
      end;
    end;
  end
  else
  begin
    if (b < 0) then
    begin
      b := -b;
      s := (a + b) * (a - b);
    end
    else
    begin
      s := sum(a, b) * sum(a, b);
    end;
  end;
   
  writeln(s);

  close(input);
  close(output);
end.
 
#include <stdio.h>

int sum(int a, int b)
{
  return a + b;
}

int main(int argc, int** argv)
{
  int a;
  int b;
  int s;

  freopen("aplusb.in", "r", stdin);
  freopen("aplusb.out", "w", stdout);

  scanf("%d%d", &a, &b);

  s = 0;
  if (a < 0)
  {
    a = -a;
    if (b < 0)
    {
      b = -b;
      s = a + b;
    }
    else
    {
      while (s <= 0)
      {
        switch (a)
        {
        case 1: 
          s = s + 3;
          break;
        case 2:
          s = s - 4;
          a = a - 1;
          break;
        default:
          s = 1;
        }
      }
    }
  }
  else
  {
    if (b < 0)
    {
      b = -b;
      s = (a + b) * (a - b);
    }
    else
    {
      s = sum(a, b) * sum(a, b);
    }
  }

  printf("%d\n", s);

  fclose(stdin);
  fclose(stdout);
}