Bài 11: Kiểu mảng

thugiang dinhthi
viết chương trình tạo và in ra mảng ngẫu nhiên gồm N phần tử (N
Nguyễn Lê Phước Thịnh
11 tháng 1 2021 lúc 12:28

uses crt;

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

i,n:integer;

begin

clrscr;

randomize;

write('Nhap n='); readln(n);

for i:=1 to n do 

  begin

a[i]:=random(100);

end;

for i:=1 to n do 

  write(a[i]:4);

readln;

end.

Bình luận (0)

Các câu hỏi tương tự
Nguyễn Hải
Xem chi tiết
Thảo Vy
Xem chi tiết
nguyễn thị châu
Xem chi tiết
Benny
Xem chi tiết
Minh Hoạt
Xem chi tiết
Nguyễn Thị Thanh Phương
Xem chi tiết
Ho Hai Trieu
Xem chi tiết
Anh Lan
Xem chi tiết
Yuki
Xem chi tiết