Форум программистов, компьютерный форум, киберфорум
Visual Basic
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.54/13: Рейтинг темы: голосов - 13, средняя оценка - 4.54
0 / 0 / 0
Регистрация: 02.06.2013
Сообщений: 12

Определить на сколько процентов изменились цены на товары в каждом магазине

02.06.2013, 22:36. Показов 2466. Ответов 5
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Народ,помогите пожалуйста!!!!!!Срочно!!!!Заранее спасибо!!!!
1. Один и тот же товар в одном из магазинов райпо стоил S1 руб/шт, а во втором-S2 руб/шт. Во ибежание конкуренции директора магазинов договорились о единой цене на товар, равной S руб/шт (S1<S<S2). Определить насколько процентов изменились цены на товары в каждом магазине.
2. Сможет ли шар радиуса R пройти в ромбообразное отверстие со стороной P и острым углом Q?
3. Задан массив. Определить, входит ли в него последовательность подряд идущих значений элементов 1,2,3. Если да, то с какой позиции.
4. Дана матрица размерности nxm. Найти в ней максимальные элементы и обменять их местами.
5. Составить программу для перевода арабских чисел в римские и для обратной операции. Например, 255=CCLV=сто+сто+пятьдесят+пять. Замечание. Подобными алгоритмами перевода чисел из одной системы в другую мы пользуемся по нескольку раз на дню, когда ведем денежные расчеты. Сумма денег- это арабское число, которому соответствует определенный набор банкнот и монет (аналоги римских цифр).

 Комментарий модератора 
Не более 1 вопроса - на 1 тему. Остальные задания придется перепечатать.
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
02.06.2013, 22:36
Ответы с готовыми решениями:

Определить какие товары продаются в каждом магазине; какие товары продают только в одном магазине
Помогите решить ребус! 1. В трех магазинах продают некоторые виды товаров из имеющегося списка. Определить какие товары продаются в...

Опишите используя запись товар( наименование, старая цена, новая цена). Определить на какие товары повысятся цены и на сколько процентов
Опишите используя запись товар( наименование, старая цена, новая цена). Определить на какие товары повысятся цены и на сколько процентов.

Составить программу, определяющую, на какие товары повысятся цены и на сколько процентов
При решении задачи обязательно подключить модуль uses CRT и использовать основные процедуры и функции модуля CRT задача с двумя...

5
6644 / 1511 / 169
Регистрация: 09.01.2010
Сообщений: 4,298
02.06.2013, 23:11
Цитата Сообщение от nastya26 Посмотреть сообщение
Во ибежание конкуренции директора магазинов договорились
блин, и тут ...
0
02.06.2013, 23:12

Не по теме:

А где еще? :)

0
6644 / 1511 / 169
Регистрация: 09.01.2010
Сообщений: 4,298
02.06.2013, 23:18

Не по теме:

да сплошь и рядом



Добавлено через 3 минуты

Не по теме:

хотя да, так договариваться не могут, тут возможен 1 вариант S=S2 ( и при условии S2>S1)

0
Эксперт WindowsАвтор FAQ
 Аватар для Dragokas
18030 / 7733 / 892
Регистрация: 25.12.2011
Сообщений: 11,502
Записей в блоге: 16
02.06.2013, 23:22
Лучший ответ Сообщение было отмечено The trick как решение

Решение

Не по теме:

gaw, :swoon:



Visual Basic
1
2
3
Function Проценты (Старая_Цена, Новая_Цена) as Double
    Проценты = ABS(Новая_Цена - Старая_Цена) / Старая_Цена * 100
end function
0
0 / 0 / 0
Регистрация: 02.06.2013
Сообщений: 12
03.06.2013, 08:51  [ТС]
спасибо! а можно полное решение увидеть?
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
03.06.2013, 08:51
Помогаю со студенческими работами здесь

Уценить на 20% все товары, которые дороже заданной цены; вывести товары в порядке возрастания розничной цены
Ввести 5 структур типа &quot;Товары на складе&quot; с полями: название товара; закупочная цена; товарная наценка. Написать программу, выполняющую...

Множества: определить товары, которые есть во всех \ хотя бы в одном магазине
Здравствуйте, форумчане. У меня возникла проблема: Я совсем зеленый еще в паскале, а у меня на руках лежит лабораторная работа, которую мне...

Цены на два виды товаров выросли на р процентов. Вывести старые и новые цены
Помогите

Цены на два вида товаров возросли на P процентов . Вывести старые и новые цены
Цены на два вида товаров возросли на P процентов . Вывести старые и новые цены.

Определить среднюю цену товара в каждом магазине
Цена каждого из n товаров в каждом из m магазинах. Определить среднюю цену товара в каждом магазине.


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

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Новые блоги и статьи
http://iceja.net/ математические сервисы
iceja 20.01.2026
Обновила свой сайт http:/ / iceja. net/ , приделала Fast Fourier Transform экстраполяцию сигналов. Однако предсказывает далеко не каждый сигнал (см ограничения http:/ / iceja. net/ fourier/ docs ). Также. . .
http://iceja.net/ сервер решения полиномов
iceja 18.01.2026
Выкатила http:/ / iceja. net/ сервер решения полиномов (находит действительные корни полиномов методом Штурма). На сайте документация по API, но скажу прямо VPS слабенький и 200 000 полиномов. . .
Расчёт переходных процессов в цепи постоянного тока
igorrr37 16.01.2026
/ * Дана цепь постоянного тока с R, L, C, k(ключ), U, E, J. Программа составляет систему уравнений по 1 и 2 законам Кирхгофа, решает её и находит переходные токи и напряжения на элементах схемы. . . .
Восстановить юзерскрипты Greasemonkey из бэкапа браузера
damix 15.01.2026
Если восстановить из бэкапа профиль Firefox после переустановки винды, то список юзерскриптов в Greasemonkey будет пустым. Но восстановить их можно так. Для этого понадобится консольная утилита. . .
Сукцессия микоризы: основная теория в виде двух уравнений.
anaschu 11.01.2026
https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/
WordPad для Windows 11
Jel 10.01.2026
WordPad для Windows 11 — это приложение, которое восстанавливает классический текстовый редактор WordPad в операционной системе Windows 11. После того как Microsoft исключила WordPad из. . .
Classic Notepad for Windows 11
Jel 10.01.2026
Old Classic Notepad for Windows 11 Приложение для Windows 11, позволяющее пользователям вернуть классическую версию текстового редактора «Блокнот» из Windows 10. Программа предоставляет более. . .
Почему дизайн решает?
Neotwalker 09.01.2026
В современном мире, где конкуренция за внимание потребителя достигла пика, дизайн становится мощным инструментом для успеха бренда. Это не просто красивый внешний вид продукта или сайта — это. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru