đây nè bạn :
program sapxep;
uses crt;
var a,b: integer;
begin
clrscr;
write('nhap so a:');readln(a);
write('nhap so b:');readln(b);
If a>b then writeln('thu tu cua a va b la',a,b);
else writeln('thu tu cua a va b la',b,a);
readln;
end.
đây nè bạn :
program sapxep;
uses crt;
var a,b: integer;
begin
clrscr;
write('nhap so a:');readln(a);
write('nhap so b:');readln(b);
If a>b then writeln('thu tu cua a va b la',a,b);
else writeln('thu tu cua a va b la',b,a);
readln;
end.
Viết chương trình nhập số nguyên A từ bàn phím,kiểm tra thông báo ra màn hình xem số đó là số âm hay dương
viết chương trình pascal :
- So sánh 2 số nhập từ bàn phím
-Tìm số nhỏ nhất trong 4 số nhập từ bàn phím
-hoán đổi giá trị của 2 biến x, y theo thứ tự không giảm
-in ra kết quả sắp xếp 3 số nhập từ bàn phím theo thứ tự không tăng
Hãy viết chương trình nhập 2 số nguyên x và y bất ki tư bàn phím sau đó in giá trị của biểu thức x^2+2y+1 ra màn hình
Mk cần gấp help me
Cảm ơn mọi người rất nhiều
Câu1 viết chương trình nhập giá trị n từ ban phím in các số chẵn từ 1 đến n Câu2 viết chương trình in ra màn hình các số chẵn đầu tiên với chẵn nhỏ nhất >1000 Lm ơn tui sắp kiểm tra r
Viết chương trình nhập vào 2 số nguyên a và b khác nhau từ bàn phím. So sánh 2 số đó rồi in ra số lớn hơn.
Viết chương trình nhập vào từ bàn phím số nguyên a, sử dụng câu lệnh điều kiện để kiểm tra xem a có nằm trong khoảng từ 1 đến 100 hay ko , thông báo kết quả ra màn hình
Viết chương trình nhập vào 2 số d và b từ bàn phím xuất xuất ra màn hình số a nếu a>b ngược lại xảy ra b
viết chương trình từ bàn phím hai số nguyên x,y (x>y), kiểm tra và thông báo ra màn hình x chia hết cho y hay không.
cần gấp!!
AI GIÚP MIK BÀI NÀY VS
1) viết chương trình tính tổng 100 số tự nhiên đầu tiên
2. viết chương trình kiểm tra số n nhập từ bàn phím có chia hết cho hai số 2 và 3 không. nếu có thì in ra dòng chữ chia hết và không chia hết