|
kentttt
|
|
Сравнение массива с файлом, внесите пару строк26.12.2010, 20:01. Показов 554. Ответов 0
Метки нет (Все метки)
Вводится одномерный массив, его числа сравниваются со значением текстового файла и на экран выводятся совпавшие числа. Но суть в том чтобы программа совпадающие числа выводила один раз, а не столько сколько их в файле. К примеру в файле числа: 1 2 3 4 5 В массив введём: 1 2 2 0 2 Результат программа выдаёт: 1 2 2 2 а нужно чтоб выдала один раз число: 1 2 Исправьте пожалуйста программу: uses crt; var f:text; m:array[1..5] of integer; i,ch:integer; begin clrscr; for i:=1 to 5 do begin writeln('Vvedite ',i,' chislo massiva'); readln(m[i]); end; Assign(f,'3.txt'); reset(f); writeln; write('Te chisla kotorie ravnbI - '); while not eof(f) do begin read(f,ch); for i:=1 to 5 do begin if ch=m[i] then write(ch:5); end; end; readln; end. |
|
(| 26.12.2010, 20:01 | |
|
Ответы с готовыми решениями:
0
Сравнение строк txt файлом
|
| 26.12.2010, 20:01 | |
|
Помогаю со студенческими работами здесь
1
Сравнение строк двумерного массива
Сравнение двумерного массива созданного из двух строк Считывание txt, разбиение строк, создание массива из результата, сравнение Функции работы со строками символов: определение размера строки, копирование строк, добавление строк, сравнение строк Искать еще темы с ответами Или воспользуйтесь поиском по форуму: |
|
Новые блоги и статьи
|
|||
|
Программный контроль заполнения реквизита табличной части документа
Maks 02.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2.
Задача: реализовать контроль заполнения реквизита "ПричинаСписания". . .
|
wmic не является внутренней или внешней командой
Maks 02.04.2026
Решение:
DISM / Online / Add-Capability / CapabilityName:WMIC~~~~
Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/
|
Программная установка даты и запрет ее изменения
Maks 02.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2.
Задача: при создании документов установить период списания автоматически. . .
|
Вывод данных в справочнике через динамический список
Maks 01.04.2026
Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2.
Задача: вывести данные из ТЧ нетипового документа. . .
|
|
Программное заполнения текстового поля в реквизите формы документа
Maks 01.04.2026
Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению.
На форме документа создается. . .
|
К слову об оптимизации
kumehtar 01.04.2026
Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .
|
Идея фильтра интернета (сервер = слой+фильтр).
Hrethgir 31.03.2026
Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .
|
Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда
anaschu 31.03.2026
В прикрепленном документе раздумья о том, как можно поменять модель в будущем
|