Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Nguyễn Văn Hùng

Viết chương trình nhập vào bàn phím 2 số nguyên dương tìm ước chung lớn nhất MN sau đó in kết quả ra màn hình yêu cầu sử dụng hàm

Ngô Bá Hùng
25 tháng 4 2023 lúc 23:27

program UocChungLonNhat;
var
  a, b: integer;

function UCLN(a, b: integer): integer;
begin
  if b = 0 then
    UCLN := a
  else
    UCLN := UCLN(b, a mod b);
end;

begin
  write('Nhập số nguyên dương a: ');
  readln(a);
  write('Nhập số nguyên dương b: ');
  readln(b);

  writeln('UCLN của ', a, ' và ', b, ' là ', UCLN(a, b));
end.


Các câu hỏi tương tự
Tiên Tiên
Xem chi tiết
lamgi hoi
Xem chi tiết
Phước Thiện Lê Hoàng
Xem chi tiết
Trần Văn Lượng
Xem chi tiết
Hoàng Thị Minh Nguyệt
Xem chi tiết
Võ Chí Khang
Xem chi tiết
mistud
Xem chi tiết
lam nguyen
Xem chi tiết
Nguyễn tiên
Xem chi tiết