Найдена и исправлена ошибка в Lab_5. До:После: i = 1 i = 1 x = a x = a как видно ошибка здесь h = 1 Do While x <= b Do While x <= b y = f(x) y = f(x) Cells(i, 2).Value = x Cells(i, 2).Value = x Cells(i, 2).Value = y Cells(i, 2).Value = y x = x + h x = x + h i = i + 1 i = i + 1