Работа цикла foreach

@kotAV · Регистрация: 15.09.2017

Author24 — интернет-сервис помощи студентам

Почему не выводится PascalABC.NET?

Pascal

type
  tpmap = record
    name: string;
  end;
  
var
  map: array of tpmap;
  
begin
  SetLength(map,1);
  foreach var x in map do
    x.name:='PascalABC.NET';
  write(map[0].name);
end.

@Соколиный глаз · 12.08.2018, 20:04

kotAV, возможно, Вы работаете с копией, поэтому изменения не отражаются на оригинале (строка 12). Если не прав, поправьте.

@kotAV · 12.08.2018, 20:09 **[ТС]**

Соколиный глаз, через foreach, судя по всему, нельзя присваивать.

Pascal

type
  tpmap = record
    name: string;
  end;
  
var
  map: array of tpmap;
  
begin;
  SetLength(map,1);map[0].name:='PascalABC.NET';
  foreach var x in map do
    if x.name='PascalABC.NET' then write('TRUE') else write('FALSE');
end.

Вывод: TRUE

В справке только сейчас увидел: Изменение переменной цикла внутри тела цикла не меняет элементы контейнера, т.е. они доступны только на чтение.

@Соколиный глаз Alvin Seville 343 / 273 / 134 Регистрация: 25.07.2014 Сообщений: 4,537 Записей в блоге: 9
	12.08.2018, 20:04	2
	Сообщение было отмечено kotAV как решение Решение kotAV, возможно, Вы работаете с копией, поэтому изменения не отражаются на оригинале (строка 12). Если не прав, поправьте. 0

	12.08.2018, 20:09

Работа цикла foreach

Решение