Viết chương trình nhập dãy số gồm N số nguyên (n bé hơn hoặc bằng 500) rồi in ra màn hình các số vừa nhập( mỗi số cách nhau một khoảng trống)
2 câu trả lời
var a: array[1..500] of integer;
n, i: word;
Begin
Write('n = '); readln(n);
For i:=1 to n do
Begin
Write('a[', i, '] = '); readln(a[i]);
End;
For i:=1 to n do
write(a[i], ' ');
Readln
End.
