Question

Дан текстовый файл. Подсчитать количество строк в данном файле. Результат вывести на форму.

Answer 1

program test;

var

source: text;
name: string;
line: string;
count: integer;

begin

write('write name of file (for example 1.txt): ');
read(name);

assign(source, name);
reset(source);

count := 0;

while not eof(source) do
begin

readln(source, line);

count := count + 1;

end;

writeln('Lines count: ', count);

close(source);

end.

Answer 2

Для подсчета количества строк в текстовом файле и вывода результата на форму, вам потребуется написать программу. Вот пример кода на языке Python, который выполняет данную задачу:

def count_lines(file_path):
    with open(file_path, 'r') as file:
        lines = file.readlines()
        return len(lines)

file_path = 'path/to/your/file.txt'  # Замените на путь к вашему файлу

line_count = count_lines(file_path)
print(f"Количество строк в файле: {line_count}")

В этом примере мы определяем функцию `count_lines`, которая принимает путь к файлу в качестве аргумента. Функция открывает файл, считывает все строки в список `lines` и возвращает количество элементов в этом списке, что соответствует количеству строк в файле.

Затем мы указываем путь к вашему файлу в переменной `file_path` и вызываем функцию `count_lines`, передавая ей этот путь. Результат подсчета сохраняется в переменной `line_count`, и мы выводим его на экран.

Вы можете использовать этот код в своей программе и адаптировать его для вывода результата на форму вместо вывода на экран.