blob: 1909d12b0c1e4c0e54bd81dd19ffeec5bded444a (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
PROGRAM initializationBug( INPUT, OUTPUT );
{$H+}
CONST
bufferSize = 8;
tableSize = 2;
TYPE
bufferRecord = RECORD
stringBuffer : String;
characterBuffer : ARRAY[ 1..bufferSize ] OF CHAR;
END;
VAR
bufferTable : ARRAY[ 1..tableSize ] OF bufferRecord;
BEGIN
WRITELN( '< INITIALIZATION BUG HAS NOT OCCURRED!' );
END.
|
