program s;
type info = record
name, surname: string;
min, sec: integer;
end;
arrays = array[2..50] of info;
var A: arrays;
begin
A[1].name := 'name';
end.
What is wrong with that? It gives me range check error and I have no idea what is that.