viết chương trình kiểu mảng MỘT CHIỀU tối đa 100 phần tử số nguyên (khai báo,nhập,xuất) best tin giúp đỡ nhau vs T T 27/08/2021 Bởi Jade viết chương trình kiểu mảng MỘT CHIỀU tối đa 100 phần tử số nguyên (khai báo,nhập,xuất) best tin giúp đỡ nhau vs T T
Program BTT;Uses crt;Var A:array[1..100] of longint; i,n: longint;Begin Clrscr; Write(‘Nhap 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]:5); ReadlnEnd. Bình luận
Program BTT;
Uses crt;
Var A:array[1..100] of longint;
i,n: longint;
Begin
Clrscr;
Write(‘Nhap 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]:5);
Readln
End.