Выберите Ваш город
X
- Абакан
- Азов
- Александров
- Алексин
- Альметьевск
- Анадырь
- Анапа
- Ангарск
- Анжеро-Судженск
- Апатиты
- Арзамас
- Армавир
- Арсеньев
- Артем
- Архангельск
- Асбест
- Астрахань
- Ачинск
- Балаково
- Балахна
- Балашиха
- Балашов
- Барнаул
- Батайск
- Белгород
- Белебей
- Белово
- Белогорск
- Белорецк
- Белореченск
- Бердск
- Березники
- Берёзовский
- Бийск
- Биробиджан
- Биробиджан
- Благовещенск
- Бор
- Борисоглебск
- Боровичи
- Братск
- Брянск
- Бугульма
- Будённовск
- Бузулук
- Буйнакск
- Великие Луки
- Великий Новгород
- Верхняя Пышма
- Видное
- Владивосток
- Владикавказ
- Владимир
- Волгоград
- Волгодонск
- Волжск
- Волжский
- Вологда
- Вольск
- Воркута
- Воронеж
- Воскресенск
- Воткинск
- Всеволожск
- Выборг
- Выкса
- Вязьма
- Гатчина
- Геленджик
- Глазов
- Горноалтайск
- Грозный
- Губкин
- Гудермес
- Гуково
- Гусь-Хрустальный
- Дербент
- Дзержинск
- Димитровград
- Дмитров
- Долгопрудный
- Домодедово
- Донской
- Дубна
- Евпатория
- Егорьевск
- Ейск
- Екатеринбург
- Елабуга
- Елец
- Ессентуки
- Железногорск
- Жигулёвск
- Жуковский
- Заречный
- Зеленогорск
- Зеленодольск
- Златоуст
- Иваново
- Ивантеевка
- Ижевск
- Избербаш
- Иркутск
- Искитим
- Ишим
- Ишимбай
- Йошкар-Ола
- Казань
- Калининград
- Калуга
- Каменск - Уральский
- Каменск-Шахтинский
- Камышин
- Канск
- Каспийск
- Кемерово
- Керчь
- Кинешма
- Кириши
- Киров
- Кирово-Чепецк
- Киселёвск
- Кисловодск
- Климовск
- Клин
- Клинцы
- Ковров
- Когалым
- Коломна
- Комсомольск-на-Амуре
- Копейск
- Королёв
- Кострома
- Котлас
- Красногорск
- Краснодар
- Краснокаменск
- Краснокамск
- Краснотурьинск
- Красноуфимск
- Красноярск
- Кропоткин
- Крымск
- Кстово
- Кузнецк
- Кумертау
- Кунгур
- Курган
- Курск
- Кызыл
- Лабинск
- Лениногорск
- Ленинск-Кузнецкий
- Лесосибирск
- Липецк
- Лиски
- Лобня
- Лысьва
- Лыткарино
- Люберцы
- Магадан
- Магнитогорск
- Майкоп
- Махачкала
- Междуреченск
- Мелеуз
- Миасс
- Минеральные воды
- Минусинск
- Михайловка
- Михайловск
- Мичуринск
- Москва
- Мурманск
- Муром
- Мытищи
- Набережные Челны
- Назарово
- Назрань
- Нальчик
- Наро-Фоминск
- Находка
- Невинномысск
- Нерюнгри
- Нефтекамск
- Нефтеюганск
- Нижневартовск
- Нижнекамск
- Нижний Новгород
- Нижний Тагил
- Новоалтайск
- Новокузнецк
- Новокуйбышевск
- Новомосковск
- Новороссийск
- Новосибирск
- Новотроицк
- Новоуральск
- Новочебоксарск
- Новочеркасск
- Новошахтинск
- Новый Уренгой
- Ногинск
- Норильск
- Ноябрьск
- Нягань
- Обнинск
- Одинцово
- Озёрск
- Октябрьский
- Омск
- Орел
- Оренбург
- Орехово-Зуево
- Орск
- П-Камчатский
- п. Косая Гора
- Павлово
- Павловский Посад
- Пенза
- Первоуральск
- Пермь
- Петрозаводск
- Подольск
- Полевской
- Прокопьевск
- Прохладный
- Псков
- Путилково
- Пушкино
- Пятигорск
- Раменское
- Ревда
- Реутов
- Ржев
- Рославль
- Россошь
- Ростов-На-Дону
- Рубцовск
- Рыбинск
- Рязань
- Салават
- Салехард
- Сальск
- Самара
- Санкт-Петербург
- Саранск
- Сарапул
- Саратов
- Саров
- Свободный
- Севастополь
- Северодвинск
- Северск
- Сергиев Посад
- Серов
- Серпухов
- Сертолово
- Сибай
- Симферополь
- Славянск-на-Кубани
- Смоленск
- Соликамск
- Солнечногорск
- Сосновый Бор
- Сочи
- Ставрополь
- Старый Оскол
- Стерлитамак
- Ступино
- Сургут
- Сызрань
- Сыктывкар
- Таганрог
- Тамбов
- Тверь
- Тимашёвск
- Тихвин
- Тихорецк
- Тобольск
- Тольятти
- Томск
- Троицк
- Туапсе
- Туймазы
- Тула
- Тюмень
- Узловая
- Улан-Удэ
- Ульяновск
- Урус-Мартан
- Усолье-Сибирское
- Уссурийск
- Усть-Илимск
- Уфа
- Ухта
- Фрязино
- Хабаровск
- Ханты-Мансийск
- Хасавюрт
- Химки
- Чайковский
- Чапаевск
- Чебоксары
- Челябинск
- Черемхово
- Череповец
- Черкесск
- Черногорск
- Чехов
- Чистополь
- Чита
- Шадринск
- Шали
- Шахты
- Шуя
- Щелкино
- Щёкино
- Электросталь
- Элиста
- Энгельс
- Южно-Сахалинск
- Юрга
- Якутск
- Ярославль
- Другой город
Мы помогаем учащимся со всей России с 2007 года!
а также 38 городов России
|
Скачать Гарантия | |
| Код работы: | 1929 | |
| Дисциплина: | Информатика | |
| Тип: | Контрольная | |
| Вуз: | АлтГТУ - посмотреть другие работы и дисциплины по этому вузу | |
| Цена: | 390 руб. | |
| Просмотров: | 2528 | |
| Выложена: | 23 июня 2011г. | |
| Содержание: |
Лабораторные работы + отчет Подробности уточняйте у менеджеров "ИнПро" |
|
| Отрывок: |
Задание: Моделирование системы банков. Процесс передачи денег, взаимодействие между различными счетами внутри банка и с другими банками. Возможность, как вручную переводить деньги, так генерация случайной цепочки передачи. Задание параметров модели. Визуализация результатов. Текст программы: // Файл fMain.cpp //--------------------------------------------------------------------------- #include #pragma hdrstop #include "fMain.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TfmMain *fmMain; //--------------------------------------------------------------------------- // Конструктор основной формы //--------------------------------------------------------------------------- __fastcall TfmMain::TfmMain(TComponent* Owner) : TForm(Owner) { // Устанавливаем наименования столбцов в списке банков sgBank->Cells[0][0] = "Номер"; sgBank->Cells[1][0] = "Наименование"; // Устанавливаем наименования столбцов в списке счетов sgAccount->Cells[0][0] = "Номер"; sgAccount->Cells[1][0] = "Остаток"; // Устанавливаем разрешения на действия SetActionState(); // Инициализируем датчик случайных чисел randomize(); // Модель пока не запущена bRunned = false; // Банков в модели нет nBankCount = 0; // Пределы суммы перевода не определены nMinTransfer = nMaxTransfer = 0; } //--------------------------------------------------------------------------- // Деструктор основной формы //--------------------------------------------------------------------------- __fastcall TfmMain::~TfmMain() { // Удаляем все объекты DeleteAll(); } //--------------------------------------------------------------------------- // Удаление созданной структуры объектов //--------------------------------------------------------------------------- void TfmMain::DeleteAll() { // Указатель на очередной элемент TBankInfo *oBankInfo; // Запрещаем обработку события sgBank->OnSelectCell = NULL; // Пока в списке банков есть элементы while (sgBank->RowCount > 2 || sgBank->Objects[0][sgBank->RowCount - 1] != NULL) { // Получаем очередной элемент oBankInfo = (TBankInfo*) sgBank->Objects[0][sgBank->RowCount - 1]; // Если указатель не 0 if (oBankInfo != NULL) // Удаляем его delete oBankInfo; // Проверяем необходимость удаления элемента из списка if (sgBank->RowCount > 2) // Удаляем строку sgBank->RowCount--; else // Очищаем указатель sgBank->Objects[0][sgBank->RowCount - 1] = NULL; } // Запрещаем обработку события sgBank->OnSelectCell = sgBankSelectCell; } //--------------------------------------------------------------------------- // Выполнение перевода //--------------------------------------------------------------------------- void TfmMain::MakeTransfer(TAccountInfo *pSrcAccountInfo, TAccountInfo *pDstAccountInfo, int pTransfer) { // Информация о переводе TTransferInfo *oTransferInfo; // Строка для вывода в лог AnsiString strMessage; // Если требуемая сумма превышает остаток - выходим if (pSrcAccountInfo->nCash < pTransfer) return ; // Выполняем перевод pSrcAccountInfo->nCash -= pTransfer; pDstAccountInfo->nCash += pTransfer; // Создаем информацию о переводе // Счет отправитель oTransferInfo = new TTransferInfo(); oTransferInfo->oSrcAccount = pSrcAccountInfo; oTransferInfo->oDstAccount = pDstAccountInfo; oTransferInfo->nAmount = pTransfer; pSrcAccountInfo->oTransferList->Add((void*)oTransferInfo); // Счет получатель oTransferInfo = new TTransferInfo(); oTransferInfo->oSrcAccount = pSrcAccountInfo; oTransferInfo->oDstAccount = pDstAccountInfo; oTransferInfo->nAmount = pTransfer; pDstAccountInfo->oTransferList->Add((void*)oTransferInfo); // Выводим сообщение в лог strMessage = pSrcAccountInfo->oBankInfo->strName + " сч. №" + pSrcAccountInfo->strNumber + " -> " + pDstAccountInfo->oBankInfo->strName + " сч. №" + pDstAccountInfo->strNumber + ": " + IntToStr(pTransfer) + " руб."; lbLog->Items->Add(strMessage); } //--------------------------------------------------------------------------- // Вывод сведений о счетах банка //--------------------------------------------------------------------------- void TfmMain::ShowAccountList() { // Информация о банке TBankInfo *oBankInfo; // Информация о счете TAccountInfo *oAccountInfo; // Очищаем список счетов sgAccount->RowCount = 2; sgAccount->Cells[0][1] = ""; sgAccount->Cells[1][1] = ""; sgAccount->Objects[0][1] = NULL; // Проверяем наличие записи if (sgBank->Row Objects[0][sgBank->Row] == NULL) // Записи нет - выходим return ; | |
|
Скачать эти материалы |
||
Не нашли подходящих материалов? Обратитесь к нам – наши тьюторы Вам помогут. Отправьте заявку прямо сейчас.
Вернуться к рубрикатору дисциплин »
Не смогли найти нужный материал? Вы можете отправить заявку или обратиться к услугам тьюторов
Вы также можете: Вернуться к рубрикатору дисциплин »