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 MN
Cho 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
a)
Input: Dãy n số nguyên
Output: Đếm xem trong dãy đó có bao nhiêu số nguyên dương
b)
Bước 1: Nhập n và nhập dãy số
Bước 2: dem←0; i←1;
Bước 3: Nếu a[i]>0 thì dem←dem+1;
Bước 4: i←i+1;
Bước 5: Nếu i<=n thì quay lại bước 3
Bước 6: Xuất dem
Bước 7: Kết thúc
Input: Số nguyên N và dãy a1,a2,...,aN
Output: Số số nguyên có trong dãy
Thuật toán:
- Bước 1: Nhập N và dãy a1,a2,...,aN
- Bước 2: d←0; i←1;
- Bước 3: Nếu i>N thì in ra có d số dương trong dãy và kết thúc
- Bước 4: Nếu ai > 0 thì d←d+1;
- Bước 5: i←i+1, quay lại bước 3
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
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
Đề đầy đủ không bạn chứ mình k thấy chương trình ở câu hỏi
Hãy viết chương trình tính tổng 50 số nguyên đầu tiên (n số nguyên, nhập từ bàn phím) dựa vào thuật toán sau: THUẬT TOÁN: B1: đặt tổng s
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
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
