IPB
ЛогинПароль:

> Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

4 страниц V  1 2 3 > »   
 Ответить  Открыть новую тему 
> символьный тип даных
сообщение
Сообщение #1


Новичок
*

Группа: Пользователи
Сообщений: 17
Пол: Мужской

Репутация: -  0  +


Известно, что во вводимом тексте встречается заданная буква, причем не на последнем месте. Требуется вывести символ этого текста, который непосредственно следует за последним вхождением этой буквы. Ввод продолжать до нажатия ‘Ins’ на дополнительной клавиатуре.
помогите плиз
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #2


Гуру
*****

Группа: Пользователи
Сообщений: 1 168
Пол: Мужской
Реальное имя: Сергей Андрианов

Репутация: -  28  +


Покажи, что сделал, и напиши, что именно не получается.
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #3


Новичок
*

Группа: Пользователи
Сообщений: 17
Пол: Мужской

Репутация: -  0  +


я вообще смысл заания не понял дать хоть намек в какую сторону идти и что вообще делать надо


Var ch: Char;
k: integer;
Begin
Read(ch);
k:=0;
While ch<>#10 Do
Begin

очень срочно надо последняя работа чтоб зачет получить(

Сообщение отредактировано: Shurik_123 -
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #4


Гуру
*****

Группа: Пользователи
Сообщений: 1 168
Пол: Мужской
Реальное имя: Сергей Андрианов

Репутация: -  28  +


Я, кстати, по твоему описанию тоже не понял. Не мог бы ты привести точный текст задания?
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #5


Новичок
*

Группа: Пользователи
Сообщений: 17
Пол: Мужской

Репутация: -  0  +


Цитата(andriano @ 24.12.2009 19:05) *

Я, кстати, по твоему описанию тоже не понял. Не мог бы ты привести точный текст задания?

это задание так звучит в методичке
другой формулировки нет
вогт ворд с заданием у мя 15 вариант

Сообщение отредактировано: Shurik_123 -
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #6


Гуру
*****

Группа: Пользователи
Сообщений: 1 168
Пол: Мужской
Реальное имя: Сергей Андрианов

Репутация: -  28  +


1. Символ, я так понимаю, вводится с клавиатуры. А откуда берется строка?

2. Вот представь, что строка написана на листе бумаге и тебе самому нужно выполнить задание вручную. Что бы ты стал делать?
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #7


Гость






1 набираешь символы в ряд и выходит строка)
2 сначала бы исключил все буквы которые встречаются перед пробелом , а потом по идеии должна остаться буква или несколько и написать букву которую стоит после нее наверно так, но я не уверен
 К началу страницы 
+ Ответить 
сообщение
Сообщение #8


Новичок
*

Группа: Пользователи
Сообщений: 17
Пол: Мужской

Репутация: -  0  +


это я был забыл зайти)
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #9


Гуру
*****

Группа: Пользователи
Сообщений: 1 168
Пол: Мужской
Реальное имя: Сергей Андрианов

Репутация: -  28  +


Цитата(Гость @ 24.12.2009 20:55) *

1 набираешь символы в ряд и выходит строка)
Т.е. также вводится с клавиатуры?
Цитата

2 сначала бы исключил все буквы которые встречаются перед пробелом , а потом по идеии должна остаться буква или несколько и написать букву которую стоит после нее наверно так, но я не уверен
В условии я не обнаружил слова "пробел". С чего бы это?

Еще раз: пусть у нас есть фраза "Мама мыла раму", а ключевой символ "а". Что необходимо сделать?
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #10


Новичок
*

Группа: Пользователи
Сообщений: 17
Пол: Мужской

Репутация: -  0  +


по идеии вывести букву м из слова раМу

Добавлено через 1 мин.
да текст вводится с клавиатуры, и че то я действительно сочинил про пробел
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #11


Злостный любитель
*****

Группа: Пользователи
Сообщений: 1 755
Пол: Мужской

Репутация: -  62  +


Цитата(Shurik_123 @ 24.12.2009 21:22) *

по идеии вывести букву м из слова раМу


А почему не пробел после слова "мыла"?
КАК ты определил, что надо вывести именно эту букву?


--------------------
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #12


Новичок
*

Группа: Пользователи
Сообщений: 17
Пол: Мужской

Репутация: -  0  +


символ этого текста, который непосредственно следует за последним вхождением этой буквы, последняя а стоит перед м в слове раму

Добавлено через 1 мин.
мне что то стало более понятно а как сделать чтоб он считал а находил последню из них?
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #13


Злостный любитель
*****

Группа: Пользователи
Сообщений: 1 755
Пол: Мужской

Репутация: -  62  +


Цитата(Shurik_123 @ 24.12.2009 21:33) *

