Question

Đã trả lời bởi chuyên gia

Answer 1

Câu 4: Trong Pascal, khai báo biến mảng trong mảng (hay còn gọi là mảng đa chiều) được thực hiện như sau:

var
a: array[1..m, 1..n] of <kiểu phần tử>;

Trong đó, m và n là số nguyên dương thể hiện số lượng phần tử trong mảng ở mỗi chiều. <kiểu phần tử> là kiểu dữ liệu của các phần tử trong mảng.

Ví dụ: để khai báo một mảng 2 chiều gồm 3 hàng và 4 cột, chứa các số nguyên, ta có thể viết như sau:

cssCopy code
var a: array[1..3, 1..4] of integer;

câu 5

program sum;
var
i, s: integer;
begin
s := 0;
for i := 1 to 20 do
s := s + i;
writeln('Tong tu 1 den 20 la: ', s);
end.

câu 6

program max_min;
var
a: array of integer;
n, i, max, min: integer;
begin
write('Nhap so phan tu cua day: ');
readln(n);

// Nhập dãy số
SetLength(a, n);
for i := 0 to n-1 do
begin
write('a[', i, '] = ');
readln(a[i]);
end;

// Tìm giá trị lớn nhất và nhỏ nhất
max := a[0];
min := a[0];
for i := 1 to n-1 do
begin
if a[i] > max then
max := a[i];
if a[i] < min then
min := a[i];
end;

writeln('Max = ', max);
writeln('Min = ', min);
end.

...Xem thêm

Answer 2