program Project13;

{$APPTYPE CONSOLE}

{$R *.res}

uses
  System.SysUtils;

var
   a, b, S: Integer;
begin
   Writeln('Inter a value of "a" : ');
   Readln(a);
   Writeln('Inter a value of "b" : ');
   Readln(b);
   S := a*b;
   Writeln('The value of square:' ,S);
   Readln;
end.