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

В строке, введенной с экрана, после каждой согласной буквы вставить пробел

21.05.2011, 12:59. Просмотров 1443. Ответов 2
Метки нет (Все метки)

В строке, введенной с экрана, после каждой согласной буквы вставить пробел


помогите пожалуйста!
0
Лучшие ответы (1)
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
21.05.2011, 12:59
Ответы с готовыми решениями:

Распечатать заданное слово в одной строке с разрядкой (пробел после каждой буквы)
Распечатать заданное слово в одной строке с разрядкой (пробел после каждой буквы).

Текстовые файлы: в первую строку вставить первую гласную из второй строки, после каждой согласной в первой
1-в первую строку вставить первую гласную из второй строки, после каждой согласной в первой (строки...

После каждого символа ‘.’ вставить пробел, а следующее слово начать с большой буквы
Дана строка символов. После каждого символа ‘.’ вставить пробел, а следующее слово начать с большой...

Если первая буква в строке, введенной с экрана гласная (a,e,o,u,y,i), вставить в начало строки слог «ka», если согласная – удалить её
Если первая буква в строке, введенной с экрана гласная (a,e,o,u,y,i), вставить в начало строки слог...

После каждой буквы П вставить три знака восклицания
После каждой буквы П вставить три знака восклицания

2
aka_GRAD
26 / 25 / 15
Регистрация: 12.11.2010
Сообщений: 67
21.05.2011, 13:23 2
Лучший ответ Сообщение было отмечено Рифатина как решение

Решение

Не понятно. У вас сенсорный экран? или ввод все таки с клавиатуры?
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Program Forum;
 type
  Gl = set of char ;
 var
  Glasnie:Gl;
  Stroka,Sym:String;
  i:integer;
 begin
    i:=0;
    Glasnie:= ['a','e','i','o','u','y','A','E','I','U','Y','O'];
  while i<10 do
   begin
    Readln(Sym);
    if Sym[1] in Glasnie then
      Stroka:=Stroka+Sym+' '
    else
      Stroka:=Stroka+Sym;
     inc(i);
   end;
  Writeln('Otvet = ',Stroka);
 end.
Объявляешь множество и записываешь туда гласные буквы английского языка, и при вводе с клавиатуры проверяешь букву входит ли оно в множество и все. Программа рассчитана на ввод 10 букв если хотите увеличьте, после ввода 10 букв она выводит строку с пробелами после гласных....

-------------------------------
Не забываем нажимать +1 если вам помогли
1
Рифатина
0 / 0 / 0
Регистрация: 21.05.2011
Сообщений: 5
22.05.2011, 09:55  [ТС] 3
спасибо
0
22.05.2011, 09:55
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
22.05.2011, 09:55

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Строка содержит слова, разделенные запятой. После каждой запятой вставить пробел
1.1 В заданной строке слова разделены пробелами (кол-во пробелов произвольное). Вывести текст так,...

Вводится с клавиатуры текст, после каждой буквы А, вставить восклицательный.
Вводится с клавиатуры текст, после каждой буквы А, вставить восклицательный. Помогите пожалуста!...

Подсчитать количество цифр в заданной строке, вычислить их сумму и вставить после каждой цифры ее дополнение до 10
Строки Задание Составьте алгоритм и программу обработки введенной с клавиатуры строки в...


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

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

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