K
Khách

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.

29 tháng 12 2016

T=40

i=20

30 tháng 4 2019

T <-- 20; i <-- 0;

i ĐK(i<20) Vòng lặp T
5 Đ 1 25
10 Đ 2 35
15 Đ 3 50
20 S Kết thúc

Vậy T = 50, i = 20

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...
Đọc tiếp

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.

1

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

22 tháng 3 2022

trả lời giúp mình đi mngoi

 

2 tháng 5 2023

a) 5 vòng lặp

giá trị T và i :

Bước 1: i:=0, T:=105

Bước 2: 105 >= 20, tiếp tục với bước 3

Bước 3: i:=i+5=5, T:=105-5=100

Bước 2: 100 >= 20, tiếp tục với bước 3

Bước 3: i:=i+5=10, T:=100-10=90

Bước 2: 90 >= 20, tiếp tục với bước 3

Bước 3: i:=i+5=15, T:=90-15=75

Bước 2: 75 >= 20, tiếp tục với bước 3

Bước 3: i:=i+5=20, T:=75-20=55

Bước 2: 55 >= 20, tiếp tục với bước 3

Bước 3: i:=i+5=25, T:=55-25=30

Bước 2: 30 < 20, chuyển sang bước 4

Bước 4: in ra kết quả T=30 và i=25

=>sau khi thực hiện thuật  giá trị T và i lần lượt là 30 và 25.

b)

program BaiTinHoc;

var
  i, T: integer;

begin
  i := 0;
  T := 105;
  
  repeat
    if T < 20 then
      break;
    i := i + 5;
    T := T - i;
  until false;
  
  writeln('T = ', T);
  writeln('i = ', i);
end.