Ответ:

//PascalABC.NET 3.4.2

var

 num, num2: string;

begin

 readln(num);

 readln(num2);

 write(num.ToBigInteger div num2.ToBigInteger);

end.