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

Просклонять слово "бочка" в зависимости от заданного N

17.02.2015, 20:09. Показов 4849. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
сделать в паскале
Бизнесмен Василий после прочтения известной книги решил открыть новый бизнес – отгружать апельсины бочками. Партнерам важно знать сколько именно бочек апельсинов отгружается каждый день.

Мобильный телефон Василия поддерживает только транслит, поэтому он передает сообщения вида "N bochek" . Например, "3 bochki" или "1 bochka" .

Напишите программу, которая выбирает правильное слово (из "bochka" , "bochek" , "bochki" ) в зависимости от N.
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
17.02.2015, 20:09
Ответы с готовыми решениями:

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

Просклонять слово "Рублей" в зависимости от суммы
Здравствуйте! Помогите, пожалуйста, решить задачку. Написать программу, которая после введенного с клавиатуры числа (в диапазоне от 1 до...

Правильно просклонять слово программист до 1000
Разработать алгоритм позволяющий правильно просклонять слово программист до 1000

3
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
17.02.2015, 21:17
Цитата Сообщение от Ангелинкаа Посмотреть сообщение
в зависимости от N.
А чему равно максимальное значение N?
0
0 / 0 / 0
Регистрация: 17.02.2015
Сообщений: 10
17.02.2015, 21:19  [ТС]
Не известно
0
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
17.02.2015, 21:26
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

А да, это не обязательно, спутал с записью чисел словами.

Добавлено через 4 минуты
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
var n:integer;
begin
write('Введите n=');
readln(n);
case  n mod 100 of
11..19:write(n,' bochek');
else
 case n mod 10 of
 1:write(n,' bochka');
 2..4:write(n,' bochki');
 else  write(n,' bochek')
 end;
end;
end.
2
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
17.02.2015, 21:26
Помогаю со студенческими работами здесь

Организовать поиск по сайту PHP&MySQL. Как просклонять слово?
Пример: При запросе "медведь", пользователю надо выдать "медведи", "медведя"..."медвежонок"..."медвеженку". Ещё...

В зависимости от значения целого числа К просклонять фразу: "К файл (файла, файлов)".
господа! киньте плиз функцию, штоб писало скока файлов, тобишь интерисуют слова: "файл", "файла", "файлов"...

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

Просклонять слово "Час"
Мое задание: Просклонять слово "Час" в зависимости от введенного времени на часах. Например: 1 час; 2 часа; 5 часов...

Просклонять слово "Час"
Просклонять слово "Час" в зависимости от введенного времени на часах. Например: 1 час; 2 часа; 5 часов; ...


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
Доступность команды формы по условию
Maks 07.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: сделать доступной кнопку (команда формы "ЗавершитьСписание") при. . .
Уведомление о неверно выбранном значении справочника
Maks 06.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "НарядПутевка", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если в документе выбран неверный склад. . .
Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt
8Observer8 05.04.2026
Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .
AkelPad-скрипты, структуры, и немного лирики..
testuser2 05.04.2026
Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .
Отображение реквизитов в документе по условию и контроль их заполнения
Maks 04.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .
Фото всей Земли с борта корабля Orion миссии Artemis II
kumehtar 04.04.2026
Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .
Вывод диалогового окна перед закрытием, если документ не проведён
Maks 04.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .
Программный контроль заполнения реквизитов табличной части документа
Maks 02.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: 1. Реализовать контроль заполнения реквизита. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru