program levchenkovapolozhkov mode objfpc uses IFDEF UNIX IFDEF UseCThr

program levchenkovapolozhkova;

{$mode objfpc}{$H+}

uses
  {$IFDEF UNIX}{$IFDEF UseCThreads}
  cthreads,
  {$ENDIF}{$ENDIF}
  Classes
  { you can add units after this };

var a, b :integer;
begin
  writeln ('Введите первое и второе слагаемые');
  readln (a);
  readln (b);
  writeln ('Результат вычисления = ', a+b);
  readln();
end.