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
2 câu trả lời
var i,n:longint;
begin
write('Nhap n: ); readln(n);
for i:=1 to n do write(i,' ');
readln;
end.
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.
Câu hỏi trong lớp
Xem thêm
