(4 ĐIỂM)VIẾT TRƯƠNG TRÌNH NHẬP TỪ BÀN PHÍM 2 SỐ TỰ NHIÊN N,M (VỚI 5&L...

Câu 3 : (4 điểm)Viết trương trình nhập từ bàn phím 2 số tự nhiên n,m (với 5<n<m<100) là hai kích thước của hình chữ nhật. Đưa ra màn hình phương án cắt hình chữ nhật trên thành các hình vuông sao cho số hình vuông là ít nhất có thể.Ví dụ cho n=5, m=6 thì kết quả cắt thành 5 hình vuông và trên màn hình được biểu diễn nhu sau:5 63 3 2 2 2

var u,d,m,m:longint;

BEGIN

u:=2;{uoc so dau tien}

Repeat

m:=0;

while n mod u <> 0 do inc(u);{tim uoc so tiep theo}

while n mod u = 0 do

begin

inc(m);n:=n div u;

end;

write(u);

if m>1 then write('^',m);{so mu}

if n>1 then write(' * ');

until n=1;

readln;

END.