program UCLNAB;
uses crt;
var a,b:integer;
begin
clrscr;
write('Nhap a: '); readln(a);
write('Nhap b: '); readln(b);
while a<>b do
if a>b then a:=a-b
else b:=b-a;
write('UCLN cua 2 so tren la: ',a);
readln
end.
VAR m,ninteger;Function ucln(s1,s2:integer):integer;Begin if s1 mod s2=0 then ucln:=s2 else ucln:=ucln(s2,s1 mod s2);End;BEGIN write('m=');readln(m); write('n=');readln(n); write(abs(ucln(m,n))); readln;END.
Em hãy viết thư cho một người thân trong gia đình để chia sẻ trải nghiệm của mình về đại dịch COVID-19 ( không quá 800 từ,ko chép mạng, làm hay mình cho 5*)
xét xem các PT sau có tương đương hay ko? a) 3x=3 và x-1=0 b) 2x-6=0 và x(x-3)=0 c )x-1=2 và (x+1)(x+3)=0
Hòa tan 56,2 gam hỗn hợp MgCO3 và BaCO3 (trong đó chứa a% MgCO3 về khối lượng) bằng dung dịch HCl và cho tất cả khí thoát ra hấp thụ vào 4 lít dung dịch Ca(OH)2 0,1 M. Xác định giá trị của a để thu được khối lượng kết tủa bé nhất?
cho số nguyên n(n<=50). em hãy lập trình tính tổng như sau : S=(2+3/1.2)+(4/1.2.3)+...+(n+1/1.2.3...n)
ead F20RW MAY30 m Bài Thi Câu 17: C. Mác viết: “những thay đổi đơn thuần về lượng đến một mức độ nhất định sẽ chuyển hóa thành sự khác nhau về chất". Trong câu nói trên C. Mác đã bản về nội dung nào đây của sự vật và hiện tượng? A. Xu thế vận động và phát triển. B. Cách thức vận động và phát triển. C. Khuynh hướng phát triển. D. Nguồn gốc sự vận động và phát triển.
Tuan usually has breakfast at food_ _ _ _ _
Giải giúp từ 10 la mã đến 13 la mã với ạ
Lập chương trình tính s = a + b với A.B là số nguyên
so sánh a) A=2^0+2^1+2^2+2^3+..............2^2018 và B=(2^2019) -1 b)A=2016.2018 và B=2017^2
Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến
