VN

Viết câu lệnh lặp hiển thị lên màn hình 10 chữ A bằng cách sử dụng lệnh lặp while.

NH
16 tháng 4 2023 lúc 19:40

program HienThiA;
var
  i: Integer;
begin
  i := 1;
  while i <= 10 do
  begin
    writeln('A');
    i := i + 1;
  end;
  readln;
end.

pascal nhỉ?

Bình luận (2)

Các câu hỏi tương tự
BN
Xem chi tiết
VV
Xem chi tiết
HU
Xem chi tiết
KH
Xem chi tiết
KH
Xem chi tiết
H24
Xem chi tiết
LL
Xem chi tiết
HN
Xem chi tiết
LN
Xem chi tiết