1.nhập vào từ bàn phím 2 số tự nhiên a và b . So sánh và in ra kết quả lên màn hình
2. nhập vào từ bàn phím số tự nhiên a và b . Hãy cho biết a là số chẵn hay lẻ lên màn hình
1.nhập vào từ bàn phím 2 số tự nhiên a và b . So sánh và in ra kết quả lên màn hình
2. nhập vào từ bàn phím số tự nhiên a và b . Hãy cho biết a là số chẵn hay lẻ lên màn hình
Bài 1:
Program BTT;
Uses crt;
Var a,b: longint;
Begin
Clrscr;
Write(‘Nhap hai so a va b: ‘); Readln(a,b);
If a<b then Write(a,’ < ‘,b)
Else If a>b then Write(a,’ > ‘,b)
Else Write(a,’ = ‘,b);
Readln
End.
Bài 2:
(Mình không hiểu lắm, xét a là lẽ hay chẵn thì nhập b làm gì nhỉ? Mình làm nhập a thôi nhé!)
Program BTT;
Uses crt;
Var a: longint;
Begin
Clrscr;
Write(‘Nhap so a: ‘); Readln(a);
If a mod 2 = 0 then Write(a,’ la so chan’)
Else Write(a,’ la so le’);
Readln
End.
1/ var a,b:longint;
begin
write(‘nhap a,b’); readln(a,b);
if a>b then write(‘ a>b’);
if a<b then write(‘a<b’) else write(‘a=b’);
readln;
end.
2/
var a,b:longint;
begin
write(‘nhap a,b’); readln(a,b);
if a mod 2 = 0 then write(‘a la so chan’) else write(‘ a la so le’)
readln;
end.