• B правой части каждого сообщения есть стрелки и . Не стесняйтесь оценивать ответы. Чтобы автору вопроса закрыть свой тикет, надо выбрать лучший ответ. Просто нажмите значок в правой части сообщения.

  • Курсы Академии Кодебай, стартующие в мае - июне, от команды The Codeby

    1. Цифровая криминалистика и реагирование на инциденты
    2. ОС Linux (DFIR) Старт: 16 мая
    3. Анализ фишинговых атак Старт: 16 мая Устройства для тестирования на проникновение Старт: 16 мая

    Скидки до 10%

    Полный список ближайших курсов ...

Делфи

  • Автор темы sani9989
  • Дата начала
S

sani9989

1.Дан файл f, содержащий различные даты. каждая дата – это число, месяц и год. Найти самую позднюю дату.2.Дан файл f, компоненты которого являются действительными числами. Найти разность первой и последней компонент файла.3.Дан текстовый файл f, содержащий программу на языке паскаль. Проверить эту программу на соответствие числа открывающихся и закрывающихся круглых скобок. считать, что каждый оператор программы занимает не более одной строки файла f.
 
C

Cambur

используй TStrings или TStringList
var ss : TStrings;
begin
ss := TStringList.Create;
....
ss.LoadFromFile(твой файл);

количество строк будет ss.ItemIndex
чтобы просмотреть все строки в цикле
for i := 0 to ss.ItemIndex -1 do
...
сторка - ss.Items.Strings

заметь, что те же ...строки есть и в TMemo - можешь грузить файл в окно TMemo
только там они не items а lines, что не столь важно... memo1.Lines.LoadFromFile();
 
Мы в соцсетях:

Обучение наступательной кибербезопасности в игровой форме. Начать игру!