[pascal 8]

P

pinkylun

[TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn
Chắc suất Đại học top - Giữ chỗ ngay!!

ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn.

Đề: viết chương trình nhập một số tự nhiên vào máy tính và ghi ra màn hình kết quả số đã nhập là 1 số chẳn hay lẻ


em giải thể này đc k ạ :D

Program Bai_tap;
uses crt;
var a:integer;
begin
clrscr;
writeln('a=');readln(a);
if a mod 2=0 then writeln('a la so chan') else writeln('a la so le');
readln
end.
 
K

khai221050

thế cũng được rồi đó em, anh có vài góp ý:
- về kiểu của a: em có thể sử dụng kiểu word, không nên dùng integer vì nó dư 1 khoảng rất lớn (từ -32768 đến -1), còn word thì là các số tự nhiên từ 0 đến 65535
- Thêm vài câu write/writeln cho chương trình màu mè tí nhé
 
Top Bottom