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.
a) Thừa dấu hai chấm trong điều kiện;
b) Thiếu dấu hai chấm trong câu lệnh gán;
c) Thiếu các từ khóa begin và end trước và sau các lệnh n:=n+1; S:=S+n, do đó vòng lặp trở thành vô tận.
a) X:= 5(;) while X <= 5(;) do X:= X + 5;
----> lỗi sai: Thừa 2 dấu ';' ở sau while và ở sau do (lỗi sai trong ngoặc)
----> sửa lại :X:= 5 while X <= 5 do X:= X + 5;
b) X= 10; while X = 10 do X:= X + 5;
----> lỗi sai : Sai lệnh gán X=10.
----> sửa lại : X:= 10; while X = 10 do X:= X + 5;
c) S:= 0; n:=0; while S <= 10 do S:=S + n ; n:=n+1;
Về cấu trúc không sai nhưng để như vậy sẽ thành vòng lặp vô hạn.
----> lỗi sai : thiếu begin ... end; ở sau câu lệnh lặp
----> sửa lại : S:= 0; n:=0; while S <= 10 do begin S:=S + n ; n:=n+1; end;
a) Ta có: 10 < x < 99
=> x \(\in\){11; 12; 13; 14; .....; 98}
=> A = {11; 12; 13; 14; ...; 98}
b) Ta có : x \(⋮\)4 => x \(\in\)B(4) = {0; 4; 8; 12; 16; ....;96}
Do 0 < x < 100 => x \(\in\){4; 8; 12; 16; ....; 96}
=> B = {4; 8; 12; 16; ...; 96}
c) Ta có: x + 5 = 10 => x = 10 - 5 = 5
=> C = {5}
d) Ta có: 2x + 5 = 17
=> 2x = 17 - 5
=> 2x = 12
=> x = 12 : 2 = 6
=> D = {6}
bài 1
var i,n,S:longint;
begin
writeln('n=');
readln(n);
S:=0;
i:=0;
for i:=1 to n do
S:=S+n;
writeln('S=',S);
readln
end.
3
a) s:= 0 while X:=10 \(\rightarrow\) X<= 10
b) thiếu câu lệnh
c) n:=1
0={11;12;13;14;15;16;17;18;19;20}
11={8;9;10;30}
10={0;1;2;3;4;5}