cho thuật toán sau:
B1: J:=0 ; T:=100
B2: T<30 chuyển xuống b4
b3: J:=T+5 ; T:=T-J
B4: kết thúc vòng lặp
Có bao nhiêu vòng lặp ? Sau khi kết thúc J và T bằng bao nhiêu?
cho thuật toán sau
-B1 t :=0;j :=1 -B2 nếu t lớn hơn hoặc bằng 30 thì chuyển qua B 3, ngược lại t>30 thì chuyển qua B 4-B3 :j :=j+2 ; t:t=j; và quay lại B2 -B4 in ra kết quả và kết thúc thuật toán a: Hãy cho biết, khi thực hiện thuật toán trên, máy tính sẽ thực hiện bao nhiêu vòng lặp và giá trị của t và j là bao nhiêu b: Viết chương trình sử dụng câu lệnh lặp chưa biết trước thể hiện thuật toán trên. GIÚP GIÙM ĐI MNCho thuật toán sau:
B1: j<-0, T<-105
B2: Nếu T<20 thì qua bước 4
B3: j<- j+5; T<-j
B4: In ra kết quả T và j
Hãy 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 và giá trị của T và j là bao nhiêu?
HELP ME!!!!!!!!!!!!!!!!!!!! SẮP THI HKII TIN R :((
B1 : j : =0
T :=105
While T>= 20 do begin j := j + 5 T :=T - j ; end;
Write \((T)\); write\((j)\)
Bài thuật toán kiểu j vậy??
Mk thấy đây là môn Tin học mà
Chúc bạn học tốt~
Giải chi tiết hộ mik với Huỳnh Quang Sang
Cho thuật toán sau đây
B1: S<- 0, n <- 3
B2: nếu S>= 6 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
Viết chương trình bằng pascal
Cho thuật toán sau đây
B1: S<- 0, n <- 3
B2: nếu S>= 6 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
Viết chương trình bằng pascal
Cho thuật toán sau:
- B1: A :=0;b :=1;
- B2: Nếu A≤ 30 thì chuyển qua B3, ngược lại A > 30 thì chuyển B4;
- B3:i :=b+2 ; A:=A+b; và quay lại B2
- B4: In ra kết quả và kết thúc thuật toán
Program Bai9;
Uses CRT;
Var A,b:integer;
Begin
A:= 0, J:=1;
While A<= 30 do
Begin i := b +2;A := A + b;End;
Writeln(A);
Readln;
End.
a) Hãy cho biết, khi thực hiện thuật toán trên, máy tính sẽ thực hiện bao nhiêu vòng lặp và giá trị của T và j là bao nhiêu (1,0 điểm)
b) Viết chương trình sử dụng câu lệnh lặp chưa biết trước thể hiện thuật toán trên.
a: Thực hiện 5 vòng lặp
T=35
j=11
b: Câu lệnh chưa biết trước là while-do, và chương trình của bạn chỉ cần sửa lại chỗ j:=1 thành b:=1 mà thôi
Giải giúp em vs sắp thi hk r`
1) Cho 2 thuật toán sau
THUẬT TOÁN 1 : B1 : j <-0 ; T<-20;
B2 : Nếu T<6 thì chuyển qua B4 ;
B3 : j<-j+2 ; T<-T-j ;
B4 : In ra kết quả j và T ;
THUẬT TOÁN 2 : B1 : j<-0 ; T<-10;
B2 : Nếu T>10 thì chuyển qua B4 ;
B3 : j<- j+3 ; T<-T+j
B4 : In ra kết quả T và j
a) Hãy cho biết khi thực hiện 2 thuật toán trên máy tính sẽ thực hiện bao nhiêu vòng lập . Tính giá trị T và j ở mỗi thuật toán
b)Viết 2 chương trình thể hiện 2 thuật toán trên
a) Thuật toán 1 : Máy tính sẽ thực hiện 4 vòng lặp, j=8, T=0.
Thuật toán 2 : Máy tính sẽ thực hiện 1 vòng lặp, j=3, T=13.
b) Viết chương trình thể hiện thuật toán 1.
Program tính_toán;
Var j,T : integer;
begin
j:=0; T:=20;
While T >= 6 do
begin j:=j+2;
T:=T-j end;
Writeln ('Kết quả của j là :', j);
Writeln ('Kết quả của T là :', T);
readln
end.
Program tính_toán;
Var j,T : integer;
begin
j:=0; T:=20;
While T >= 6 do
begin j:=j+2;
T:=T-j end;
Writeln ('Kết quả của j là :', j);
Writeln ('Kết quả của T là :', T);
readln
end.
Viết chương trình thể hiện thuật toán 2.
Program tính_toán;
Var j,T : real;
begin
j:=0; T:=10;
While T <= 10 do
begin j:=j+3;
T:=T+j end;
Writeln ('Kết quả của j là :', j);
Writeln ('Kết quả của T là :', T);
readln
end.
a) Thuật toán 1 : Máy tính sẽ thực hiện 4 vòng lặp, j=8, T=0.
Thuật toán 2 : Máy tính sẽ thực hiện 1 vòng lặp, j=3, T=13.
b) Viết chương trình thể hiện thuật toán 1.
Program tính_toán;
Var j,T : integer;
begin
j:=0; T:=20;
While T >= 6 do
begin j:=j+2;
T:=T-j end;
Writeln ('Kết quả của j là :', j);
Writeln ('Kết quả của T là :', T);
readln
end.
Viết chương trình thể hiện thuật toán 2.
Program tính_toán;
Var j,T : real;
begin
j:=0; T:=10;
While T <= 10 do
begin j:=j+3;
T:=T+j end;
Writeln ('Kết quả của j là :', j);
Writeln ('Kết quả của T là :', T);
readln
end.
Cho thuật toán sau B1:j ‹– 0 ;T ‹– 20. B2 Nếu T ‹– 6 khi chuyển qua B4. B3 j ‹– j+2 ; T ‹– T - j; B4 in ra kết quả T và j ; Hãy cho biết khi thực hiện thuật toán trên máy tính sẽ thực hiện bao nhiêu vòng lặp giá trị của T và j là bao nhiêu
B2 ko rõ ràng nha bạn, nếu bạn ghi như z nghĩa là biến t nhận giá trị là 6 mất rùi...
Mk viế tnhầm từ khi sửa lại thành thì nha giúp mk ik
cho thuật toán sau:
b1: j<- 0; T<-100;
b2:nếu T<30 thì chuyển qua B4;
b3:j<- j+5; T<- T - j;
b4:in ra kết quả T và j;
a) hãy cho biết, khi thực hiện thuật toán trên, máy tính sẽ thực hiện bao nhiêu vòng lặp và giá trị của T và J là bao nhiêu
b)Sử dụng câu lệnh lặp while...do viết đoạn chương trình thể hiện thuật toán trên.
Hãy tìm hiểu thuật toán sau đây và cho biết khi thực hiện máy tính sẽ thực hiện bao nhiêu vòng lặp? Khi kết thúc S bằng bao nhiêu? Viết chương trình pascal thể hiện thuật toán đó B1: S