A div B

[nezabydka12]

Помогите срочно решить задачу!
Даны два целых числа A и B. Требуется найти целую часть от их частного.
Входные данные
Во входном файле INPUT.TXT записаны целые числа A и B по одному в строке (0 <= A <= 10 в 100степени, 0 < B <= 10000).
Выходные данные
В выходной файл OUTPUT.TXT выведите единственное число без лидирующих нулей: A div B.

[Serge_Bliznykov]

ищите по ключевым словам длинная арифметика

а алгоритмы решения могут быть такими:
простой. но медленный: пока A больше B - вычитать из A число B. если A после вычитания стало меньше B - это и есть ответ.

второй - намного сложне. Реализовывать деление "в столбик" (как учили в начальной школе).

[warca]

var a,b,c:longint;

begin
readln(a);
readln(b);
c:=a div b;
writeln(c);
readln;
end.

не совсем уверен.