Новые сообщения · Правила  
Страница 1 из 11
Модератор форума: Berestovskiy 
Форум ПРОГРАММИСТОВ » ПРОГРАММИРОВАНИЕ » Паскаль » Помогите решить задачку (PascalABC)
Помогите решить задачку
Дано слово. Переставить его s-ю букву на место k-й (s<k). при этом (S+1)-ю, (s+2)-ю, …., k-ю буквы сдвинуть влево на одну позицию.
1 | Автор: SkyRip | 2011-04-27, 10:38   |  Репутация: [ + 0 ]
Не совсем понятна вторая часть задания..
ну первая просто совсем:
Code
tempStr:=str[s];
str[s]:=str[k];
str[k]:=tempStr;

а вот со сдвигом как - что тогда поставить на место k буквы и куда едть s+1..


If you can't make it GOOD make it LOOK GOOD. B.Gates
2 | Автор: DoVe | 2011-04-27, 12:19   |  Репутация: [ + 48 ]
Мне как препод сказал, там должен быть сдвиг в лево, т.е. пример:
программа - водим 2 и выбераем 5 получится вот так - прогроамма
Конечно если правельно написал)
3 | Автор: SkyRip | 2011-04-27, 12:24   |  Репутация: [ + 0 ]
еще хуже стало))))
а пример ввода так вообще не понятный


If you can't make it GOOD make it LOOK GOOD. B.Gates
4 | Автор: DoVe | 2011-04-27, 12:54   |  Репутация: [ + 48 ]
Так я тоже сегодня с сума сходил, еще объяснили не так как надо)
там ввод же идет сначало 's' потом 'k' ну и как получается (s<k), выбираем букву любую из слова (слово любое('s')), потом выбираем куда его хотим поставить('k'), и прг должна переставить букву в слове, типо чето такое....
Ой конечно бред)))
5 | Автор: SkyRip | 2011-04-27, 13:01 | Изменено: SkyRip - Ср, 2011-04-27, 13:05   |  Репутация: [ + 0 ]
Quote (SkyRip)
там ввод же идет сначало 's' потом 'k' ну и как получается (s<k), выбираем букву любую из слова (слово любое('s')), потом выбираем куда его хотим поставить('k'), и прг должна переставить букву в слове, типо чето такое....

ну это я еще в первом посте написал.
а со сдвигом че не понятно


If you can't make it GOOD make it LOOK GOOD. B.Gates
6 | Автор: DoVe | 2011-04-27, 14:04   |  Репутация: [ + 48 ]


If you can't make it GOOD make it LOOK GOOD. B.Gates
6 | Автор: DoVe | 2011-04-27, 14:04   |  Репутация: [ + 48 ]
Ясно ну хоть спс на этом, буду дальше сам))
7 | Автор: SkyRip | 2011-04-27, 15:01   |  Репутация: [ + 0 ]
Вот код, насколько я понял - работает по условию:

var
a:string;
i,s,k:byte;q:char;
begin
readln(s,k);
readln(a);
q:=a[k];a[k]:=a[s];a[s]:=q;
for i:=s to k-1 do begin
a[i]:=a[i+1];write(a[i]);end;
end.

По-моему - всё, так как в условии..

"Спасибо" принимается повышением репутации ( Зелёный плюсик:) ). Спасибо:)


Нужна помощь? Сюда: vkontakte.ru/berestovskiy
8 | Автор: Berestovskiy | 2011-04-27, 19:43   |  Репутация: [ + 211 ]
может и так, это получается простой сдвиг на один элемент, еще на концах потерялись значения. но так точно не получиться
Quote (SkyRip)
т.е. пример:
программа - водим 2 и выбераем 5 получится вот так - прогроамма


If you can't make it GOOD make it LOOK GOOD. B.Gates
9 | Автор: DoVe | 2011-04-27, 19:47   |  Репутация: [ + 48 ]
Ну так, сдвиг, тоесть первый элемент удаляем получается....ну этона сколько я понял условие..

Нужна помощь? Сюда: vkontakte.ru/berestovskiy
10 | Автор: Berestovskiy | 2011-04-27, 19:52   |  Репутация: [ + 211 ]
может... не внятно как то поставленно

If you can't make it GOOD make it LOOK GOOD. B.Gates
11 | Автор: DoVe | 2011-04-27, 20:00   |  Репутация: [ + 48 ]
SkyRip, если препод отвергнет то скажи мол пусть толи более нормально объяснит в чём заключается задача толи хотя-бы пример приведёт ввода и вывода, по которому, желательно можно было бы понять в чём заключается вся суть:)

Нужна помощь? Сюда: vkontakte.ru/berestovskiy
12 | Автор: Berestovskiy | 2011-04-27, 20:12   |  Репутация: [ + 211 ]


Нужна помощь? Сюда: vkontakte.ru/berestovskiy
12 | Автор: Berestovskiy | 2011-04-27, 20:12   |  Репутация: [ + 211 ]
Форум ПРОГРАММИСТОВ » ПРОГРАММИРОВАНИЕ » Паскаль » Помогите решить задачку (PascalABC)
Страница 1 из 11
Поиск: