Bài 7. Câu lênh lặp

H24

Viết chương trình sử dụng lệnh lặp while...do nhập các số thực từ 1 đến 100 từ bàn phím

ML
7 tháng 6 2020 lúc 20:34

Program HOC24;

var i: integer;

a: array[1..100] of integer;

begin

i:=0;

while i<100 do

begin

i:=i+1;

write('Nhap so thu ',i,' : '); readln(a[i]);

end;

readln

end.

Bình luận (0)

Các câu hỏi tương tự
TU
Xem chi tiết
HH
Xem chi tiết
MD
Xem chi tiết
TM
Xem chi tiết
TN
Xem chi tiết
CD
Xem chi tiết
BT
Xem chi tiết
BT
Xem chi tiết
NH
Xem chi tiết