Дано слово . Добавить к нему вначале и конце столько звездочек , сколько букв в этом...

0 голосов
111 просмотров

Дано слово . Добавить к нему вначале и конце столько звездочек , сколько букв в этом слове .


Информатика (33 баллов) | 111 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

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.

(170 баллов)