Написать программу на яп паскаль, которая для любого введенного числа x находит значение выражения: e=x/5+x . нужно

var x,e:real;
begin
write('x = ');
readln(x);
e:=x/5+x;
writeln('E = ',e);
end.

Пример:
x = 20
E = 24