Vi Thị Ánh Ngọc

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.

Ngô Bá Hùng
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ự
bao ngan
Xem chi tiết
Võ Xuân Việt
Xem chi tiết
Huynh Uyen
Xem chi tiết
Khánh Hoàng
Xem chi tiết
Khánh Hoàng
Xem chi tiết
huyokkkkk
Xem chi tiết
lê thùy linh
Xem chi tiết
Hào Nguyễn
Xem chi tiết
Linh Nguyễn
Xem chi tiết