Технический форум - Показать сообщение отдельно - Программа выводит результат бесконечное число раз. Не ясна причина

IvaIlga · 06.10.2011, 15:37

AlexZir, попробовала увеличить. Но зацикливание все равно происходит:
Здесь есть кака-то ошибка?

Код:

i := 0;
while i < n do begin
  if i > 0 then Write(', ');
  Write(a[i]);
  Inc(i);
end;

06.10.2011, 15:37	#3 (permalink)
IvaIlga Member Регистрация: 11.11.2010 Сообщений: 11 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	AlexZir, попробовала увеличить. Но зацикливание все равно происходит: Здесь есть кака-то ошибка? Код: i := 0; while i < n do begin if i > 0 then Write(', '); Write(a[i]); Inc(i); end;

Ads
Яндекс Member Регистрация: 31.10.2006 Сообщений: 40200 Записей в дневнике: 0 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 55070