ai chuyển sang pascal #include <bits/stdc++.h> using namespace std; long long n,i,a[10000]; int main() { cin>>n; for (i=1; i<=n; i++) cin>>a[i]; for (i=1; i<=n; i++) cout<<a[i]<<" "; }
2 câu trả lời
uses crt;
var n: int64;
i: longint;
a: array[1..10001] of int64;
begin
clrscr;
readln(n);
for i:=1 to n do read(a[i]);
for i:=1 to n do write(a[i], ' ');
readln; readln;
end.
uses crt;
var i: longint;
n: int64;
a: array[0..10000-1] of int64;
begin
readln(n);
for i:=1 to n do read(a[i]);
for i:=1 to n do write(a[i], ' ');
readkey;
end.
Câu hỏi trong lớp
Xem thêm
