Bài 9. Làm việc với dãy số

HT

viết chương trình nhập dãy số gồm 10 số . in ra màn hình dãy số vừa nhập

NT
9 tháng 5 2021 lúc 20:49

uses crt;

var a:array[1..100]of integer;

i,n:integer;

begin

clrscr;

n:=10;

for i:=1 to n do

begin

write('A[',i,']='); readln(a[i]);

end;

for i:=1 to n do 

  write(a[i]:4);

readln;

end.

Bình luận (0)

Các câu hỏi tương tự
MP
Xem chi tiết
HL
Xem chi tiết
HN
Xem chi tiết
N8
Xem chi tiết
HM
Xem chi tiết
TD
Xem chi tiết
JJ
Xem chi tiết
HP
Xem chi tiết
SN
Xem chi tiết