условие: первая буква -гласная
если да, то вывести слово без первой буквы, иначе-оставить без изменений
В)часть памяти на жестком <span>диске почтового сервера, отведенную для пользователя;</span>
Var
s:string;
n:integer;
begin
Readln(s);
n:=Length(s);
if Odd(n) then Delete(s,1,2)
else Insert('www',s,n div 2+1);
Writeln(s)
end.