Bài 5:

Có 2 cách để chúng ta khai báo mảng 1 chiều như sau:

- Cách 1 khai báo trực tiếp: 

var A: array[-10..20] of Real;

- Cách 2 khai báo gián tiếp:

Type Mang1C = array[1..20] of Integer;
Var A:Mang1C;

Tuy có 2 cách nhưng các bạn nên sử dụng cách thứ 2 vì khi viết thủ tục hoặc sử dụng hàm sẽ ngắn gọn hơn là cách 1.

Cách nhập – xuất mảng 1 chiều

Từ ví dụ dưới đây các bạn sẽ biết được cách nhập xuất mảng 1 chiều có cùng dữ liệu.

Ví dụ: Hãy nhập vào một mảng số nguyên và xuất chúng ra màn hình.

Program Vidu;
Uses crt;
Type Mang1C = array[1..10] of Integer; {khai báo tên mảng – cách 2}
Var A:Mang1C; {Đặt tên mảng là A}
i:integer;
Begin
        clrscr;
        Writeln('Nhap gia tri cho mang A');
        For i:=1 to 10 do 
        Begin
                Write('A[',i,'] = ');
                Readln(A[i]); { đọc vào giá trị cho A thứ i}
        End;
        Write('Danh sach cac phan tu trong mang A: ');
        For i:=1 to 10 do
                Write(A[i]:5);
        Readln;
End.

Ủa bạn Trịnh Quang Đức chưa gán giá trị t:=0 tại bài 4 mà.

mb giúp mình bt này vs
tin học 11 nha
viết ct có sử dụng ct con
a) nhập vào mảng a gồm N phần tử(N<10)
b) tính và đưa ra màn hình số lượng phần tử chia hết chọ
c) tính tổng phần tử chẵn
d) tìm GTLN của mảng a
e) đưa ra màn hình các kết quả trên.
mình cần gấp nha mn

Các bạn ơi. Giúp mình với nhé. Tin lớp 11 nhé!
viết chương trình nhập mảng xuất mảng
1. Tính tổng ( chẵn, lẻ, âm, dương, chia hết cho 3,
chia hết cho 5)
2. Tích âm ( chẵn, lẻ, âm, dương, chia hết cho 3,
chia hết cho 5)
3. Trung bình (chẵn, lẻ, âm, dương, chia hết cho 3,
chia hết cho 5)

Viết ct xuất ra màn hình giá trị lớn nhất của dãy số n và tổng các số lẻ
mn gió ạ mai e kt tin ròi ạ

var n ,tich ;integrer ;
begin
for

Dùng ctc để viết ct nhập vào 1 mảng gồm N số nguyên, tính tổng dãy số vừa nhập.
GIÚP VỚI