Câu 3 trang 51 SGK Tin học 11


Có thể dùng câu lệnh while-đo để thay cho câu lệnh for-do được không? Nếu được, hãy thực hiện điều đỏ với chương trình.

Đề bài

Có thể dùng câu lệnh while-do để thay cho câu lệnh for-do được không? Nếu được, hãy thực hiện điều đỏ với chương trình.

Quảng cáo

Lộ trình SUN 2025

Lời giải chi tiết

Có thể thay thế đoạn chương trình chứa câu lệnh for-do (dạng lặp tiến) for <biến đếm>:= <giá trị đầu> to <giá trị cuối> do <câu lệnh>;

bằng đoạn chương trình chứa câu lệnh while-do như sau:

i:= <giá trị đầu>;

while <i< = <giá trị cuối> do

begin

<câu lệnh>;

<tăng i một đơn vị>,

end;

Như vậy, chương trình tính Tong_1a viết bằng lệnh for-do

program Tong_1a;

uses crt;

var S:real,

a, N: integer;

begin

clrscr;

write('Hay nhap gia tri a vao!'); readln(a);

S:= 1.0/a;

for N:=1 to 100 do S: = S+1.0/ (a+N);

 writeln('Tong S la:', S:8:4); readln;

End.

được viết lại bằng lệnh while-do như sau:

Program Tong_la;

uses crt;

var S:real;

a, N: integer;

Begin

clrscr;

write('Hay nhap gia tri a vao!'); readln(a);

S:= 1.0/a;

N:= 1;

while N<=100 do begin

S:= s + 1.0/(a+N);

N:= N + 1; end;

writeln('Tong s la:', S:8:4); readln;

End.

Loigiaihay.com


Bình chọn:
4 trên 19 phiếu

>> Xem thêm

2K7 tham gia ngay group để nhận thông tin thi cử, tài liệu miễn phí, trao đổi học tập nhé!

>> Lộ Trình Sun 2025 - 3IN1 - 1 lộ trình ôn 3 kì thi (Luyện thi TN THPT & ĐGNL; ĐGTD) tại Tuyensinh247.com. Đầy đủ theo 3 đầu sách, Thầy Cô giáo giỏi, 3 bước chi tiết: Nền tảng lớp 12; Luyện thi chuyên sâu; Luyện đề đủ dạng đáp ứng mọi kì thi.