câu 1:Câu lệnh khai báo mảng sau đây có được máy tính thực hiện ko
var N : Integer;
A : Array [1..N] of read;
Câu 2.Viết chương trình sử dụng biến mangr dr nhập từ bàn phím các phần tử của 1 dãy số .Độ dài cũng được nhập từ bàn phím
giúp em với đang cần gấp ạ
C1
Không vì chỉ số cuối chưa xác định
C2
var chuongtrinh;
uses crt;
var n,i:integer;
a:array[1..100] of integer;
begin
clrscr;
write(‘nhap so phan tu cua day:’);readln(n);
for i:=1 to n do
begin
write(‘a[‘,i,’]=’);readln(a[i]);
end;
writeln(‘day so da nhap:’);
for i:=1 to n do write(a[i]:2);
readln;
end.
C1: không. Vì n chưa xác định
C2:
var a: array[1..250] of integer;
i, n: byte;
Begin
Write(‘n = ‘); readln(n);
For i:=1 to n do
Begin
Write(‘a[‘, i, ‘] = ‘);
readln(a[i]);
End;
End.