Ответ
На паскаль я так понимаю?
Если да, то:
var x, i, z:integer;
y:real;
begin
readln(x);
y:=0;
for i:=1 to 20 do
y:= y + sqrt(i*Exp(i*(ln(x))));
write(y);
end.
Объяснение:
Exp(...) Возводит в степень
Пограмма выведет значение y функции со значением x