Вопрос задан 01.05.2019 в 05:31. Предмет Информатика. Спрашивает Тасимова Азалия.

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

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
Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.

Для подсчета количества строк в текстовом файле и вывода результата на форму, можно использовать следующий код на языке программирования 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

Топ вопросов за вчера в категории Информатика

Последние заданные вопросы в категории Информатика

Задать вопрос