Basic Pascal Tutorial/Chapter 5/1-dimensional arrays: what changed

Revision 2 to 3. Removed lines have a minus sign; added lines have a plus sign.

Old	New		Line
1	1		5C - One-dimensional Arrays (author: Tao Yue, state: unchanged)
2	2
3	3		Suppose you wanted to read in 5000 integers and do something with them. How would you store the integers?
4	4
5	5		You could use 5000 variables, lapsing into:
6	6
7		-	~~```~~
	7	+	```text
8	8		aa, ab, ac, ad, ... aaa, aab, ... aba, ...
9	9		```
10	10
11	11		But this would grow tedious (after declaring those variables, you have to read values into each of those variables).
12	12
13	13		An array contains several storage spaces, all the same type. You refer to each storage space with the array name and with a subscript. The type definition is:
14	14
15	15		``` pascal
16	16		type
17	17		typename = array [enumerated_type] of another_data_type;
18	18		```
19	19
20	20		The data type can be anything, even another array. Any enumerated type will do. You can specify the enumerated type inside the brackets, or use a predefined enumerated type. In other words,
21	21
22	22		``` pascal
23	23		type
24	24		enum_type = 1..50;
25	25		arraytype = array [enum_type] of integer;
26	26		```
27	27
28	28		is equivalent to
29	29
30	30		``` pascal
31	31		type
32	32		arraytype = array [1..50] of integer;
33	33		```
34	34
35	35		Aside: This is how strings are actually managed internally — as arrays. Back before modern Pascal compilers added native support for strings, programmer had to handle it themselves, by declaring:
36	36
37	37		``` pascal
38	38		type
39	39		String = packed array [0..255] of char;
40	40		```
41	41
42	42		and using some kind of terminating character to signify the end of the string. Most of the time it's the null-character (ordinal number 0, or ord(0)). The packed specifier means that the array will be squeezed to take up the smallest amount of memory.
43	43
44	44		Arrays of characters representing strings are often referred to as buffers, and errors in handling them in the C or C++ programming languages may lead to buffer overruns. A buffer overrun occurs when you try to put, say, a 200-character string into a 150-length array. If memory beyond the buffer is overwritten, and if that memory originally contained executable code, then the attacker has just managed to inject arbitrary code into your system. This is what caused the famous Slammer worm that ran rampant on the Internet for several days. Try it in Pascal and see what happens.
45	45
46	46		Arrays are useful if you want to store large quantities of data for later use in the program. They work especially well with for loops, because the index can be used as the subscript. To read in 50 numbers, assuming the following definitions:
47	47
48	48		``` pascal
49	49		type
50	50		arraytype = array[1..50] of integer;
51	51
52	52		var
53	53		myarray : arraytype;
54	54		```
55	55
56	56		use:
57	57
58	58		``` pascal
59	59		for count := 1 to 50 do
60	60		read (myarray[count]);
61	61		```
62	62
63	63		Brackets `[ ]` enclose the subscript when referring to arrays.
64	64
65	65		``` pascal
66	66		myarray[5] := 6;
67	67		```
68	68
69	69		---
70	70		From the Free Pascal wiki, page "Basic Pascal Tutorial/Chapter 5/1-dimensional arrays", as it stood on 2022-08-20 after a change by Kai Burghardt, out of the wiki's dump of 2024-05-26. Copyright stays with the author who wrote it, according to the old wiki's [[Licensing]] page. If you have concerns about this material, [message the admin](/wiki-contact).

Back to history