Дано файл F, компоненты которого являются целыми числами. записать в файл G все четные числа файла F, а в файл H - все

@Bombur2 · Регистрация: 02.04.2019

Студворк — интернет-сервис помощи студентам

Дано файл F, компоненты которого являются целыми числами. записать в
файл G все четные числа файла F, а в файл H - все нечетные. порядок
следования чисел сохраняется.

@Sun Serega · 24.04.2019, 11:19

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
uses BlockFileOfT;
 
begin
  var F := new BlockFileOf<integer>('F'); F.Reset;
  var G := new BlockFileOf<integer>('G'); G.Rewrite;
  var H := new BlockFileOf<integer>('H'); H.Rewrite;
  
  var all_elms := F.ToSeqBlocks.SelectMany(a->a);
  
  G.Write(all_elms.Where(i->i.IsEver));
  
  F.Pos := 0;
  H.Write(all_elms.Where(i->i.IsOdd));
  
end.

@Bombur2 · 24.04.2019, 11:22 **[ТС]**

Расскажите пожалуйста как она работает ? Что выполняет какое действие ? Спасибо .

@Sun Serega · 24.04.2019, 11:30

Запросто. BlockFileOfT я сам писал, так что даже знаю что справка с необходимыми азами лежит у вас по этому пути:
C:\PABCWork.NET\Samples\BlockFileOfT\Справка.html
И рядом с ней, в той же папке, примеры.

Как прочитаете (не обязательно всё сразу понять, главное пробежаться и понять основные моменты):
1. Пробуйте наводить мышку на слова которые непонятны. Я сделал так что у всего показывает подробные описания.
2. Если прочтение справки и чтение описание не помогло - спрашивайте тут, на всё отвечу в подробностях. А возможно даже и улучшу описание, если что то плохо объясняется.

Только, лучше обновитесь перед тем как начинать что то с ними делать, а то я недавно исправил серьёзную проблему в BlockFileOfT.

Новые блоги и статьи Все статьи Все блоги /
И решил я переделать этот ноут в машину для распределенных вычислений Programma_Boinc 09.11.2025 И решил я переделать этот ноут в машину для распределенных вычислений Всем привет. А вот мой компьютер, переделанный из ноутбука. Был у меня ноут асус 2011 года. Со временем корпус превратился. . .	Мысли в слух kumehtar 07.11.2025 Заметил среди людей, что по-настоящему верная дружба бывает между теми, с кем нечего делить.	Новая зверюга volvo 07.11.2025 Подарок на Хеллоуин, и теперь у нас кроме Tuxedo Cat есть еще и щенок далматинца: Хочу еще Симбу взять, очень нравится. . .	Инференс ML моделей в Java: TensorFlow, DL4J и DJL Javaican 05.11.2025 Python захватил мир машинного обучения - это факт. Но когда дело доходит до продакшена, ситуация не так однозначна. Помню проект в крупном банке три года назад: команда data science натренировала. . .	Mapped types (отображённые типы) в TypeScript Reangularity 03.11.2025 Mapped types работают как конвейер - берут существующую структуру и производят новую по заданным правилам. Меняют модификаторы свойств, трансформируют значения, фильтруют ключи. Один раз описал. . .
Адаптивная случайность в Unity: динамические вероятности для улучшения игрового дизайна GameUnited 02.11.2025 Мой знакомый геймдизайнер потерял двадцать процентов активной аудитории за неделю. А виновником оказался обычный генератор псевдослучайных чисел. Казалось бы - добавил в карточную игру случайное. . .	Протоколы в Python py-thonny 31.10.2025 Традиционная утиная типизация работает просто: попробовал вызвать метод, получилось - отлично, не получилось - упал с ошибкой в рантайме. Протоколы добавляют сюда проверку на этапе статического. . .	C++26: Read-copy-update (RCU) bytestream 30.10.2025 Прошло почти двадцать лет с тех пор, как производители процессоров отказались от гонки мегагерц и перешли на многоядерность. И знаете что? Мы до сих пор спотыкаемся о те же грабли. Каждый раз, когда. . .	Изображения webp на старых x32 ОС Windows XP и Windows 7 Argus19 30.10.2025 Изображения webp на старых x32 ОС Windows XP и Windows 7 Чтобы решить задачу, использовал интернет: поисковики Google и Yandex, а также подсказки Deep Seek. Как оказалось, чтобы создать. . .	Passkey в ASP.NET Core identity stackOverflow 29.10.2025 Пароли мертвы. Нет, серьезно - я повторяю это уже лет пять, но теперь впервые за это время чувствую, что это не просто красивые слова. В . NET 10 команда Microsoft внедрила поддержку Passkey прямо в. . .

@Bombur2 0 / 0 / 0 Регистрация: 02.04.2019 Сообщений: 66

	Дано файл F, компоненты которого являются целыми числами. записать в файл G все четные числа файла F, а в файл H - все 24.04.2019, 10:32. Показов 1752. Ответов 3 Метки нет (Все метки) Дано файл F, компоненты которого являются целыми числами. записать в файл G все четные числа файла F, а в файл H - все нечетные. порядок следования чисел сохраняется. 0

@Bombur2 0 / 0 / 0 Регистрация: 02.04.2019 Сообщений: 66
	24.04.2019, 11:22 [ТС]
	Расскажите пожалуйста как она работает ? Что выполняет какое действие ? Спасибо . 0

@Sun Serega 2355 / 1458 / 526 Регистрация: 07.04.2017 Сообщений: 4,798
	24.04.2019, 11:30
	Запросто. BlockFileOfT я сам писал, так что даже знаю что справка с необходимыми азами лежит у вас по этому пути: `C:\PABCWork.NET\Samples\BlockFileOfT\Справка.html` И рядом с ней, в той же папке, примеры. Как прочитаете (не обязательно всё сразу понять, главное пробежаться и понять основные моменты): 1. Пробуйте наводить мышку на слова которые непонятны. Я сделал так что у всего показывает подробные описания. 2. Если прочтение справки и чтение описание не помогло - спрашивайте тут, на всё отвечу в подробностях. А возможно даже и улучшу описание, если что то плохо объясняется. Только, лучше обновитесь перед тем как начинать что то с ними делать, а то я недавно исправил серьёзную проблему в BlockFileOfT. 0

Опции темы