Форум программистов, компьютерный форум, киберфорум
Наши страницы
PascalABC.NET
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.86/7: Рейтинг темы: голосов - 7, средняя оценка - 4.86
zhurik123
0 / 0 / 0
Регистрация: 18.11.2014
Сообщений: 11
1

Слова, одинаково читающиеся справа налево и слева направо

18.11.2014, 16:12. Просмотров 1408. Ответов 1
Метки нет (Все метки)

Дана строка, состоящая из слов, разделенных пробелами (одним или несколькими). Составить программу обработки данной строки, выводящую через запятую:
a) слова, одинаково читающиеся справа налево и слева направо;

 Комментарий модератора 
Темы дублировать запрещено
0
Лучшие ответы (1)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
18.11.2014, 16:12
Ответы с готовыми решениями:

Определить является ли заданный текст симметричным (читается одинаково слева направо и справа налево)
Дан текст из 20 символов. Определить является ли он симметричным (читается одинаково слева направо...

Написать программу, которая будет составлять число, которое читается одинаково как слева направо, так и справа налево
Текст задачи: "На вход программе подается набор символов, заканчивающийся символом 0 (в программе...

Определить в тексте слова, которые можно читать слева направо и справа налево (Анна, шалаш и т.д.).
Помогите пожалуста решить. Задача: Определить в тексте слова, которые можно читать слева направо...

Найти в файле f все слова, слева направо и наоборот читаются одинаково и составить из них новый файл q
Найти в файле f все слова, слева направо и наоборот читаются одинаково и составить из них новый...

Является ли число одинаково читающимся как справа налево, так и наоборот?
Установить, является ли заданное натуральное число n палиндромом (одинаково читается как слева...

1
Puporev
Модератор
56564 / 43267 / 29911
Регистрация: 18.05.2008
Сообщений: 102,913
18.11.2014, 16:20 2
Лучший ответ Сообщение было отмечено zhurik123 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
var s,s1,s2:string;
    n,i,j,k:integer;
begin
writeln('Введите текст, в котором слова отделены пробелами');
readln(s);
s:=' '+s;//добавим пробел в начало для удобства
n:=length(s);
i:=1;
k:=0;
while i<=n do
if(s[i]<>' ')and(s[i-1]=' ') then//если не пробел, а перед ним пробел, новое слово
 begin
  j:=i;
  s1:='';
  while(j<n)and(s[j]<>' ') do//пока не дошли до точки и не пробел
   begin
    s1:=s1+s[j];//составляем слово
    j:=j+1;
   end;
  s2:='';
  for j:=length(s1)downto 1 do
  s2:=s2+s1[j]; //проверяем на симметричность
  if s2=s1 then
   begin
    write(s1,',');
    k:=1;
   end;
  i:=i+length(s1);//перешагиваем через это слово
 end
else i:=i+1;//пропускаем пробелы
if k=0 then write('Нет симметричных слов')
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
18.11.2014, 16:20

Составить из имеющихся четных цифр максимальное число, читающееся одинаково слева направо и наоборот
На вход подается набор символов, оканчивающийся точкой. Количество символов не превышает 200....

Определить, какая из этих букв встречается раньше: m или n (при просмотре слова слева направо)
С клавиатуры вводится предложение, в котором есть одна буква ‘ m ’ и буква ‘ n ’. Определить, какая...

Движение фигуры слева направо
Написать програму,где по экрану слева направо с помощью клавиш движения можно переместить объект...


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

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

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