Quảng cáo
1 câu trả lời 316
program chan_le;
uses crt;
var a:integer;
begin
clrscr;
writeln('Nhap so a:');readln(a);
if a mod 2=0 then writeln(a,' la so chan')else writeln(a,' la so le');
readln
end.
uses crt;
var a:integer;
begin
clrscr;
writeln('Nhap so a:');readln(a);
if a mod 2=0 then writeln(a,' la so chan')else writeln(a,' la so le');
readln
end.
Quảng cáo
Bạn cần hỏi gì?
Câu hỏi hot cùng chủ đề
-
Hỏi từ APP VIETJACK
Đã trả lời bởi chuyên gia
45273 -
Hỏi từ APP VIETJACK
Đã trả lời bởi chuyên gia
34709 -
Đã trả lời bởi chuyên gia
30493 -
Hỏi từ APP VIETJACK27870
-
Hỏi từ APP VIETJACK
Đã trả lời bởi chuyên gia
22249
Gửi báo cáo thành công!
