Cửa hàng Mã máy A 12 A 12 A 13 B 11 B 10 Làm sao để nó vẫn đếm là A có 2 máy...

mn giúp mình với ạ Câu trả lời: mn giúp mình với ạ

Bạn thao tác với Excel phải không? Câu trả lời: Bạn thao tác với Excel phải không?

Cửa hàng Mã máyA 12A 12A 13B 11

NN

Nguyễn Nguyên Vũ

15 tháng 10 2021 - olm

cho hỏi có ai biết chơi minecraft không tôi có câu hỏi: trong minecraft thì định dạng ngôn ngữ ne@omga247ve về cách trở thành người đột nhập ẹoªÌ Ðo 4***£ m o j a n g studio thì làm ơn cho biết mã enter để vàobảng cập nhật không ạvà mọi người ai chơi minecraft thì thông báo ngay...

Đọc tiếp

#Hỏi cộng đồng OLM #Tin học lớp 12

1

AT

Alex Tran

7 tháng 5

Câu hỏi của bạn hơi khó hiểu vì có một số đoạn văn bị nhiễu (có vẻ như chứa ký tự lạ hoặc mã hóa sai), nhưng mình sẽ cố gắng hiểu và trả lời theo phần có thể hiểu được:

🎮 Bạn đang hỏi về:

Minecraft
Ngôn ngữ “ne@omga247ve” – Có thể bạn đang nói đến ngôn ngữ bí mật hoặc tùy chỉnh trong Minecraft?
Cách trở thành “người đột nhập” (hacker?) Mojang Studio?
Cách mở bảng cập nhật (update board) hoặc gõ mã để truy cập thông tin cập nhật?

⚠️ Lưu ý quan trọng trước:

Nếu bạn đang hỏi về:

“cách đột nhập Mojang Studio” hay hack tài khoản, phần mềm, server v.v...

→ Mình không hỗ trợ bất kỳ hành động nào vi phạm pháp luật hoặc điều khoản sử dụng của Mojang/Microsoft.

✅ Giải thích những phần hợp lệ:

1. 🔤 Ngôn ngữ "ne@omga247ve" là gì?

Có vẻ bạn đang nhầm hoặc đang đề cập tới một ngôn ngữ giả lập/tùy chỉnh.

Minecraft có một số ngôn ngữ “Easter Egg”, ví dụ:

Pirate Speak (en_PT) – nói kiểu cướp biển
LOLCAT (en_UD) – kiểu viết vui nhộn
Zombified (zombie language) – toàn chữ kỳ lạ

Bạn có thể đổi ngôn ngữ tại:
Settings > Language > chọn ngôn ngữ bạn muốn

2. 📋 Bảng cập nhật trong Minecraft là gì?

Không có “mã enter” để mở bảng cập nhật.
Khi Minecraft có bản mới, bạn sẽ thấy cập nhật trong Minecraft Launcher.
Ngoài ra, bạn có thể xem chi tiết bản cập nhật tại:
🔗 https://www.minecraft.net/

3. ✅ Nếu bạn muốn biết các lệnh đặc biệt trong Minecraft:

Bạn có thể bật cheats (gian lận) trong thế giới, rồi dùng các lệnh như:

bash

Sao chépChỉnh sửa

/give @p minecraft:diamond 64

bash

Sao chépChỉnh sửa

/summon lightning_bolt ~ ~ ~

bash

Sao chépChỉnh sửa

/effect give @p minecraft:invisibility 60 1

🧭 Kết luận:

Nếu bạn đang nói đến ngôn ngữ kỳ lạ, đó có thể là ngôn ngữ tùy chỉnh hoặc bị lỗi mã hóa.
Minecraft không có “mã bí mật” để vào bảng cập nhật, bạn chỉ cần kiểm tra launcher hoặc website chính thức.
Nếu bạn muốn dùng lệnh đặc biệt, hãy bật cheats và dùng lệnh trong game.

👉 Bạn có thể gửi lại câu hỏi với nội dung rõ hơn hoặc ảnh chụp màn hình nếu muốn mình hỗ trợ đúng hơn!

