Вернуться   CENTR | Slim Птаха > Всё остальное > Курилка
Войти через OpenID

В конец Ответ
 
Опции темы Опции просмотра
Старый 17.12.2008, 19:34   #1
 
Аватар для Труб

Инфо >

По умолчанию Помогите в языке программирования "Pascal".

Нужно помочь решить задачу(сессия уже на носу). Задача такова: Перетворить текст, взял каждое слово в скобки. Текст вводится с клавиатуры. Помогите кто-то, пожалуйста, реально очень нада, в долгу не останусь
 
Ответить с цитированием
Старый 17.12.2008, 20:42   #2
 
Аватар для chemax

Инфо >

По умолчанию

паскаль не изучал, да и не нужен он уже ни где)
но вот нашел код, переделать легко
данная программа ищет символ(k) в строке(s)
Program str;
Var
s:string;k:char;n,i:integer;
Begin
n:=0;
writeln('Vvedite stroku s=');
readln(s);
writeln('Vvedite simvol k=');
readln(k);
for i:=1 to length(s) do
if s[i]=k then
n:=n+1;
writeln('rezulitat=');
readln;
end.

перделать примерно по такому алгоритму

Program str;
Var
k,s:string;n,i:integer;
Begin
n:=1;
writeln('Vvedite stroku s=');
readln(s);

for i:=1 to length(s) do begin //цикл на просмотр массива с текстом

if s[i]=' ' then //если символ в тексте пробел то
k[n]:=')';
n:=n+1;
k[n]:=' ';
n:=n+1;
k[n]:='(';
n:=n+1;
else //в противном случае
k[n]:=s[i]
n:=n+1;
end;

for i:=1 to length(k) do begin //вывод данных
writeln('rezulitat=', k[i]);
readln;
end;

end.
  Ответить с цитированием
Старый 17.12.2008, 20:55   #3
 
Аватар для Slobodka

Инфо >

По умолчанию

Цитата:
Сообщение от chemax Посмотреть сообщение
У меня богатый словарный запас.
Но некоторые мысли я никак не могу выразить словами.
Хочется просто взять черенок от лопаты и отпиздить всех.
ДА я с тобой пойду только подожди я виллы возьму.
  Ответить с цитированием
Старый 17.12.2008, 20:55   #4
 
Аватар для Труб

Инфо >

По умолчанию

chemax, спасибо за труд ман, но чё то оно не пашет
  Ответить с цитированием
Старый 17.12.2008, 21:01   #5
 
Аватар для 1gr0k

Инфо >

По умолчанию

щас напишу нормальную версию, почти переделал как надо

Добавлено через 9 минут
Слушай, а тебе надо чтобы обязательно в переменную строки вписывались скобки или можно просто выводить со скобками?

Последний раз редактировалось 1gr0k; 17.12.2008 в 21:10. Причина: Добавлено сообщение
  Ответить с цитированием
Старый 17.12.2008, 21:22   #6
 
Аватар для ХУЛИ G@N

Инфо >

По умолчанию

Оффтоп
  Ответить с цитированием
Старый 17.12.2008, 21:36   #7
 
Аватар для chemax

Инфо >

По умолчанию

1gr0k, ему по моему что бы тупо выводилось) жаль что синтаксиса паскаля не знаю) думал что знаю, а выводит кучу ошибок)
  Ответить с цитированием
Старый 17.12.2008, 21:39   #8
 
Аватар для 1gr0k

Инфо >

По умолчанию

все, програмка готова.
Если интересно:
Оффтоп
  Ответить с цитированием
Старый 17.12.2008, 21:44   #9
 
Аватар для Труб

Инфо >

По умолчанию

За всё спасибо ребята
P.S:За всё спасибо сеньёриты, вот вам Гуффи из мультиков набьют на пояснице, а тех кто против нас - набьют по печени с ключицей

Последний раз редактировалось Труб; 17.12.2008 в 21:57.
  Ответить с цитированием
Старый 17.12.2008, 21:58   #10
 
Аватар для ХУЛИ G@N

Инфо >

По умолчанию

Труб, опять плагиат)))
  Ответить с цитированием
Старый 17.12.2008, 22:09   #11
 
Аватар для Труб

Инфо >

По умолчанию

Цитата:
Сообщение от ХУЛИ G@N Посмотреть сообщение
Труб, опять плагиат)))
Оффтоп
  Ответить с цитированием
Старый 18.12.2008, 10:46   #12
 
Аватар для Slobodka

Инфо >

По умолчанию

Цитата:
Сообщение от ХУЛИ G@N Посмотреть сообщение
Slobodka, тоже зацепила фраза))))))))))))))))))
Ну аяк же, будем мочить всех, спина к спине, плечо к плечу, черенок и вила взрывная волна тротила.
  Ответить с цитированием
Старый 18.12.2008, 21:17   #13
 
Аватар для ХУЛИ G@N

Инфо >

По умолчанию

Оффтоп
  Ответить с цитированием
В начало Ответ

Опции темы
Опции просмотра

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

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Trackbacks are Вкл.
Pingbacks are Вкл.
Refbacks are Выкл.






Работает на vBulletin®
Перевод: zCarot Техподдержка: Rpsl
Хостинг для больших форумов. | Социальная сеть о Хип Хопе