Дан прямоугольник, длины сторон которого выражаются целыми числами. Найдите количество квадратов (длины сторон каждого квадрата целые), на которые можно разрезать данный прямоугольник при условии, что при разрезании каждый раз отрезается квадрат наибольшей площади со стороной, общей стороне текущего прямоугольника.
current_row,current_column,rows,columns:integer;
begin
readln(rows);
readln(columns);
for current_row := 1 to rows do begin
writeln();
for current_column := 1 to columns do begin
read(a[current_row,current_column]);
b[current_row,current_column] :=a [current_row,current_column] / 8;
end;
end;
for current_row := 1 to rows do begin
writeln();
for current_column := 1 to columns do
write(b[current_row,current_column]:4, ' ');
end;
end.