Viết chương trình nhập vào N rồi dãy số nguyên và đưa ra màn hình các số nguyên vừa nhập. Mn ơi giúp em đi ạ, mơn mn nhìu ạ❤️❤️❤️
2 câu trả lời
uses crt;
var i,n:byte;
a:array[0..200] of integer;
BEGIN
clrscr;
write('Nhap n:'); readln(n);
for i:=1 to n do
begin
write('Nhap a[',i,']:');
readln(a[i]);
end;
for i:=1 to n do
write(a[i],' ');
readln
END.
Chúc bạn học tốt!
program baigiai;
Uses crt;
var A:array[1..1000] of integer;
n,i:integer;
begin
write('Nhap so luong phan tu cua day: '); readln(n);
for i:=1 to n do
begin
write('Phan tu thu ',i,': '); readln(A[i]);
end;
write('Mang vua nhap la: ');
for i:=1 to n do
write(A[i],' ');
readln
end.
