Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài

Những câu hỏi liên quan
Bình Phú
Xem chi tiết
Phương Bella
Xem chi tiết
Huỳnh Quang Sang
9 tháng 5 2018 lúc 19:55

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~

Phương Bella
10 tháng 5 2018 lúc 10:59

Giải chi tiết hộ mik với Huỳnh Quang Sang

help me
Xem chi tiết
Yến Nhii
Xem chi tiết
Yến Nhii
Xem chi tiết
Trần Hiếu Anh
24 tháng 3 2022 lúc 15:23

Có đề thêm không bạn?

S<-0 là sao ấy bạn

Nguyễn Vy
Xem chi tiết
Nguyễn Lê Phước Thịnh
16 tháng 3 2022 lúc 14:02

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

Phạm Tấn Tú
Xem chi tiết
Huỳnh Minh Thuận
27 tháng 4 2017 lúc 22:07

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.

Huỳnh Minh Thuận
27 tháng 4 2017 lúc 22:08

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.

như quỳnh
Xem chi tiết
Bùi Thọ Anh
Xem chi tiết