Có thể thay thế câu lệnh for...do cho while...do và ngược lại được không? Nêu ví dụ minh hoạ
Bài 10: Cấu trúc lặp
không vì for do có giới hạn
còn while do thì không
Đúng 0
Bình luận (0)
Không được , bạn nên viết đúng cấu trúc của từng câu lệnh chứ không được thay thế bởi vì máy tính đã được cài đặt sẵn như thế mà bạn
Đúng 1
Bình luận (0)
Xem thêm câu trả lời
Trong Device Manager có thể nhận biết các thiết bị chưa cài đặt Driver tai mục:
a. Monitors
b. Other Devices
c. System Devices
d. Computer
cac ban choi hoi cai de thi hoc ki 1 mon tin de khong vay
viết câu lệnh tính tổng các số nguyên trong phạm vi từ M dến N
s:=0
for i:=m to n do
if i mod 1<>0 then
s:=s+i
Đúng 0
Bình luận (0)
uses crt;
var m,n,i,t:integer;
begin
clrscr;
write('m='); readln(m);
write('n='); readln(n);
t:=0;
if m>n then
begin
for i:=m to n do
t:=t+i;
end;
writeln(t);
readln;
end.
Đúng 0
Bình luận (0)
bài 1 : viết chương trình tìm các số trong khoảng từ 0 >999 bằng tổng lập phương các chữ số của nó
vd: 153=1^3+5^3+3^3
program bai1;
var so,a,b,c:integer;
begin
so:= a*100+b*10+c;
for a:=0 to 9 do
for b:=0 to 9 do
for c:=0 to 9 do
if a*a*a+b*b*b+c*c*c=so then write(so,' ');
readln;
end.
Đúng 1
Bình luận (0)
bài này là bài số amstrong nè (số amstrong là số tự nhiên có 3 chữ số và bằng tổng lập phương các chữ số của nó)
uses crt;
var a,x,dv,ch,tr,lp:integer;
begin
clrscr;
for a:=0 to 999 do
begin
x:=a;
dv:=a mod 10;
ch:=a div 10; ch:=ch mod 10;
tr:=a div 100;
lp:=(dv*dv*dv)+(ch*ch*ch)+(tr*tr*tr);;
if lp=x then write(x,' ');
end;
readln;
end.
Đúng 1
Bình luận (0)
trong cửa hàng có các loại sơn : 16kg ,17kg,21kg. 1 người khách cần mua 185kg sơn.viết chương trình tính và cho biết cần bán cho người khách bao nhiêu thùng mỗi loại (bao nhiêu thùng 16kg,17kg,21kg) để không phải bàn lẻ thùng nào
giúp mình cái ,giáo viên bảo sử dụng câu lệnh lặp for..to..do(chắc là loại câu lệnh lặp for to do lồng nha :v)
program bai1;
var n,l1,l2,l3:longint;
begin
n:=185;
l1:=n div 21;
n:=n-l1*21;
l2:=n div 17;
n:=n-l2*17;
l3:=n div 16;
write('So thung loai 21kg la ',l1);
write('So thung loai 17kg la ',l2);
write('So thung loai 16kg la ',l3);
readln
end.
Đúng 1
Bình luận (0)
ở trong sbt tin 8 chỗ lệnh lặp biết trước ấy bạn:)))
Đúng 0
Bình luận (0)
ai giúp mk bài này đi ' in ra số từ 1 tới N (N là số nguyên nhập từ bàn phím)
nhập n và khai báo thì bạn có thể làm được mà phải không, mk chỉ gợi ý câu lệnh thoi nhé:
for i:=1 to n do write(i,';');
chúc bạn học tốt
Đúng 0
Bình luận (0)
Chương trình sau thực hiện công việc gì ?kết quả vủa trương trình đó?
Var S,i : integer
Begin
A:=0
For i:=3 to 10 đó
S:=S*i;
Write('S=',S:3);
End.
chương trình sai rồi nhé bạn
Đúng 0
Bình luận (0)
Lập trình từ bàn phím ba ố nguyên a,b,c (0<=a,b,c<=10^6). Tính và đưa ra màn hình bình phương các số không âm và lập phương của các số âm.(trong c++ )
viết chương trình nhập số nguyên n,k
đếm và chọn ra các số cho k
sử dụng cú pháp: for,to,do
ai dúp mình với
