Hãy xác định số vòng quay của các vòng lặp sau sau khi vòng lặp dừng lại thì giá trị của T=?
T:=1;
while T<=1 do T:=T-2;
T:=0
for i:=1 to 5 do T:=T+2
Bài 1:
Trong các câu lệnh Pascal sau đây, câu lệnh nào đúng, câu lệnh nào sai. Em hãy khoanh tròn vào chỗ sai.
a) While i=1 do t:=10;
b) while a<=b; do write('b khong nho hon a');
c) while 1=1 do write('Toi lap trinh gioi');
d) i:=1; while i<10 do sum:=sum+1; i:=i+1;
e) i:=1; x:=5;
while i<x do i:= i+1; write(' Gia tri cua i la',i);
Bài 2: Tìm hiểu đoạn chương trình sau và cho biết kết quả của i, j, k sau khi thực hiện đoạn chương trình là bao nhiêu
Đoạn 1:
i:=1; j:=2; k:=3;
while i<6 do i:= i+1; j:= j+1; k:= k+j;
writeln(i,' ',j,' ',k);
Đoạn 2:
i:=1; j:=2; k:=3;
while i<6 do
begin
i:= i+1; j:= j+1; k:= k+j;
writeln(i,' ',j,' ',k);
end;
Sau đoạn chương trình J=?
a) J:=5; k:=7; T:=10
for i:=1 to 4 do
Begin
k: = K+5
T:= T+i
J:= K+T;
END;
b) J:=10;For i:=1to4do j:=J+i
giúp em với ạ
em cảm ơn*cuối đầu cảm ơn*
Viết chương trình tính tổng T = 1 + \(\dfrac{1}{2}+\dfrac{1}{3}+......+\dfrac{1}{100}\)
( có thể sử dụng while...do , for...do )
Tìm ra chỗ sai:
a)For i:=10 to 1 do x:=x+1
b)For i:=1 to 5,5 do x:=x+1
c)Var i: real
Begin for i:=1 to n do x:=x+1 end;
Tính S = 2/3 + 3/4 + 4/5 +..+49/50. Dùng For..do và While..do