2/2

Đúng(0)

CA

💖campuchno asasino👑

23 giờ trước (20:25) - olm

mn ơi, mn có nhắn tin đc ko mn chứ mình ko nhắn đc, nó chỉ có đấu trường tri thức thôi😥

#Hỏi cộng đồng OLM #Tin học lớp 12

18

E

✼🅽🅶🆄🆈ễ🅽🆅ũ🅱ả🅾🅰🅽︵⁹³

23 giờ trước (20:26)

mik vẫn nhắn đc á bn, hay bn bị lỗi j

Đúng(2)

DA

Dương Ánh Tuyết

23 giờ trước (20:26)

Òi òi, mạnh òi

Đúng(0)

TL

Trần Linh Vũ

10 tháng 9 - olm

làm thế nào để trí tuệ nhân tạo có thể suy luận trong những tình huống mà nó chưa từng gặp?

#Làm quen với Trí tuệ nhân tạo #Tin học lớp 12

1

TH

Trần Hoàng Trung

VIP

10 tháng 9

Tk

Kết hợp các khái niệm
Suy luận theo ngữ cảnh
Sử dụng chuỗi suy nghĩ (chain-of-thought)
Khả năng mô hình hóa thế giới trừu tượng

Hok tốt

Đúng(0)

CA

💖campuchno asasino👑

23 giờ trước (20:28) - olm

mn có nhắn đc ko chứ mình vào tin nhắn nó chỉ có đấu trường tri thức thôi mất hết tin nhắn của mình😥

#Hỏi cộng đồng OLM #Tin học lớp 12

6

HL

Hoàng Linh Đan

23 giờ trước (20:31)

hình như bạn bấm khóa chức năng nhán tin. mình cũng bị vậy

Đúng(0)

☕️㋧㋙㋧㋙㋙㋧㋙

23 giờ trước (20:33)

bấm rồi là không bấm lại đc nữa, chúc mừng bạn ^^

Đúng(0)

DH

Đức Hải

23 tháng 4 2019

Câu 1: Em đã bôi đen một hàng trong Excel, lệnh nào trong số các lệnh sau cho phép chèn thêm một hàng vào vị trí phía trên hàng đang chọn? A. Vào thực đơn Insert, chọn Rows. B. Vào thực đơn Insert, chọn Columns. C. Vào thực đơn Insert, chọn Object. D. Vào thực đơn Insert, chọn Cells. Câu 2: Để tìm nghiệm của phương trình 2x-5=0 em sử dụng lệnh nào trong phần mềm Toolkit Math? A. expand. B. solve. C. simplify. D....

Đọc tiếp

