Помогите пожалуйста с задачей

stervoshka · 16.12.2010, 03:57

Помогите пожалуйста...Очень нужно решить задачку в Паскале...Получаю сейчас второе заочное и задали задачку...А я уже так давно их не решала, боюсь что не справлюсь или напартачу так, что задачу не примут...

Нужно составить программу, выводящую строку "первое слово лесенкой", а остальные в строку...Например, Фамилия под углом лесенкой, имя отчество в строку...В программе должен быть обеспечен ввод строки и вывод на экран результатов. По окончании каждого расчета и просмотра результатов предусмотреть очистку экрана,возобновление расчетов с другой строкой("бесконечный цикл") или выход из программы.

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

AlexZir · 16.12.2010, 04:43

Для решения нужно использовать расширенный набор строковых функций из библиотеки crt.
Если никто не напишет - будет вам листинг.

Vladimir_S · 16.12.2010, 09:50

Цитата:

Сообщение от AlexZir

Для решения нужно использовать расширенный набор строковых функций из библиотеки crt.
Если никто не напишет - будет вам листинг.

Ну не знаю - если я правильно понял задание насчет "лесенки", то вроде можно и по-простому, по рабоче-крестьянски:

Код:

Uses CRT;
VAR
 S:String;
 i:Byte;
 j:Integer;
BEGIN
 Repeat
  ClrScr;
  WriteLn('Enter the string:');
  ReadLn(S);
  If S<>'' then
   begin
    i:=1;
    repeat
     for j:=1 to (i-1) do
      Write(' ');
     WriteLn(S[i]);
     Inc(i);
    until S[i]=' ';
    repeat
     Inc(i);
    until S[i]<>' ';
    for j:=1 to i do
     Write(' ');
    for j:=i to Length(S) do
     Write(S[j]);
    WriteLn;
    ReadLn;
   end;
 Until S='';
END.

Программа выходит из цикла при вводе пустой строки.

stervoshka · 27.12.2010, 02:13

Спасибо)))
Но почему-то у меня программа выводит просто слово в столбик а потом повторяет его
Я например пишу Иванов Иван Иванович и программа мне выводит Иванов в столбик а потом повторяет... А как сделать что бы Иванов было диагонально т.е лесницей каждая буква как по ступеням а потом писалось два остальных слова в строчку??
Заранее спасибо)))

Vladimir_S · 27.12.2010, 09:43

Цитата:

Сообщение от stervoshka

Спасибо)))
Но почему-то у меня программа выводит просто слово в столбик а потом повторяет его
Я например пишу Иванов Иван Иванович и программа мне выводит Иванов в столбик а потом повторяет... А как сделать что бы Иванов было диагонально т.е лесницей каждая буква как по ступеням а потом писалось два остальных слова в строчку??
Заранее спасибо)))

Вы знаете - я просто в недоумении... Сейчас запустил, и вот что у меня:

Даже и не знаю, чем помочь - тут явные "задвиги" транслятора.
P.S. Впрочем, подозреваю, что дело тут не в трансляторе, а в том, что Вы пытаетесь смотреть результат каким-то вьюером, который попросту автоматически срубает пробелы в начале строки. А вот насчет того, что "повторяет" - тут совсем идей нет.
На всякий случай - поясню алгоритм работы программы.
1. Вводится строка. Если она пустая - программа прерывается, если нет - едет дальше.
2. Символы строки, расположенные до первого пробела, выводятся так:
а) каждый - в своей строке;
б) перед выводом очередного символа на экран выводятся пробелы в количестве (номер символа)-1.
3. Символы строки, стоящие после первого пробела, выводятся в одну строку подряд, начиная с позиции конца "лесенки" плюс 1.
Вот, собственно, и всё. Примитивно - даже и ошибкам-то взяться неоткуда!

stervoshka · 27.12.2010, 22:36

Ясно..Попробую еще раз...может действительно что-то с программой...Еще раз спасибо))))

16.12.2010, 03:57	#1 (permalink)
stervoshka Новичок Регистрация: 16.12.2010 Сообщений: 3 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	Помогите пожалуйста с задачей Помогите пожалуйста...Очень нужно решить задачку в Паскале...Получаю сейчас второе заочное и задали задачку...А я уже так давно их не решала, боюсь что не справлюсь или напартачу так, что задачу не примут... Нужно составить программу, выводящую строку "первое слово лесенкой", а остальные в строку...Например, Фамилия под углом лесенкой, имя отчество в строку...В программе должен быть обеспечен ввод строки и вывод на экран результатов. По окончании каждого расчета и просмотра результатов предусмотреть очистку экрана,возобновление расчетов с другой строкой("бесконечный цикл") или выход из программы. Вот такая задача...Очень прошу помочь решить...ну или может вы знаете, где решались похожие задачи...что бы хотя бы посмотреть...а то уже давно весь паскаль из головы вылетел

16.12.2010, 04:43	#2 (permalink)
AlexZir support Регистрация: 19.08.2007 Адрес: Зея Сообщений: 15,797 Записей в дневнике: 71 Сказал(а) спасибо: 166 Поблагодарили 203 раз(а) в 86 сообщениях Репутация: 75760	Для решения нужно использовать расширенный набор строковых функций из библиотеки crt. Если никто не напишет - будет вам листинг. __________________ Убить всех человеков!

16.12.2010, 03:57
Helpmaster Member Регистрация: 08.03.2016 Сообщений: 0	Данные темы являются схожими с вашей темой Помогите пожалуйста с задачей по C++ Помогите с задачей на php-код Помогите с задачей на С++ очень срочно нужно...пожалуйста Помогите с задачей. Ряд Тейлора.

27.12.2010, 02:13	#4 (permalink)
stervoshka Новичок Регистрация: 16.12.2010 Сообщений: 3 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	Спасибо))) Но почему-то у меня программа выводит просто слово в столбик а потом повторяет его Я например пишу Иванов Иван Иванович и программа мне выводит Иванов в столбик а потом повторяет... А как сделать что бы Иванов было диагонально т.е лесницей каждая буква как по ступеням а потом писалось два остальных слова в строчку?? Заранее спасибо)))

Ads
Яндекс Member Регистрация: 31.10.2006 Сообщений: 40200 Записей в дневнике: 0 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 55070

27.12.2010, 22:36	#6 (permalink)
stervoshka Новичок Регистрация: 16.12.2010 Сообщений: 3 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	Ясно..Попробую еще раз...может действительно что-то с программой...Еще раз спасибо))))