Насколько я помню, после do, если нет begin'а, выполняется только первая строчка. Так что заменить стоит