var
p, w, x, y: real;
begin
Write('Введите через пробел p, x, w: ');
Readln(p, x, w);
y := sqrt(2 * p) * exp((x + 1) * ln(x)) * exp(-x - sqrt(w / (2 * p * x)));
Writeln('Y=', y:0:6)
end.
Тестовое решение:
Введите через пробел p, x, w: 3 1.456 4.7
Y=0.690109
Графитовый стерженек в таких карандашах очень непрочный, цанга может запросто его пережать и переломить. Поэтому в подобных карандашах используется винтовой механизм. Как правило, это две металлические или пластиковые трубочки, вставленные одна в другую и соединенные пологой резьбой – внешней для внутренней трубочки и внутренней для внешней трубочки. Внешняя трубочка может быть одновременно и корпусом механического карандаша, что упрощает конструкцию. Но обычно внешняя трубочка выполнена отдельной от корпуса и соединена с колечком наконечника карандаша или с колпачком. Вращаем колпачок – внутренняя трубка из корпуса выдвигается, вращаем в другую сторону – вдвигается.
Грифель винтового карандаша крепится в канале внутренней трубочки и удерживается силой трения, то есть грифель вставляется в карандаш с небольшим усилием. Кончик внутренней трубки, куда вставляется грифель, имеет продольные надрезы, придающие трубке свойства пружины. Половинки надрезанной трубки стремятся к центру отверстия трубки и удерживают вставленный в карандаш грифель. Винтовой механический карандаш обеспечивает тонкий штрих, поэтому такие карандаши используют для письма
begin
ReadlnString.Count(c -> c = 'а').Println
end.
Пример приведен на скрине.