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

Revision 1 to 2. 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		-	~~`aa, ab, ac, ad, ... aaa, aab, ... aba, ...`~~
	7	+	```
	8	+	aa, ab, ac, ad, ... aaa, aab, ... aba, ...
	9	+	```
8	10
9	11		But this would grow tedious (after declaring those variables, you have to read values into each of those variables).
10	12
11	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:
12	14
13	15		``` pascal
14	16		type
15	17		typename = array [enumerated_type] of another_data_type;
16	18		```
17	19
18	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,
19	21
20	22		``` pascal
21	23		type
22	24		enum_type = 1..50;
23	25		arraytype = array [enum_type] of integer;
24	26		```
25	27
26	28		is equivalent to
27	29
28	30		``` pascal
29	31		type
30	32		arraytype = array [1..50] of integer;
31	33		```
32	34
33	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:
34	36
35	37		``` pascal
36	38		type
37	39		String = packed array [0..255] of char;
38	40		```
39	41
40	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.
41	43
42	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.
43	45
44	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:
45	47
46	48		``` pascal
47	49		type
48	50		arraytype = array[1..50] of integer;
49	51
50	52		var
51	53		myarray : arraytype;
52	54		```
53	55
54	56		use:
55	57
56	58		``` pascal
57	59		for count := 1 to 50 do
58	60		read (myarray[count]);
59	61		```
60	62
61	63		Brackets `[ ]` enclose the subscript when referring to arrays.
62	64
63	65		``` pascal
64	66		myarray[5] := 6;
65	67		```
66	68
67	69		---
68	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