Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.76/25: Рейтинг темы: голосов - 25, средняя оценка - 4.76
0 / 0 / 0
Регистрация: 28.11.2011
Сообщений: 18

Удалить последнее слово строки

29.11.2011, 18:33. Показов 5262. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
№1 Ввести строку. Удалить последнее слово.

№2 Ввести строку. Найти длину самого длинного слова.

№3 Ввести строку. Заменить в ней заглавные буквы на строчные.
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
29.11.2011, 18:33
Ответы с готовыми решениями:

Ввести строку. Удалить последнее слово
Ввести строку. Удалить последнее слово.

Ввести строку. Удалить последнее слово
Ввести строку. Удалить последнее слово.

В заданной строке текста удалить первое и последнее слово
В заданной строке текста удалить первое и последнее слово.

1
Почетный модератор
 Аватар для КонецСвета
7966 / 3937 / 2464
Регистрация: 30.10.2011
Сообщений: 5,377
29.11.2011, 20:12
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

первая
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
uses crt;
var s: string;
    i,k: integer;
begin
writeln('s=');
readln(s);
while s[length(s)]=' ' do delete (s,length(s),1);
i:=length(s);
while s[i]<>' ' do
      begin
      inc(k);
      dec(i);
      end;
delete (s,length(s)-k+1,k);
writeln(s);
readkey
end.
Добавлено через 4 минуты
вторая
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
uses crt;
var s,sl: string;
    i,d,dmax: integer;
begin
write('s=');
readln(s);
s:=s+' ';
sl:='';
dmax:=0;
for i:=1 to length(s) do
    if s[i]<>' ' then sl:=sl+s[i]
       else
       begin
       d:=length(sl);
       if d>dmax then dmax:=d;
       sl:='';
       end;
writeln('Длина самого длинного слова ',dmax);
readkey
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
29.11.2011, 20:12
Помогаю со студенческими работами здесь

В заданной строке текста, удалить первое и последнее слово
В заданной строке текста, удалить первое и последнее слово

Вывести последнее слово строки
2.Написать программу, которая выводит на экран последние слово строки (в строке несколько слов через пробел)

Вывести первое и последнее слово из строки
Дана символьная строка, вывести на экран из неё только первое и последнее слово. У меня начало проги есть, как считать слова, а вот...

Написать процедуру, удаляющую из строки последнее слово
Написать процедуру, удаляющую из строки последнее слово.

Поменять местами первое и последнее слово строки
Разработать программу, которая в заданной строке, представляющей собой некоторое предложение, меняет местами первое и последнее слово...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве
8Observer8 02.02.2026
Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .
Философия технологии
iceja 01.02.2026
На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .
SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf
8Observer8 01.02.2026
Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .
SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли
8Observer8 30.01.2026
Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm
8Observer8 30.01.2026
Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .
SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 29.01.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .
Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT
bedvit 28.01.2026
Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .
SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 28.01.2026
Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru