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.

D
datcoder
Giáo viên
14 tháng 10 2023

- Học sinh tự thực hiện tạo chương trình như sau và tiến hành kiểm thử.

- Gỡ lỗi: Chuyển lệnh gán giá trị ban đầu S = 0 ra khỏi điều kiện lặp.


loading...
D
datcoder
Giáo viên
14 tháng 10 2023

- Học sinh tự tạo chương trình theo Hình 2.

- Chương trình đưa ra kết quả sai khi giá trị a, b bằng nhau.

- Gỡ lỗi: Thay đổi đoạn chương trình so sánh hai số a, b với 3 trường hợp như sau

loading...

D
datcoder
Giáo viên
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.

D
datcoder
Giáo viên
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
Giáo viên
14 tháng 10 2023

a) Học sinh tự thực hiện tạo chương trình như Hình 4.

b) Chạy thử với bộ dữ liệu thử: a = 0, b = 2 và a = 0, b = 0.

c) Gỡ lỗi:

loading...

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

16 tháng 11 2021

Test 1: 

a=2; b=4

=>-2

Test 2: 

a=0; b=0;

=>Vô số nghiệm

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

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

*Viết chương trình nhập 10 số nguyên từ bàn phím. In ra màn hình dãy số vừa nhập

uses crt;

var a:array[1..10]of integer;

i:integer;

begin

clrscr;

for i:=1 to 10 do

begin

write('A[',i,']='); readln(a[i]);

end;

for i:=1 to 10 do 

  write(a[i]:4);

readln;

end.

*Viết chương trình nhập 10 số nguyên từ bàn phím .in ra các số lẻ

uses crt;

var a:array[1..10]of integer;

i:integer;

begin

clrscr;

for i:=1 to 10 do

begin

write('A[',i,']='); readln(a[i]);

end;

for i:=1 to 10 do 

  if a[i] mod 2<>0 then write(a[i]:4);

readln;

end.