Дано слово . Добавить к нему вначале и конце столько звездочек , сколько букв в этом слове .
Дано слово . Добавить к нему вначале и конце столько звездочек , сколько букв в этом слове .
Гость
Ответ(ы) на вопрос:
Гостьvar i:integer;
var slovo:string;
begin
write('Vvedite slovo: ');
readln(slovo);
for i:=1 to length(slovo) do
slovo:='*'+slovo+'*';
writeln(slovo);
readln;
end.
Не нашли ответ?
Похожие вопросы