Top.Mail.Ru
Ответы

Осталось 10 мин!! Помогите! Информатика 10 класс. Программирование на Паскаль.

На вход подаётся любое слово. Вывести тоже самое слово, только после каждой буквы этого слова поставить звёздочку(*).

Пример:
Подаётся слово 'тигр'
Код должен вывести 'т*и*г*р'

По дате
По рейтингу
Аватар пользователя
Новичок

Ну, элементарно же:

1
 print('*'.join(list(input()))) 

Ах, у тебя же Паскаль. Тогда менее элементарно:

1234567
 program Asterisk;
var s, t: string; i: integer;
begin
  readln(s); t := s[1];
  for i := 2 to length(s) do t := t + '*' + s[i];
  writeln(t)
end. 
Аватар пользователя
Гений

Действительно, элементарно

for i:= Length(S) downto 2 do Insert('*', S, i);