khai báo mảng a gồm n phần tử số nguyên (n <=100) mỗi phần tử có giá trị tuyệt đối <= 200. hãy nhập mãng và xuất mãng?

0 bình luận về “khai báo mảng a gồm n phần tử số nguyên (n <=100) mỗi phần tử có giá trị tuyệt đối <= 200. hãy nhập mãng và xuất mãng?”

1. Program NN;
   Uses crt;
   Var A: array[1..100] of longint;
       n,i: longint;
   Begin
           Clrscr;
           Write(‘Nhap n: ‘); Readln(n);
           For i:=1 to n do Read(A[i]);
           For i:=1 to n do Write(A[i],’ ‘);
           Readln
   End.

   Bình luận

2. var a:array[1..100] of longint;

   n,i:longint;

   begin

   readln(n);

   for i:=1 to n do read(a[i]);readln;

   for i:=1 to n do write(a[i],’ ‘);

   readln

   end.

   Bình luận