последняя а стоит перед м в слове раму


А я считаю, что последняя "а" в словы "мыла". Почему это не так?
Пока не научишься смотреть на своё мышление со стороны, формализуя его, вычленяя из мыслей чёткий алгоритм - ничего не напишешь.


--------------------
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #14


Новичок
*

Группа: Пользователи
Сообщений: 17
Пол: Мужской

Репутация: -  0  +


крочь я понял задание
выберается буква и надо вывести символ стояший за ней после ее последнего ввода
например выбрали буву z а строка выглядит вот так
adszcdewzpoytz823
то я должен вывести 8.
я вот что написал:
Program pr8;
Uses
Crt;
Var
k,c,c1 : char;
l : boolean;
Begin
writeln(' vvedite zadanyiy bykvy');
readln(k);
Writeln('Symbola');
Writeln('===========');
While true do
begin
C:=readkey;
write©;
if c<>#0 then
begin
if (k=c) then
begin
textcolor(lightblue);
c1:=c;
L:=True
end
else
begin
textcolor(white);
L:=False
end;
end
else
begin
c:=readkey;
if c=#82then
begin
textcolor(yellow);
writeln(с1);
break;
textcolor(yellow);
writeln(с1);
end
end;
end;
Readln;
End.

и тут надо кроче сделать так чтоб с1 он передавал символ после последнего повторения симвлола обозначенного переменой K , т.е который будет окрашен последним

Сообщение отредактировано: Shurik_123 -
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #15


Гуру
*****

Группа: Пользователи
Сообщений: 1 168
Пол: Мужской
Реальное имя: Сергей Андрианов

Репутация: -  28  +


Давай еще раз перечитаем условие и сравним с тем, что содержится в приведенной программе.
Вопрос первый: в условии просили раскрашивать символы разным цветом? А зачем ты это делаешь?
Вопрос второй: тебе никто не говорил, что конструкция "while true do", обязательно требующая в теле цикла "break" или "goto" является дурным стилем, и ее нужно избегать?
И, кстати, сюда же: ты в курсе, что операторы, стоящие после "break" НИКОГДА не будут выполнены? Так зачем же их писать?
Вопрос третий: ты пытаешься произвести разбор вводимого текста одновременно с его вводом. Скажи, млжно ли, еще до того, как текст введен целиком, точно определить ПОСЛЕДНЕЕ вхождение какого-либо символа? Или ты всерьез намерен написать программу, обладающую телепатическими способностями?

Давай вернемся к началу.
Ты совершенно верно указал, какую букву надо выводить в "Мама мыла раму". Попытайся теперь восстановить и описать словами алгоритм, по которому ты лично действовал, когда решал эту задачу (т.е. искал нужную букву).
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #16


Гость






1 раскрасить препод седня на паре попросил для наглядности
2 говориkb , но препод сам сказал писать через break а про то что надо до него писать то это я когда копировал часиями строки местами перепутал
а как еще можно эту чушь сделать не используя строку это условие лабы, у меня есть со стпрокой решение я его давно написал но он не принимает требует такой вариант( через char)
 К началу страницы 
+ Ответить 
сообщение
Сообщение #17


Гость






3 алгоритм такой был нашел последнюю встречающуюся а и посмотрел на следующий символ и записал его вот такой алгоритм
 К началу страницы 
+ Ответить 
сообщение
Сообщение #18


Новичок
*

Группа: Пользователи
Сообщений: 17
Пол: Мужской

Репутация: -  0  +


опять забыл под логином войти
и про програмку ничего телепатического в ней не вижу буква же известна до ввода текста просто надо в ячейку памяти записать символ который встречается после последней встречающейся на данный момент и если этот символ вводится заново, то переписать туда новый другой символ который стоит за ним и после нажатия инсерта вывести то что хранится в той ячейки как-то так

Сообщение отредактировано: Shurik_123 -
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #19


Гость






так обидно из-за этой чужи вылететь из универа((((((((, но оно так и выходит(
 К началу страницы 
+ Ответить 
сообщение
Сообщение #20


Гуру
*****

Группа: Пользователи
Сообщений: 1 168
Пол: Мужской
Реальное имя: Сергей Андрианов

Репутация: -  28  +


Странный какой-то у вас препод. Первый раз слышу, чтобы просили с break.

Так еще раз: как без телепатии, не имея ПОЛЬНОСТЬЮ текста, можно определить последнее вхождение какого-либо символа?
Например, ты ужеполучил "Мама мыла р". Как ты узнаешь, пора уже выводить следующий за "а" символ или нужно ждать очередную "а"?
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

4 страниц V  1 2 3 > » 
 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 28.03.2024 17:59
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name