Bài 6. Câu lệnh điều kiện

Nguyễn Trần Phát

Viết chương trình nhập vào số thực bất kì n. Kiểm tra xem chữ số hàng đơn vị của số đó có phải là số chẵn hay không

Luân Đào
3 tháng 9 2020 lúc 9:09

var n: integer;
begin
write('Nhap n: '); readln(n);
if (n mod 2 = 0) then write('La so chan')
else write('Khong la so chan');
end.

Bình luận (0)
✿✿❑ĐạT̐®ŋɢย❐✿✿
3 tháng 9 2020 lúc 12:58

uses crt;
var n : integer; a : array[1..100] of integer;
st : string;
i : integer;
begin clrscr;
write('Nhap so n :'); readln(n);
str(n,st);
for i:=1 to length(st) do val(st[i],a[i]);
if a[i] mod 2 = 0 then write('Chu so hang don vi cua ',n,' la chan') else
write('Chu so hang don vi cua ',n,' la le');
readln
end.

Bình luận (0)
Minh Lệ
3 tháng 9 2020 lúc 12:12

Program HOC24;

var n: longint;

begin

write('Nhap n : '); readln(n);

n:=n mod 10;

if n mod 2=0 then write('Chu so hang don vi cua so do la so chan')

else write('Chu so hang don vi cua so do khong phai la so chan');

readln

end.

Bình luận (0)

Các câu hỏi tương tự
Minh Ngọc
Xem chi tiết
Minh Ngọc
Xem chi tiết
Minh Ngọc
Xem chi tiết
Lê Kiều Thiên An
Xem chi tiết
Cao Minh Thảo
Xem chi tiết
phamthiminhanh
Xem chi tiết
Sonyeondan Bangtan
Xem chi tiết
Phạm Hải Đăng
Xem chi tiết
Lê Văn trưởng
Xem chi tiết