|
0 / 0 / 0
Регистрация: 22.02.2019
Сообщений: 27
|
|
Delphi 6-7 Записать массив данные только тех работников предприятия, кто на сегодняшний день уже проработал не менее 5 лет16.05.2019, 20:41. Показов 3089. Ответов 24
Метки нет (Все метки)
Дан массив данных о работающих на предприятии: фамилия, имя, отчество, адрес (улица, дом, квартира) и дата поступления на работу. Во второй массив записать данные только тех из них, кто на сегодняшний день уже проработал не менее 5 лет.
0
|
|
| 16.05.2019, 20:41 | |
|
Ответы с готовыми решениями:
24
|
|
0 / 0 / 0
Регистрация: 22.02.2019
Сообщений: 27
|
|
| 21.05.2019, 22:19 [ТС] | |
|
0
|
|
|
0 / 0 / 0
Регистрация: 22.02.2019
Сообщений: 27
|
|
| 21.05.2019, 22:29 [ТС] | |
|
вот так
0
|
|
|
Модератор
4153 / 2362 / 814
Регистрация: 15.11.2015
Сообщений: 9,496
|
||||||
| 21.05.2019, 22:34 | ||||||
|
Надо или нумерацию массива сменить на [0..n-1] или в заполнении исходного массива сделать
0
|
||||||
|
0 / 0 / 0
Регистрация: 22.02.2019
Сообщений: 27
|
|
| 21.05.2019, 23:04 [ТС] | |
|
если менять в массиве, то ошибка выходит, если нумерацию - то все остаётся так же. он просто выводит пустые данные( 3 сотрудник меньше пяти лет работает) как сделать чтобы их не было, остались только данные о сотрудниках, которые работают больше 5 лет
0
|
|
|
0 / 0 / 0
Регистрация: 22.02.2019
Сообщений: 27
|
|
| 30.05.2019, 22:05 [ТС] | |
|
у меня новая проблема))
если сохранять и загружать запись о работниках через типизированный файл, а потом уже подсчитывать годы работы, как это будет выглядеть? помогите, пожалуйста
0
|
|
| 30.05.2019, 22:05 | |
|
Во второй массив записать данные только тех из них, кто на сегодняшний день проработал не менее 5 лет Во второй файл записать данные только тех из них, кто на сегодняшний день проработал не менее 5 лет Посчитать количество проработавших на сегодняшний день не менее 3 лет
Искать еще темы с ответами Или воспользуйтесь поиском по форуму: |
|
Новые блоги и статьи
|
|||
|
Nekobox - outbounds[0].transport: unknown transport type: raw
damix 01.10.2026
Фикс ошибки
Правым кликом по серверу -> отладочная информация -> edit
Заменить "net": "raw", на "net": "tcp",
Нажать кнопку reload.
|
Программный домашний кинотеатр
russiannick 27.09.2026
Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js.
В помощники взял Яндекс-Алису.
Было создано три зала на разные интересы.
исторические и ретро
сериал Хичкок. . .
|
Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого
zorxor 21.09.2026
Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .
|
Мобильное приложение ColorStep
pavlinmavlin 17.09.2026
Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#.
Название изменил на ColorStep.
Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .
|
|
Запрет дублирования строк в табличной части
Maks 13.09.2026
Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами:
- ВидТО (СправочникСсылка. ВидыТО);
- ВидГСМ. . .
|
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр.
Jin X 06.09.2026
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр.
Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала.
Ниже прикреплён. . .
|
Программа опроса у.з. расходомера SLS-720F
Argus19 02.09.2026
Программа опроса у. з. расходомера SLS-720F
Программа опрашивает один раз в минуту три ультразвуковых расходомера SLS-720F через интерфейс RS-485 по протоколу Modbus RTU.
Опрашиваются регистры. . .
|
Hyper-V: Компьютер должен поддерживать доверенный платформенный модуль 2.0.
Maks 31.08.2026
При установке Windows 11 на виртуальную машину Hyper-V 2-го поколения вылезла такая ошибка:
Решение: в параметрах виртуальной машины, в разделе "Безопасность" (Security) активировать флаг. . .
|