Câu 1: Em đã bôi đen một hàng trong Excel, lệnh nào trong số các lệnh sau cho phép chèn thêm một hàng vào vị trí phía trên hàng đang chọn?
A. Vào thực đơn Insert, chọn Rows.
B. Vào thực đơn Insert, chọn Columns.
C. Vào thực đơn Insert, chọn Object.
D. Vào thực đơn Insert, chọn Cells.
Câu 2: Để tìm nghiệm của phương trình 2x-5=0 em sử dụng lệnh nào trong phần mềm Toolkit Math?
A. expand. B. solve. C. simplify. D. plot.
Câu 3: Để tăng chữ số thập phân ta nhấn vào nút:
A. . B. . C. . D. .
Câu 4: Theo mặc định ký tự dạng chuỗi được:
A. Canh trái trong ô. B. Canh giữa trong ô.
C. Canh phải trong ô. D. Canh đều hai bên.
Câu 5: Để vẽ đường thẳng đi qua hai điểm, ta sử dụng công cụ vẽ nào sau đây?
A. . B. . C. . D. .
Câu 6: Để vẽ biểu đồ, em sử dụng nút lệnh:
A. . B. . C. . D. .
Câu 7: Câu nào sau đây sai?
A. Định dạng bảng tính làm thay đổi nội dung các ô tính.
B. Định dạng bảng tính không làm thay đổi nội dung các ô tính.
C. Khi cần định dạng ô tính em chọn ô đó.
D. Câu A và B đúng .
Câu 8: Muốn thoát khỏi chế độ lọc dữ liệu, em thực hiện:
A. Chọn DataFilterAutofilter. B. Chọn DataFilterShow all.
C. DataForm. D. Chọn DataFilterAcvanced filter.
Câu 9: Để lựa chọn các vùng liền kề nhau trong bảng tính, bạn cần sử dụng chuột kết hợp với phím nào ?
A. Shift. B. Ctrl.
C. Alt. D. Ctrl và Shift.
Câu 10: Hãy cho biết định dạng dùng nút lệnh nào trong các nút lệnh sau?
A. . B. . C. . D. .
Câu 11: Trong bảng tính Excel, nếu trong một ô tính có các kí hiệu dấu thăng , điều đó có nghĩa là gì?
A. Cột chứa ô đó có độ rộng quá hẹp nên không hiển thị hết chữ số.
B. Chương trình bảng tính bị nhiễm virus.
C. Công thức nhập sai và Excel thông báo lỗi.
D. Hàng chứa ô đó có độ cao quá thấp nên không hiển thị hết chữ số.
Câu 12: Để tính trung bình cộng giá trị các ô từ A2 đến A9, ta sử dụng hàm:
A. =Average(A2;A9). B. =Average(A2,A9).
C. =Average(A2:A9). D. =Average (A2:A9).
Câu 13: Trong khi làm việc với Microsoft Excel, để nhập vào công thức tính toán cho một ô, trước hết ta phải gõ :
A. Dấu bằng(=). B. Dấu hai chấm (:).
C. Dấu đôla ($). D. Dấu chấm hỏi(?).
Câu 14: Các dạng biểu đồ phổ biến nhất là:
A. biểu đồ hình tròn.
B. biểu đồ cột, biểu đồ đường gấp khúc.
C. biểu đồ cột.
D. biểu đồ cột, biểu đồ đường gấp khúc, biểu đồ hình tròn.
Câu 15: Để xem trước trang in, em sử dụng lệnh nào?
A. Print Preview . B. .
C. . D. . .
Câu 16: Muốn vẽ đồ thị của hàm số y = 3x -2, tại cửa sổ dòng lệnh ta gõ:
A. Solve y = 3*x -2. B. Expand 3*x -2.
C. Solve 3*x -2= 0 x. D. Plot y = 3*x -2.
Câu 17: Để chọn hướng giấy in cho trang tính ta chọn lệnh nào trong các lệnh sau?
A. File/ print. B. File/ Save.
C. File/ close. D. File/ page setup.
Câu 18: Để tính tổng các ô từ A1 đến A7, công thức nào dưới đây là đúng?
A. =SUM(A1);SUM(A7).
B. =SUM(A1- A7).
C. =SUM(A1:A7).
D. =SUM(A1):SUM(A7).
Câu 19: Trong Excel để mở tập tin có trong đĩa ta dùng:
A. Chọn File, Open. B. Tổ hợp phím Ctrl + O.
C. Hai câu a và c đúng. D. Tổ hợp phím Ctrl + N.
Câu 20: Để thay đổi cỡ chữ của nội dung các ô tính, ta sử dụng nút lệnh nào?
A. . B. . C. . D. .
Câu 21: Để thực hiện định dạng đường viền cho bảng dữ liệu nằm trong tập tin danh sách lớp, chọn bảng dữ liệu đó, nhấn chuột vào thực đơn lệnh Format - Cells. Trong hộp thoại Format Cells, chọn thẻ:
A. Alignment. B. Border.
C. Font . D. Pattern.
Câu 22: Ô A1 của trang tính có số 1.867. Sau khi chọn ô A1 và nháy chuột 2 lần vào nút . Kết quả hiển thị trong ô A1 sẽ là:
A. 2. B. 1.85. C. 1.9. D. 1.86.
Câu 23: Để in văn bản, em sử dụng nút lệnh:
A. . B. . C. . D. .
Câu 24: Để định dạng dữ liệu tại cột Điểm là kiểu số có một chữ số ở phần thập phân, ta chọn cột dữ liệu, nhắp chuột vào thực đơn lệnh Format, chọn:
A. AutoFormat.
B. Conditional Formatting.
C. Cells.
D. Column.
Câu 25: Để điều chỉnh các trang in được hợp lí, chúng ta phải làm gì?
A. Thay đổi hướng giấy in. B. Định dạng màu chữ.
C. Định dạng phông chữ. D. Điều chỉnh dấu ngắt trang.
Câu 26: Theo mặc định ký tự dạng số được:
A. Canh giữa trong ô. B. Canh phải trong ô.
C. Canh trái trong ô. D. Canh đều hai bên.
Câu 27: Để chọn toàn bộ các ô trên bảng tính bằng tổ hợp phím em chọn:
A. Nhấn tổ hợp phím Ctrl + All.
B. Nhấn tổ hợp phím Ctrl + A.
C. Cả ba cách trên đều được.
D. Nhấn tổ hợp phím Ctrl + Alt +Space.
Câu 28: Trong Microsoft Excel, câu lệnh =MIN(6, 5,- 1, 2, 10, -4, 3, 1, -8) có kết quả là:
A. -8. B. -1. C. 10. D. 1.
Câu 29: Công cụ dùng để làm gì?
A. Vẽ tam giác.
B. Tạo đường thẳng đi qua một điểm cho trước.
C. Tạo giao điểm của hai đối tượng.
D. Tạo đường phân giác của một góc.
Câu 30: Phần mềm Toolkit Math dùng để:
A. Học toán đơn giản.
B. Quan sát và tra cứu bản đồ thế giới.
C. Vẽ hình học động.
D. Luyện gõ phím nhanh.
Câu 31: Trong hộp thoại Page Setup, nút lệnh có chức năng gì?
A. Thiết đặt hướng trang in ngang. B. Định dạng phông chữ.
C. Chèn dấu ngắt trang. D. Thiết đặt hướng trang in đứng.
Câu 32: Công cụ vẽ một đường thẳng đi qua một điểm và vuông góc với đường thẳng khác:
A. . B. . C. . D. .
Câu 33: Để sắp xếp danh sách dữ liệu giảm dần, em làm thế nào?
A. Nháy nút .
B. Nháy chọn 1 ô trong cột cần sắp xếp rồi nháy nút .
C. Nháy chọn 1 ô trong cột cần sắp xếp rồi nháy nút .
D. Nháy nút .
Câu 34: Trong Excel, bạn có thể cho dòng chữ trong một ô hiển thị theo kiểu gì ?
A. Theo chiều thẳng đứng.
B. Cả 3 kiểu trên ngang, đứng, nghiêng.
C. Theo chiều nằm ngang.
D. Theo chiều nghiêng.
Câu 35: Để tạo giao điểm của hai đường thẳng, ta sử dụng công cụ vẽ nào sau đây?
A. . B. . C. . D. .
Câu 36: Phần mềm Geogebra dùng để:
A. Quan sát và tra cứu bản đồ thế giới.
B. Luyện gõ phím nhanh.
C. Học toán đơn giản.
D. Vẽ hình học động.
Câu 37: Để làm phép toán (9/4 + 4/11)/(6/13-6/19), ta dùng lệnh:
A. plot. B. expand. C. solve. D. simplify.
Câu 38: Cách tạo biểu đồ nào sau đây đúng?
A. Nháy nút Chart Wizand/ chọn 1 ô trong miền dữ liệu.
B. chọn 1 ô trong miền dữ liệu.
C. Chọn 1 ô trong mi ền dữ liệu/ nháy nút Chart Wizand/chọn dạng biểu đồ/next/finish.
D. Nháy nút Chart Wizand.
Câu 39: Trong Microsoft Excel, câu lệnh =AVERAGE(5,6,8,9) có giá trị là:
A. 8. B. 7. C. 5. D. 6.
Câu 40: Ô A1 của trang tính có số 3.16, ô B1 có số 8.07, số trong ô C1 được định dạng là số nguyên. Nếu trong ô C1 có công thức =B1-A1, em sẽ nhận được kết quả trong ô đó là:
A. 3. B. 4. C. 4.91. D. 5.

#Hỏi cộng đồng OLM #Tin học lớp 12

1

DH

Đức Hải

23 tháng 4 2019

Giúp mk vs nha

Đúng(0)

NN

Ngô Ngọc Hoàng

VIP

29 tháng 8 - olm

<!DOCTYPE html><html><head> <title>CSS</title> <meta charset="utf-8"> <style> p{color: red;} h1, h2{color: blue;} </style></head><body> <h1>Heading 1 có màu xanh</h1> <h2>Heading 2 có màu xanh</h2> <p>Đoạn văn có màu...

Đọc tiếp

#Hỏi cộng đồng OLM #Tin học lớp 12

4

NQ

Nguyễn Quốc Đạt

CTVVIP

29 tháng 8

Kết quả của đoạn code, không biết bạn gặp vấn đề gì nhỉ?

Đúng(0)

TH

Trần Hoàng Trung

VIP

29 tháng 8

?

Đúng(0)

HN

Hoàng Ngọc Anh Thư

27 tháng 3 2021 - olm

Lớp 4B có 1818 bạn học sinh nam và số học sinh nữ bằng \dfrac{8}{9}98 số học sinh nam. Tính số học sinh nữ của lớp 4B. Giải:Số bạn học sinh nữ của lớp 4B là: 1818 \dfrac{8}{9}98 == (bạn) Đáp số: bạn.1620+2016×(Kéo thả hoặc click vào để...

Đọc tiếp

#Hỏi cộng đồng OLM #Tin học lớp 12

0

NT

Nông Tiến Hùng

16 tháng 9 - olm

olm có bao nhiêu cách để kiếm xu nhưng dễ

#Hỏi cộng đồng OLM #Tin học lớp 12

2

NT

Nguyễn Thị Thương Hoài

Giáo viên VIP

16 tháng 9

Olm chào em, với câu hỏi này olm xin hỗ trợ như sau: Khi em tham gia diễn đàn Olm, các em tích cực hỗ trợ các bạn trên diễn đàn hỏi đáp. Mỗi câu trả lời em sẽ được các bạn tích đúng và em được 1 sp. Và nếu câu trả lời của em chất lượng, trình bày khoa học, phù hợp với trình độ người hỏi em sẽ được ctv vip, amin, giáo viên tích đúng và em nhận được 1gp. Cuối tuần sẽ có bảng xếp hạng, căn cứ vào bảng xếp hạng Olm sẽ trao thưởng xu cho em. Em cũng có thể tham gia các cuộc thi vui, các sự kiện của Olm giành giải thưởng là xu hoặc coin, tham gia thi đấu.. Em có thể dùng xu để đổi quà trên Olm đó là bút, sổ, áo, mũ, thẻ cào điện thoại. Cảm ơn em đã đồng hành cùng olm.

Đúng(2)

NT

Nông Tiến Hùng

17 tháng 9

ok

Đúng(0)

HQ

Hoàng Quốc Huy

8 tháng 7 2017

program uptowin; uses crt; const dong=5; tocdo=1000; var memory:array[1..dong]of word; vt:shortint;thua,Qexit:boolean;x,y,z:word;{x,y,z la bien nhap} dem,key:byte;c:char; {_} function wall(a:word;b:byte):boolean; begin b:=16-b; if odd(a shr (b)) then wall:=true else wall:=false; end; {_} procedure vekhung(x1,y1,x2,y2:word); var z,a,b:word; begin if (x1<>x2) and (y1<>y2) then begin a:=wherex; b:=wherey; if x1>x2 then begin z:=x1; x1:=x2; x2:=z; end; if y1>y2 then begin z:=y1; y1:=y2; y2:=z; end; ...

Đọc tiếp

program uptowin;
uses crt;
const dong=5; tocdo=1000;
var
memory:array[1..dong]of word;
vt:shortint;thua,Qexit:boolean;x,y,z:word;{x,y,z la bien nhap}
dem,key:byte;c:char;
{_}
function wall(a:word;b:byte):boolean;
begin
b:=16-b;
if odd(a shr (b)) then wall:=true
else wall:=false;
end;
{_}
procedure vekhung(x1,y1,x2,y2:word);
var z,a,b:word;
begin
if (x1<>x2) and (y1<>y2) then
begin
a:=wherex; b:=wherey;
if x1>x2 then
begin z:=x1; x1:=x2; x2:=z; end;
if y1>y2 then
begin z:=y1; y1:=y2; y2:=z; end;
gotoxy(x1,y1); write(#201);
if x2-x1>1 then for z:=1 to x2-x1-1 do write(#205);
gotoxy(x2,y1); write(#187);
gotoxy(x1,y2); write(#200);
if x2-x1>1 then for z:=1 to x2-x1-1 do write(#205);
gotoxy(x2,y2); write(#188);
if y2-y1>1 then for z:=1 to y2-y1-1 do begin
gotoxy(x1,z+y1); write(#186); end;
if y2-y1>1 then for z:=1 to y2-y1-1 do begin
gotoxy(x2,z+y1); write(#186); end;
end;
gotoxy(a,b);
end;
function rand:word;
var a:word;b,c:byte;
begin
b:=random(14)+1;
for c:=1 to b do
a:=a+ 1 shl (c-1);
a:=a shl random(14);
rand:=not a;
if (a=0) or (not a=0) then a:=rand;
end;
{_}
procedure run(x:boolean);
var e:byte;
{\}
procedure traiphai(var a:word);
var d:boolean;
begin
if odd(dem+e) then
begin
if a>maxint then
begin d:=true;
a:=a-maxint-1; end
else d:=false;
a:=a shl 1;
if d then a:=a+1;
if (wall(memory[1],vt)) then
vt:=vt-1;
end
else
begin
if odd(a) then
begin a:=a-1;
d:=true; end
else d:=false;
a:=a shr 1;
if d then a:=a+maxint+1;
if (wall(memory[1],vt)) then
vt:=vt+1;
end;
end;
{/}
begin
for e:=1 to dong do
if x and odd(e) then
traiphai(memory[e])
else if not x and not odd(e)then
traiphai(memory[e]);
end;
{_}
procedure draw;
var x,y:byte;
{\}
procedure help;
begin
textcolor(white);
vekhung(51,5,70,22);
vekhung(8,5,25,22);
textcolor(yellow);
gotoxy(54,8);write(' W : Up');
gotoxy(54,11);write(' A : Left');
gotoxy(54,14);write(' D : Right');
gotoxy(54,17);write(' Space : Pause');
gotoxy(54,20);write(' Esc : Exit');
vekhung(54,7,58,9);
vekhung(54,10,58,12);
vekhung(54,13,58,15);
vekhung(54,16,62,18);
vekhung(54,19,60,21);
gotoxy(9,6); write('Go up each floor');
gotoxy(9,7); write(', you will add 1');
gotoxy(9,8); write('bonus. But must');
gotoxy(9,9); write('not passing wall');
gotoxy(11,10); write('Example:');
gotoxy(11,12); write('Can''t go up:');
gotoxy(12,13);write(#219#32#219#219#32#219);
gotoxy(12,14);write(#205#205#205#205#205#205);
gotoxy(12,15);write(' ',#15,' ');
gotoxy(12,17);write('Can go up:');
gotoxy(12,18);write(#219#32#219#219#32#219);
gotoxy(12,19);write(#205#205#205#205#205#205);
gotoxy(12,20);write(' ',#15,' ');
end;
{/}
begin
clrscr;
textcolor(white);
vekhung(20,1,60,3);
gotoxy(30,2); write('*** GO UP TO WIN! ***');
vekhung(28,5,47,22);
textcolor(yellow);
gotoxy(30,7);
writeln(#205#205#205#205#205#205#205#205,
#205#205#205#205#205#205#205#205);
for x:=dong downto 1 do
begin
gotoxy(30,8+(dong-x)*2);
for y:=1 to 16 do
if memory[x] shl (y-1)>maxint-1 then write(#219)
else write(' ');
writeln;
gotoxy(30,8+(dong-x)*2+1);
writeln(#205#205#205,
#205#205#205#205#205#205#205,
#205#205#205#205#205#205);
end;
help;
gotoxy(30,20); write('Lines:',dem,' Key:',key,'/50');
gotoxy(vt+29,16); write(#15);
end;
procedure pause;
begin
clrscr;
vekhung(15,10,65,15);
gotoxy(18,13);
write(' Paused! Press any key to continue...');
readkey;
end;
procedure thuchon;
begin{+3}
c:=readkey;
case upcase(c) of{+4}
'D':if not wall(memory[1],vt+1) then vt:=vt+1;
'A':if not wall(memory[1],vt-1) then vt:=vt-1;
'W':if not wall(memory[2],vt) then begin{+5}
dem:=dem+1;
for z:= 1 to dong-1 do
memory[z]:=memory[z+1];
memory[dong]:=rand;
end;{-5}
' ': pause;
#27:begin
qexit:=true;
thua:=true;
end;
end;{-4}
if upcase(c) in['D','A','W'] then
begin key:=key+1; draw; end;
if key=50 then thua:=true;
end;{-3}

{____Main Program____}
begin
textbackground(blue); textcolor(yellow); clrscr;
randomize;
vekhung(15,10,65,15);
gotoxy(18,13);
write('Press any key to continue...');
repeat x:=random(1); until keypressed;
window(1,1,80,25);
repeat
key:=0;thua:=false;Qexit:=false;
vt:=8;x:=0;clrscr;
for x:=2 to dong do
memory[x]:=rand;
repeat{+0}
draw;
for x:=0 to 1000 do
begin{+1}
if x=0 then
run(true);
if x=500 then
run(false);
for y:=0 to tocdo do
begin{+2}
if keypressed then
thuchon;
if not (vt in[1..16]) then
begin thua:=true; break; end;
end;{-2}
end;{-1}
until thua;
gotoxy(1,4);
for x:= 1 to 80*21 do
begin write(' ');
for y:=1 to 1000 do
for z:=1 to 600 do; end;
textcolor(white);
vekhung(15,11,65,15);
gotoxy(30,11); write(' Infomation ');
textcolor(yellow);
gotoxy(19,12); write('Score: ',dem);
if not qexit then
write(' You are lost!');
gotoxy(19,13); write('Press Enter or Esc to quit!');
gotoxy(19,14); write('Press Space to replay!');
repeat c:=readkey; until c in [#27,#13,#32];
until c in [#27,#13];
end.

Trên là một chương trình game mình soạn trên Free Pascal nhưng không được. Lỗi thì không có rồi. Khi ấn Ctrl+F9 thì có dòng chữ "Press any key to continue", ấn xong thì bị thoát và có dòng chữ mới: "Program.... exited with exitcode = 201".

Ai phát hiện và tìm ra cách sửa lỗi thì báo mình nhé!!!

#Hỏi cộng đồng OLM #Tin học lớp 12

0

🎮 Bạn đang hỏi về:

⚠️ Lưu ý quan trọng trước:

✅ Giải thích những phần hợp lệ:

1. 🔤 Ngôn ngữ "ne@omga247ve" là gì?

2. 📋 Bảng cập nhật trong Minecraft là gì?

3. ✅ Nếu bạn muốn biết các lệnh đặc biệt trong Minecraft:

🧭 Kết luận:

Chúng tôi đề xuất

Tài nguyên

Ứng dụng mobile

🎮 Bạn đang hỏi về:

⚠️ Lưu ý quan trọng trước:

✅ Giải thích những phần hợp lệ:

1. 🔤 Ngôn ngữ "ne@omga247ve" là gì?

2. 📋 Bảng cập nhật trong Minecraft là gì?

3. ✅ Nếu bạn muốn biết các lệnh đặc biệt trong Minecraft:

🧭 Kết luận:

Bảng xếp hạng

Các khóa học có thể bạn quan tâm

Yêu cầu VIP