viết chương trình hiển thị 10 số nguyên đã nhập ra màn hình (n số nguyên) giúp mình vs đang cần gấp

0 bình luận về “viết chương trình hiển thị 10 số nguyên đã nhập ra màn hình (n số nguyên) giúp mình vs đang cần gấp”

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

   Bình luận

2. var i,n:longint;

   begin

   write(‘Nhap n: ); readln(n);

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

   readln;

   end.

   Bình luận