Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
romera
61 / 61 / 1
Регистрация: 02.06.2011
Сообщений: 86
1

Дано слово.

16.06.2011, 23:09. Просмотров 834. Ответов 1
Метки нет (Все метки)

Дано слово. Добавить к нему в начале и в конце столько звездочек, сколько букв в этом слове.
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
16.06.2011, 23:09
Ответы с готовыми решениями:

Дано слово. Получить слово, получаемое путем прочтения слова начиная с его конца
Дано слово s.Получить слово t,получаемое путем прочтения слова начиная с его...

Дано натуральное число N. Выведите слово YES, если число N является точной степенью двойки, или слово NO
Дано натуральное число N. Выведите слово YES, если число N является точной...

Дано слово содержащее различные символы. составить из него слово содержащее только русские буквы
дано слово, содержащее различные символы. составить из него слово, содержащее...

Дано слово. Удалить ненужные символы
Дано слово. Удалить ненужные символы, '12abc,.' , в слове. Полученное слово...

Дано слово. Определите его второй и третий символы
помогіте. Дано слово. Определите его второй и третий символы

1
JIomaka
29 / 29 / 24
Регистрация: 22.12.2010
Сообщений: 54
16.06.2011, 23:15 2
Лучший ответ Сообщение было отмечено romera как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
program lab;
 
var
  s, s1, str: String;
  i: Integer;
 
begin
  WriteLn('Vvedite slovo');
  ReadLn(s);
  for i := 1 to Length(s) do
    s1 := s1 + '*';
  str := s1 + s + s1;
  WriteLn(str);
  ReadLn;
 
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
16.06.2011, 23:15

Дано слово. Перенести последнюю букву в начало слова
Дано слово. Перенести последнюю букву в начало слова

Строки символов. Дано слово. Проверить,является ли оно “Перевертышем”
решите пожалуйста через Паскаль напишите решение дано слово.Проверить,...

Дано строка и слово. Удалить все вхождения этого слова
помогите пожалуйста:-[ Дана строка символов. Дано слово. Удалить из строки...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru