viết chương trình nhập vào số nguyên a.In ra màn hình nếu số đó là số lẻ.
2 câu trả lời
program b1;
uses crt;
var a : longint;
begin
clrscr;
write('cho biet a = ');
readln(a);
if a mod 2 = 0 then write(a,' la so chan')
else write(a,' la so le');
readln;
end.
Program BTT;
Uses crt;
Var a: longint;
Begin
Clrscr;
Write('Nhap a: '); Readln(a);
If a mod 2 = 1 then Write(a,' la so le')
Else Write(a,' khong phai so le');
Readln
End.
Câu hỏi trong lớp
Xem thêm