Program So_Sanh;
Uses Crt;
Var a,b:integer;
Begin
Clrscr;
Writeln('Nhap so a:');Readln(a);
Writeln('Nhap so b:');Readln(b);
If a>b then writeln('a>b')
Else If a<b then writeln('a<b')
Else If a=b then writeln('a=b');
Readln
End.
program bt;
var
a,b:integer;
begin
write('Nhap so a: ');readln(a);
write('Nhap so b: ');readln(b);
if a>b then write('a lon hon b') else
if a<b then write('a nho hon b') else
write('a bang b');
readln;
end.
Kiểu dữ liệu bạn có thay đổi thành real, hoặc byte....
Còn phần khai báo thư viện có cũng được không cũng không sao nha
Chúc bạn học tốt
Làm hộ mình câu khoanh tròn với ạ
Với x > y và xy = 1. Tìm giá trị nhỏ nhất của A = $\frac{x^2+y^2}{x- y}$ Giúp với QAQ
giúp mình với nhưng phai đung và đầy đủ nha
Em hãy nêu nguyên nhân thắng lợi của Cách mạng tháng Tám năm 1945?
Tìm 3 cum tính từ trong đoạn văn và sắp xếp về mô hình cụm tính từ làm được cho 5 sao
Quang hợp là gì? Nêu chức năng của quang hợp? Vẽ sơ đồ quang hợp Làm đầy đủ hết thì tui mới vote nha
Cho cây có quả tròn, ngọt tự thụ phấn được F1 có 25 % cây có quả tròn ,chua; 50% cây có qur tròn,ngọt ; 25 cây có quả bầu dục,chua. a, Hãy xác định quy luật di truyền b, Hãy viết kiểu gen của cây thân cao,hoa đỏ c, Bố mẹ phải có kiểu gen như thế nào đẻ đoeì con có tỉ lệ kiểu hình 1 qur tròn, ngot: 1 quả bầu dục, chua?
đây là dạng toán nâng cao bài 1:tính chữ số tận cùng của các số sau: a.2^100 b.4^161 c.(19^8)^1945 d.(3^2)^2010 bài 2:tìm x biết a.2^x.4=128 b.x^15=x c.16^x<128 d.5^x.5^x+1.5^x+2<100....0:2^18 e.2^x.(2^2)^2=(2^3)^2 f.(x^5)^10=x cảm ơn mọi ngưới nhớ ủng hộ mik nhé
một hỗn hợp A gồm 5,1 gam NH3 và 5,6 gam CO. a)Tính khối lượng mol trung bình của hỗn hợp A b) Tính tỉ khối của hỗn hợp A với không khí
cho hàm số y=h(x)= căn bậc hai của -3(x-7). Tìm giá trị của x sao cho: a, y nhận giá tị dương. b, y nhận giá trị âm
Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến
