K
Khách

Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.

26 tháng 6

Khi nháy chuột vào nút lệnh Go loading... , chương trình ở Hình 1 không hoạt động vì lệnh loading... không được ghép nối với khối lệnh ở phía dưới.

D
datcoder
CTVVIP
14 tháng 10 2023

Chương trình 1 có lỗi cú pháp, câu lệnh 2, 3 không khớp nối với câu lệnh 1, 4.

Chương trình 2 có lỗi logic, a = b thuộc trường hợp a > b sai nên chương trình đưa ra thông báo sai khi nhập hai số a, b bằng nhau.

D
datcoder
CTVVIP
14 tháng 10 2023

Theo em khi thực hiện chương trình này không ra kết quả như mong muốn vì khi khởi tạo giá trị ban đầu cho biến S là 0 trong điều kiện lặp khiến cho giá trị của S trở lại thành 0 sau mỗi lần lặp. Điều này dẫn đến kết quả sai.

26 tháng 11 2023

Trình tự: A-B-C

26 tháng 11 2023

Nhân vật Mèo trên sân khấu hoạt động di chuyển 10 bước và nói "Xin chào" trong 2 giây.

Không thể ghép thêm lệnh trước lệnh .

QT
Quoc Tran Anh Le
Giáo viên
18 tháng 11 2023

13 tháng 9 2023

Trong chương trình này, ta sử dụng các biến quangduong và thoigian để lưu trữ giá trị quãng đường và thời gian. Bằng cách sử dụng khối ask and wait và set, người dùng sẽ được hỏi để nhập giá trị quãng đường và thời gian. Sau đó, chương trình sử dụng khối set và toán tử / để tính toán giá trị vận tốc và lưu vào biến speed. Cuối cùng, chương trình sử dụng khối say để hiển thị giá trị vận tốc lên màn hình.

Để chạy chương trình, ta có thể nhấn vào biểu tượng mũi tên xanh để bắt đầu chương trình. Sau đó, nhập giá trị của quãng đường và thời gian theo yêu cầu của chương trình và chờ đợi cho kết quả. Khi chương trình tính toán xong, giá trị vận tốc sẽ được hiển thị lên màn hình.

QT
Quoc Tran Anh Le
Giáo viên
18 tháng 11 2023

Tạo chương trình như sau:

D
datcoder
CTVVIP
14 tháng 10 2023

a) HS tự tạo chương trình như hình 1.

b) Chương trình tính tiền vé xem phim trong thời gian khuyến mãi ở Bảng 1

loading...

c) Chương trình tính tiền vé xem phim theo Bảng 4

loading...

uses crt;

var i,n,kt:integer;

begin

clrscr;

readln(n);

kt:=0;

for i=2 to trunc(sqrt(n)) do 

 if n mod i=0 then kt:=1;

if (kt=0) and (n>1) then write('phai')

else write('Khong phai');

readln;

end.

14 tháng 5 2022

Var i,n,souoc:integer;

Begin

While n <= 1 do

Begin

Write('Nhap n = ');readln(n);

End;

For i:=1 to n do

If n mod i = 0 then souoc:=souoc+1;

If souoc = 2 then write(n,' la so nguyen to')

Else write(n,' khong la so nguyen to');

Readln;

End.

D
datcoder
CTVVIP
14 tháng 10 2023

loading...

STT

Bán kính r

Chu vi hình tròn

Diện tích hình tròn

1

1

6.28

3.14

2

5

31.4

78.5

3

6.5

40.82

132.665