cho biết giá trị S bằng bao nhiêu và số lần lặp khi thực hiện thuật toán sau?
B1: S:=5, x:=1.
B2:nếu S >=12, chuyển qua B4
B3: S:=S+x; x:=x+1 và quay lai bước 2;
B4: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 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.
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.
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.
Thuật toán sẽ chạy 5 vòng lặp
Kết thúc thì S=0
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? 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.
Giúp mình với ;-;
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.
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.
Câu 4: 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? Viết chương trình bằng Pascal để mô tả thuật toán đó.
B1: S ß0, n ß 2;
B2: Nếu S≥5, chuyển B3 và ngược lại chuyển B4.
B3: S ßS + n và quay lại B2.
B4: Thông báo S và kết thúc thuật toán.
Câu 1: Cho biết S=?, i=?, sau khi thực hiện các lệnh sau:
a/ B1: S0; i←1;
B2: Nếu S>10 thì chuyển B4
B3: S←S*i; i←i+ 2, 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 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.
Máy tính sẽ thực hiện 5 vòng lặp
Khi kết thúc, S=0
em hãy cho biết thuật toán máy tính thực hiện bn vòng lặp? kết thúc của S bằng bn ? viết chương trình bằng pascal để mô tả thuật toán
B1:S<-20,N<-1,
B2:nếu S<HOẶC =6 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
mn chỉ em với e cần gấp ạ
*Chương trình
Program nnn;
Uses crt;
Var S, N:real;
Begin
Write ('Nhap N');
Readln (N);
S:=20;
N:=1
If (S>=6) then N:=N+1 and S:=-S-N else write ('Ket qua S',S);
Readln;
End.
uses crt;
var s,n:integer;
begin
clrscr;
s:=20;
n:=1;
while s>6 do
begin
n:=n+1;
s:=s-n;
end;
writeln(s);
readln;
end.
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 đó
B1: S←10, x←2
B2: Nếu S ≤ 5,2 chuyển tới bước 4
B3: S←S-x và quay lại bước 2
B4: thông báo kết quả và kết thúc thuật toán