Question

Помогите, пожалуйста... Очень нужно.Только не кидайте решения из Интернета, они не подходят.

Полоска бумаги имеет размеры а*b. Каждый раз от неё отрезается квадрат максимального размера до тех пор, пока не получится квадрат. Сколько квадратов получится? Программе даны числа а и b(1<=a,b<=10^9).
Необходимо решение на языке Pascal