Câu 2: Đoạn chương trình sau có một vài lỗi sai, em hãy sủa lại cho đúng?
S:=0;n:=0;
while s<=10 do
n:=n+1;
s:=s+n;
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.
Mới câu trong đoạn văn sau có một lối sai em hãy tìm và chứa lại cho đúng. Gạch chân lỗi sai đó và viết phần chữa lại vào chỗ trống (10 đ) Vi du 0. He are a doctor.
1. Phong's school is the smallest than->in our school
. 2. How many->much milk would you like?
3. We are pollute->polluting the land, the rivers and the oceans.
4. Is->Are there any eggs in the fridge?
5. She needs some coffee and a little->few biscuits.
bạn ghi xuống dòng được ko chứ bạn ghi thế này mình chả hiểu gì cả
Program Tinhoc | Program Tinhoc; |
Var i,n,S:real | Var i,n,S:real |
Begin | Begin |
Write(nhap so); | Write("nhap so"); |
readln(n); | readln(n); |
i=1; | i:=1; |
while i<n | while i<n do |
begin | begin |
s:=s+i | s:=s+i; |
i:=i+1 | i:=i+1; |
end; | end; |
write('Ket qua la: ' S); | write('Ket qua la: ' ,S); |
readln; | readln; |
end | end. |
uses crt;
var n,i,t:integer;
begin
clrscr;
readln(n);
t:=0;
for i:=1 to n do t:=t+i;
writeln(t);
readln;
end.
Program câu 1;
Var n: Integer; s:real;
Begin
Writeln(‘ Nhap gia tri n=’); Readln(n);
S:=0;
While n<0 do
begin
s:=s+n/2; n:=n-1;
end;
write(‘tong s = ‘, s:8:2);
Readln;
End.
Lỗi sai:
Program câu 1; -> Tên chương trình không chứa dấu cách trắng.
-> Sửa: Program cau_1;
Writeln(‘ Nhap gia tri n=’); Readln; -> Nhập giá trị cho n nhưng thiếu lệnh đọc n
-> Sửa:
Writeln(‘ Nhap gia tri n=’); Readln(n);
While n >0 do
s:=s+n/2; n:=n-1;
Cả 2 câu lệnh s:=s+n/2; n:=n-1; đều nằm trong vòng lặp while..do nên cần begin...end con.
-> Sửa
While n >0 do
begin
s:=s+n/2; n:=n-1;
end;
NameError: name 'S' is not defined Câu 4
SyntaxError: expected ':' Câu 2
A=[3,-9,1,-4,15,7]
S=0
for i in range(len(A)):
if A[i]%2!=0 :
S=S+A[i]
print(S)
a) uses crt;
b) var dt, r: real;
c) Thiếu readln(r);
d) dt:= pi*sqr(r);
Lỗi 1: Dòng uses : crt; - Lỗi cú pháp do dấu hai chấm : không cần thiết. Sửa lại thành uses crt;.
Lỗi 2: Dòng var dt, r = real; - Lỗi khai báo biến không đúng cú pháp. Sửa lại thành var dt, r: real;.
Lỗi 3: Dòng clrscr; - Lỗi cú pháp do sử dụng hàm clrscr trong môi trường không hỗ trợ. Nếu muốn xóa màn hình, có thể sử dụng clrscr trong IDE hoặc xóa dòng này nếu không cần thiết.
Lỗi 4: Dòng writeln('Dien tich hinh tron co ban kinh ', r:0:2, ' la: ', dt:0:2); - Lỗi cú pháp do sử dụng sai định dạng khi in giá trị. Sửa lại thành writeln('Dien tich hinh tron co ban kinh ', r:0:2, ' la: ', dt:0:2:2); để in diện tích với đúng định dạng số thập phân.
Sửa:
S:=0;n:=0;
while s<=10 do
Begin
n:=n+1;
s:=s+n;
End;