X:=1.8e-3; write (x:4:3)

Для вывода значения переменной x с округлением до 3 знаков после запятой используйте следующую команду: write(x:4:3)

Это позволит вам корректно вывести значение переменной x с заданным количеством десятичных знаков. Успехов в вашей работе!