Viết Chương Trình Tìm UCLN Của 3 Số Nguyên A,B,C (1<

Tất cả Toán học Vật Lý Hóa học Văn học Lịch sử Địa lý Sinh học Giáo dục công dân Tin học Tiếng anh Công nghệ Khoa học Tự nhiên Lịch sử và Địa lý P Phạm Ngọc Linh Hỏi từ APP VIETJACK đã hỏi trong Lớp 11 Tin học · 09:02 06/05/2021 Theo dõi Báo cáo Viết chương trình tìm UCLN của 3 số nguyên A,B,C (1<= A,B,C<=100000) Trả Lời (+5 điểm) Hỏi câu khác Hỏi chi tiết ...Xem thêm

Quảng cáo

1 câu trả lời 1371

N Nga Vũ 4 năm trước

var a,b,c,i,min,ucln:integer;

begin

write('a=');readln(a);

write('b=');readln(b);

write('c=');readln(c);

min:=a;

if a>b then min:=b;

if a>c then min:=c;

for i:=1 to min do

if (a mod i=0) and (b mod i=0) and (c mod i=0) then ucln:=i;

writeln(' uoc chung *** nhat cua a,b,c la: ',ucln);

readln;

end.

0 bình luận Đăng nhập để hỏi chi tiết

Quảng cáo

Bạn muốn hỏi bài tập?

Đặt câu hỏi

Câu hỏi hot cùng chủ đề

• Hàm cho giá trị bằng bình phương của x là :

  A. Sqrt(x);

  B. Sqr(x);            

  C. Abs(x);

  D. Exp(x);