Bài tập 5. Hãy tìm hiểu thuật toán sau đây và cho biết khi thực hiện thuật toán máy tính sẽ thực hiện bao nhiêu vòng lặp ? Khi kết thúc, giá trị của S bằng bao nhiêu ? Viết chương trình pascal thể hiện thuật toán đó:
Bước 1: S:=0; i:=1;
Bước 2: Nếu S >= 5 thì chuyển tới bước 4
Bước 3: S:=S + i và quay lại bước 2
Bước 4: Thông báo S và kết thúc thuật toán.
Hãy tìm hiểu thuật toán sau đây, và cho biết khi thực hiện thuật toán, máy tính sẽ thực hiện bao nhiêu vòng lặp? Khi kết thúc, giá trị của S bằng bao nhiêu? Viết chương trình Pascal thể hiện các thuật toán đó?
a,Thuật toán 1
Bước 1: S:=10, X:=0.5.
Bước 2: Nếu S<=6.2, chuyển tới bước 4.
Bước 3: S:=S – X và quay lại bước 2.
Bước 4: Thông báo S và kết thúc thuật toán.
b,Thuật toán 2
B1: s:=10, n:=0
B2: nếu S >=10, chuyển tới bước 4
B3: n:=+3, s:= s-n và quay lại bước 2
B4: Thông báo S và KTTT
Hãy tìm hiểu thuật toán sau đây, và cho biết khi thực hiện thuật toán, máy tính sẽ thực hiện bao nhiêu vòng lặp? Khi kết thúc, giá trị của S bằng bao nhiêu?
Bước 1: S<-25, X<-5.
Bước 2: Nếu S>=5, chuyển tới bước 3 ngược lại chuyển sang bước 4
Bước 3: S<-S – X và quay lại bước 2.
Bước 4: Thông báo S và kết thúc thuật toán.
a/. Em hãy cho biết thuật toán máy tính sẽ thực hiện bao nhiêu vòng lặp? Kết thúc giá trị của S bằng bao nhiêu? b/. Viết chương trình bằng Pascal để mô tả thuật toán đó. B1: S ← 20, n←1; B2: Nếu S ≥ 5, chuyển B4. B3: n ←N + 1, S ← S - n và quay lại B2. B4: Thông báo S và kết thúc thuật toán.
Hãy tìm hiểu đoạn lệnh sau đây và cho biết với đoạn lệnh đó chương trình thực hiện bao nhiêu vòng lặp và khi kết thúc giá trị của S bằng bao nhiêu ?
S := 0; n :=1
While S <= 18 do
Begin n := n +3; S := S + n; end;
a/. Em hãy cho biết thuật toán máy tính sẽ thực hiện bao nhiêu vòng lặp? Kết thúc giá trị của S bằng bao nhiêu?
b/. Viết chương trình bằng Pascal để mô tả thuật toán đó.
B1: S ! 20, n! 1;
B2: Nếu S ≥ 5, chuyển B4.
B3: n ! N + 1, S ! S - n và quay lại B2.
B4: Thông báo S và kết thúc thuật toán.
Cho đoạn chương trình sau: s := 0; i := 1 while s <= 10 do begin i := i + 1; s := s + i; end; Cho biết câu lệnh while dừng khi s bằng bao nhiêu?
hãy tìm hiểu đoạn lệnh sau đây và chi biết với đoạn lệnh đó chương trình thực hiện bao nhiêu vòng lặp và khi kết thúc giá trị của S là bao nhiêu
S:=0 , n:=0
while S<=10+o
begin:=n+1,S:=S+n
end.
Câu 1: Sau khi thực hiện chưng trình pascal sau đây, biến S có giá trị là bao nhiêu ? Var x : integer;
Begin
S:=0
For i:=1 to 10 do
If ( i mod 2) = 0 then S:=S+i;
Readln;
End
A.10 B. 20 C. 30 D. 40
Câu 2: Khi thực hiện đoạn chương trình sau, kết quả trên màn hình là:
So:=1;
While so<10 do Begin
Write (so : %);
So:= So +2;
End.