program chastikov mode objfpc uses IFDEF UNIX IFDEF UseCThreads cthrea

program chastikov;

{$mode objfpc}{$H+}

uses
  {$IFDEF UNIX}{$IFDEF UseCThreads}
  cthreads,
  {$ENDIF}{$ENDIF}
  Classes
  { you can add units after this };
var a,b:integer;
begin
Readln(a);
Readln(b);
Writeln('Результат умножения ',a*b);
Readln();
end.