Информатика. Напишите программу для решения данного выражения (фото прикреплено)

В стандартном Паскале нет функции десятичного логарифма, поэтому воспользуемся соотношением lg(x) = ln(x) / ln(10).Кроме того, показатель степени у числа "е" (-x² / 2xy) можно упростить до -x / 2y.var  a,x,y:real;begin  Write('Введите x и у через пробел: '); Read(x,y);  a:=1e5*Ln(Abs(0.8*x))/Ln(10)*Exp(-x/(2*y));  Writeln('a=',a)end.