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 hoặc = 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 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: Thuật toán sẽ thực hiện 5 vòng lặp
Kết thúc thì S=0
b: uses crt;
var i,s,n:integer;
begin
clrscr;
s:=20;
n:=1;
while (s>=5) do
begin
n:=n+1;
s:=s-n;
end;
writeln(s);
readln;
end.
a. Thuật toán 1 :
Máy tính sẽ thực hiện 10 vòng lặp , khi kết thúc thuật toán giá trị của S = 5.0
Đoạn chương trình Pascal tương ứng:
Quảng cáo
S := 10; x := 0.5;
While S > 5.2 do
S := S – x;
Writeln(S);
b. Thuật toán 2 :
Máy tính sẽ không thực hiện vòng lặp nào do điều kiện không thỏa mãn, khi kết thúc thuật toán giá trị của S = 10
Đoạn chương trình Pascal tương ứng:
S := 10; n := 0;
While S < 10 do
Begin
n := n + 3;
S := S – n
End;
Writeln(S);
uses crt;
var s,n:integer;
begin
clrscr;
s:=20;
n:=1;
while s>=5 do
begin
n:=n+1;
s:=s-n;
end;
writeln(s);
readln;
end.