Question

[Nguyen Tan Dat]

Viết chương trình nhập vào các phần tử của dãy số nguyên .In dãy số vừa nhập lên màn hình.     

 ai cho mình biết đc ko :D

Answer 1

[Kiều Vũ Linh]

Var a:array:[1..1000] of integer;

i,n:integer;

Begin

Write('Nhap so luong so n = ');readln(n);

For i:=1 to n do

Begin

Write('Nhap so thu ',i,' = ');readln(a[i]);

End;

write('Cac so vua nhap la ');

For i:=1 to n do write(a[i]:8);

Readln

End.

Answer 2

[Kiều Vũ Linh]

Begin phía trên là bắt đầu chương trình chính

End. là kết thúc chương trình

Còn begin và end; ở giữa là bắt đầu và kết thúc việc thực hiện câu lệnh trong lệnh lặp For do