Cho đoạn chương trình sau, hãy cho biết có bao nhiêu chữ 'A' được in ra màn hình? Giải thích?
Var i: integer;
Begin
i:=5;
while i<10 do
Begin
Writeln('A')
i:=i+1;
End;
Readln;
End.
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.
Những câu hỏi liên quan
T
11 tháng 5 2021
Màn hình sẽ in ra giá trị: 3 7
Giải thích:
Câu lệnh if i mod 3=0 then j:=j+1 có nghĩa là j bằng một cộng với số các số chia hết cho 3.
k:=k+j có nghĩa là k bằng bốn cộng với giá trị của j đã tìm.
Đoạn chương trình trên sẽ in ra màn hình chữ 'A' năm lần.
Lý do là vì chương trình bắt đầu bằng việc gán giá trị 5 cho biến i. Sau đó, vòng lặp while được sử dụng để kiểm tra điều kiện i < 10. Vì giá trị ban đầu của i là 5 và không có lệnh nào thay đổi giá trị của i trong phạm vi vòng lặp, nên điều kiện i < 10 vẫn đúng.
Trong thân vòng lặp, câu lệnh Writeln('A') được thực thi, in ra chữ 'A' trên màn hình. Tiếp theo, biến i được tăng lên 1 (i := i + 1). Sau đó, vòng lặp tiếp tục lặp lại và kiểm tra điều kiện. Quá trình này lặp lại cho đến khi giá trị của i đạt đến 10.
Vì vậy, trong quá trình thực thi chương trình, lệnh Writeln('A') được thực hiện 5 lần, và do đó sẽ in ra màn hình 5 chữ 'A'.