Nhập toạ độ 2 ô trên bàn cờ (hàng, cột). Cho biết 2 ô có cùng màu với nhau không?
Pascal: Ô trùng màu {Cần gấp lắm!)
Bắt đầu bởi pe_kid_55, 02-04-2011 - 21:04
-
Chủ đề bị khóa
#1
Đã gửi 02-04-2011 - 21:04
pe_kid_55
-
- Thành viên
-
- 57 Bài viết
Hạ sĩ
-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-
Sống không phải là tồn tại.
-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-
#2
Đã gửi 02-04-2011 - 21:38
pe_kid_55
-
- Thành viên
-
- 57 Bài viết
Hạ sĩ
Giúp em với, em cần gấp lắm!!!!!
-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-
Sống không phải là tồn tại.
-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-
#3
Đã gửi 02-04-2011 - 22:50
pe_kid_55
-
- Thành viên
-
- 57 Bài viết
Hạ sĩ
huhu hok ai chi het ak
-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-
Sống không phải là tồn tại.
-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-
#4
Đã gửi 02-04-2011 - 23:12
pe_kid_55
-
- Thành viên
-
- 57 Bài viết
Hạ sĩ
Chắc chết quá!!!!!
-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-
Sống không phải là tồn tại.
-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-
#5
Đã gửi 03-04-2011 - 07:13
pe_kid_55
-
- Thành viên
-
- 57 Bài viết
Hạ sĩ
Có ai giúp hok?
-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-
Sống không phải là tồn tại.
-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-
#6
Đã gửi 03-04-2011 - 07:20
l.kuzz.l
-
- Thành viên
-
- 109 Bài viết
Trung sĩ
BÀi này có vẻ hóc búa ấy
Chúng ta không thể biết chính xác 100% việc sẽ xảy ra trong tương lai
Và đây là điều duy nhất ta có thể biết 100% trong tương lai
Và đây là điều duy nhất ta có thể biết 100% trong tương lai
#7
Đã gửi 03-04-2011 - 07:30
pe_kid_55
-
- Thành viên
-
- 57 Bài viết
Hạ sĩ
l.kuzz.l biết hok giúp em với! Bài này là bài cơ bản ấy, chẳng phải bài nâng cao đâu!
-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-
Sống không phải là tồn tại.
-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-
#8
Đã gửi 03-04-2011 - 07:30
l.kuzz.l
-
- Thành viên
-
- 109 Bài viết
Trung sĩ
Chương trình nè bạnBÀi này có vẻ hóc búa ấy
var x1,x2,y1,y2:integer;
begin
write('Nhap toa do o thu 1');read(x1,y1);
write('Nhap toa do o thu 2');read(x2,y2);
if (x1+y1)mod 2 = (x2+y2)mod 2 then write('2 o cung mau')
else write('2 o khac mau');
repeat until keypressed;
end.
Chúng ta không thể biết chính xác 100% việc sẽ xảy ra trong tương lai
Và đây là điều duy nhất ta có thể biết 100% trong tương lai
Và đây là điều duy nhất ta có thể biết 100% trong tương lai
#9
Đã gửi 03-04-2011 - 07:32
l.kuzz.l
-
- Thành viên
-
- 109 Bài viết
Trung sĩ
Ok chứ bạn
Chúng ta không thể biết chính xác 100% việc sẽ xảy ra trong tương lai
Và đây là điều duy nhất ta có thể biết 100% trong tương lai
Và đây là điều duy nhất ta có thể biết 100% trong tương lai
#10
Đã gửi 03-04-2011 - 07:50
pe_kid_55
-
- Thành viên
-
- 57 Bài viết
Hạ sĩ
Ủa sao em nhập số nào nó cũng ra "2 o khac mau" vậy. Chắc chương trình này có vấn đề rồi.
-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-
Sống không phải là tồn tại.
-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-
#11
Đã gửi 03-04-2011 - 09:59
pe_kid_55
-
- Thành viên
-
- 57 Bài viết
Hạ sĩ
Ai sửa giùm em với!!!!!
-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-
Sống không phải là tồn tại.
-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-
#12
Đã gửi 03-04-2011 - 10:59
Duy1995
-
- Thành viên
-
- 70 Bài viết
Hạ sĩ
var x1,x2,y1,y2:integer;
begin
write('Nhap toa do o thu 1');read(x1,y1);
write('Nhap toa do o thu 2');read(x2,y2);
if (x1+x2)mod 2 = (y1+y2)mod 2 then write('2 o cung mau')
else write('2 o khac mau');
end.
Sửa một chút là được
begin
write('Nhap toa do o thu 1');read(x1,y1);
write('Nhap toa do o thu 2');read(x2,y2);
if (x1+x2)mod 2 = (y1+y2)mod 2 then write('2 o cung mau')
else write('2 o khac mau');
end.
Sửa một chút là được
Bài viết đã được chỉnh sửa nội dung bởi Duy1995: 03-04-2011 - 11:05
#13
Đã gửi 03-04-2011 - 13:02
pe_kid_55
-
- Thành viên
-
- 57 Bài viết
Hạ sĩ
Em pó tay òi, nó vẫn ra "2 o khac mau".
-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-
Sống không phải là tồn tại.
-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-
#14
Đã gửi 03-04-2011 - 13:58
Duy1995
-
- Thành viên
-
- 70 Bài viết
Hạ sĩ
Lạ nhỉ? Máy mình chạy bình thường
Bạn thử x1=1 y1=1 x2=3 y2=3 xem có được không
Mình chạy nó ra cùng màu mà
Bạn thử x1=1 y1=1 x2=3 y2=3 xem có được không
Mình chạy nó ra cùng màu mà
#15
Đã gửi 03-04-2011 - 14:11
pe_kid_55
-
- Thành viên
-
- 57 Bài viết
Hạ sĩ
Nó cũng vậy. Nhập số gì thì nó cũng xuất" 2 ô khác nhau hết"
-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-
Sống không phải là tồn tại.
-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-
#16
Đã gửi 03-04-2011 - 14:16
pe_kid_55
-
- Thành viên
-
- 57 Bài viết
Hạ sĩ
Đây là nguyên văn chương trình của mình, bạn xem có sai sót gì hok
Program Bt;
Var
x1,x2,y1,y2:integer;
Begin
Write('Nhap toa do o 1: ');
Readln(x1,y1);
Writeln;
Write('Nhap toa do o thu 2: ');
Readln(x2,y2);
If (x1+x2) mod 2 = (y1+y2) then
Write('2 o cung mau')
Else
Write('2 o khac mau');
Readln;
End.
-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-
Sống không phải là tồn tại.
-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-
#17
Đã gửi 04-04-2011 - 13:04
pe_kid_55
-
- Thành viên
-
- 57 Bài viết
Hạ sĩ
Có ai gúp m"nh sửa lỗi hok?
-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-
Sống không phải là tồn tại.
-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-
#18
Đã gửi 04-04-2011 - 18:52
phung khac bac linh
-
- Thành viên
-
- 74 Bài viết
Hạ sĩ
Có lẽ là sai chỗ đó. Đáng nhẽ ra phải viết làĐây là nguyên văn chương trình của mình, bạn xem có sai sót gì hok
If (x1+x2) mod 2 = (y1+y2) then
If (x1+x2) mod 2 = (y1+y2) mod 2 then
Mà cái readln cuối cùng thì bỏ dấu ";" đi.
Thử sửa lại rồi chạy xem có đc ko.
Bài viết đã được chỉnh sửa nội dung bởi phung khac bac linh: 04-04-2011 - 18:58
1 người đang xem chủ đề
0 thành viên, 1 khách, 0 thành viên ẩn danh
