Quảng cáo
1 câu trả lời 269
Program chiahet;
Uses crt;
Var N:integer;
Begin
Clrscr;
Writeln('Nhap so N: ');Readln(N);
If N mod 2=0 then writeln(N,' la so chia het cho 2')else writeln (N,' la so khong chia het cho 2');
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
45316 -
Hỏi từ APP VIETJACK
Đã trả lời bởi chuyên gia
34744 -
Đã trả lời bởi chuyên gia
30536 -
Hỏi từ APP VIETJACK27980
-
Hỏi từ APP VIETJACK
Đã trả lời bởi chuyên gia
22290
Gửi báo cáo thành công!
