 
Дан текстовый файл. Подсчитать количество строк в данном файле. Результат вывести на форму.
 0
        0
         0
        0
    Ответы на вопрос
 
        
program z1;
var k:integer;
s:string;
f:text;
begin
assign(f,'input.pas');
reset(f);
k:=0;
while not eof(f) do begin
readln(f,s); k:=k+1;end;
writeln('k=',k);
close(f);
end.
Связать логический файл f с физическим файлом input.pas;Открыть файл для чтения;Организовать считывание данных из файла построчно (readln(f,s), где s-переменная типа string), насчитывая на каждом шаге считывания значение переменной-счетчика k;Вывести на экран значение переменной-счетчика;Закрыть файл.
 0
                    0
                     0
                    0
                 
            Для подсчета количества строк в текстовом файле и вывода результата на форму, можно использовать следующий код на языке программирования Python:
```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` и возвращает количество элементов в этом списке, то есть количество строк в файле.
Затем, вы можете вызвать функцию `count_lines` с указанием пути к вашему файлу и сохранить результат в переменную `line_count`. Далее, вы можете вывести количество строк на форму или сделать с ним что-то еще, в зависимости от вашей конкретной задачи.
Примечание: Убедитесь, что вы заменили `'path/to/your/file.txt'` на фактический путь к вашему файлу.
Источники: -
 0
                    0
                     0
                    0
                Топ вопросов за вчера в категории Информатика
Последние заданные вопросы в категории Информатика
- 
			Математика 
- 
			Литература 
- 
			Алгебра 
- 
			Русский язык 
- 
			Геометрия 
- 
			Английский язык 
- 
			Химия 
- 
			Физика 
- 
			Биология 
- 
			Другие предметы 
- 
			История 
- 
			Обществознание 
- 
			Окружающий мир 
- 
			География 
- 
			Українська мова 
- 
			Информатика 
- 
			Українська література 
- 
			Қазақ тiлi 
- 
			Экономика 
- 
			Музыка 
- 
			Право 
- 
			Беларуская мова 
- 
			Французский язык 
- 
			Немецкий язык 
- 
			МХК 
- 
			ОБЖ 
- 
			Психология 
- 
			Физкультура и спорт 
- 
			Астрономия 
- 
			Кыргыз тили 
- 
			Оʻzbek tili 
 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			