|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
09.05.2007, 00:38 | #1 |
Новичок
Джуниор
Регистрация: 09.05.2007
Сообщений: 1
|
Паскаль. Списки
Народ, помогите плиз решить задачу!!!
В бухгалтерии предприятия имеется ведомость сумм заработанных сотрудниками в течение месяца (суммы исчисляются в тыс. руб.). Подсчитать общий заработок каждого сотрудника за весь месяц. То есть вводишь с клавиатуры фамилия сотрудников, затем их зарплаты. И если встречаются несколько одинаковых фамилий, то их зарплаты надо суммировать. Как вот в этом примере: Исходная ведомость: Фамилия Заработок Непейвода 800 Тарбеев 300 Тарбеев 425 Непейвода 250 Лесков 850 Тарбеев 100 Итоговая ведомость за месяц: Фамилия Заработок Непейвода 1050 Тарбеев 825 Лесков 850 Код:
|
10.05.2007, 09:40 | #2 |
Павел Сергеевич
Форумчанин
Регистрация: 05.11.2006
Сообщений: 665
|
Для начала посоветую создать не статический, а динамический массив или set и производить чтение до опеределенного момента (например, пока пользователь не введет 'exit').
Вот примерный алгоритм: 1. Читаем фамилию 2. если зарезервированное слово, идем к 6 3. Читаем сумму 4. Увеличиваем счетчик количества записей 5. идем к 1 6. С первой записи, до счетчика: Ищем в массиве фамилию, если есть, то: прибавляем к имеющейся сумме текущую иначе: добавляем в массив фамилию и сумму. Алгоритм есть.
Познавая других, мы познаем себя.
С'est la vie... |
11.05.2007, 14:22 | #3 |
Пользователь
Регистрация: 02.05.2007
Сообщений: 53
|
В своём решении я указал кол-во сотрудников, но можете переделать.
вот решение: Код:
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
паскаль динамич. списки...помогите кто чем может) | Никита35 | Помощь студентам | 16 | 09.05.2008 16:41 |
Срочно,пожалуйста...паскаль динамич. списки | Никита35 | Помощь студентам | 2 | 07.05.2008 22:48 |
Паскаль,списки.Срочно,пожалуйста... | Никита35 | Помощь студентам | 7 | 06.05.2008 11:25 |
Списки. Паскаль | Demyrg | Помощь студентам | 2 | 10.04.2008 08:20 |