KHÁM PHÁ Học Toán + Tiếng Anh theo Sách Giáo Khoa cùng học online và gia sư dạy kèm tại nhà từ lớp 1 đến lớp 12 với giá cực kỳ ưu đãi kèm quà tặng độc quyền"CỰC HOT".
Viết chương trình nhập vào dãy số nguyên in ra màn hình dãy số đã nhập
By Cora
Viết chương trình nhập vào dãy số nguyên in ra màn hình dãy số đã nhập
uses crt; var i,n:longint; a:array[1..1000]of longint; begin clrscr; write(‘Nhap so luong phan tu: ‘);readln(n); for i:=1 to n do begin write(‘Nhap phan tu thu ‘,i,’: ‘);readln(a[i]); end; writeln(‘Day so da nhap: ‘); for i:=1 to n do write(a[i],’ ‘); readln end.
uses crt; var a:array[1..1000] of longint; n,i:integer; begin clrscr; write(‘Nhap n: ‘);readln(n); for i:=1 to n do begin write(‘a[‘,i,’]: ‘);readln(a[i]); end; write(‘Day vua nhap: ‘); for i:=1 to n do write(a[i],’ ‘); readln; end.
uses crt;
var i,n:longint; a:array[1..1000]of longint;
begin
clrscr;
write(‘Nhap so luong phan tu: ‘);readln(n);
for i:=1 to n do
begin
write(‘Nhap phan tu thu ‘,i,’: ‘);readln(a[i]);
end;
writeln(‘Day so da nhap: ‘);
for i:=1 to n do write(a[i],’ ‘);
readln
end.
uses crt;
var a:array[1..1000] of longint;
n,i:integer;
begin
clrscr;
write(‘Nhap n: ‘);readln(n);
for i:=1 to n do
begin
write(‘a[‘,i,’]: ‘);readln(a[i]);
end;
write(‘Day vua nhap: ‘);
for i:=1 to n do write(a[i],’ ‘);
readln;
end.