Question

Написать программу, которая позволяет просматривать текстовые файлы (выводит на экран содержимое файла) , например, файлы исходных программ Turbo Pascal. Имя просматриваемого файла должно вводится во время работы программы. Рекомендуемый вид экрана приведен ниже. Просмотр текстового файла. Введите полное имя файла и нажмите . -> d:\tp\pas\numb.pas

Answer 1

Var f1:text;
st:string;
begin
write ('введите имя файла ');
readln(f1);
reset (f1); { открыть файл для чтения }
while not eof (f1) do { пока не конец файла  f1}
begin
readln (f1, st);    {читаем строку из файла f1 }
writeln(st);         { выводим на экран }
end;
close (f1); { закрыть файл  для чтения}
end .

Answer 2

Для написания программы, которая позволяет просматривать текстовые файлы и выводить их содержимое на экран, вы можете использовать язык программирования Python. Вот пример программы, которая реализует эту функциональность: ```python # Открывает текстовый файл и выводит его содержимое на экран def просмотр_текстового_файла(): # Просим пользователя ввести полное имя файла имя_файла = input("Введите полное имя файла: ") try: # Открываем файл для чтения with open(имя_файла, 'r', encoding='utf-8') as файл: # Считываем содержимое файла содержимое = файл.read() # Выводим содержимое файла на экран print("Содержимое файла", имя_файла, ":\n") print(содержимое) except FileNotFoundError: print("Файл не найден.") except Exception as e: print("Произошла ошибка:", str(e)) if __name__ == "__main__": просмотр_текстового_файла() ``` Эта программа запрашивает у пользователя полное имя файла, который они хотят просмотреть. Затем она пытается открыть файл, считать его содержимое и вывести его на экран. Если файл не найден или возникла какая-либо другая ошибка, программа сообщит об этом. Вы можете скопировать этот код в файл с расширением ".py" и запустить его на своем компьютере, предварительно установив Python. После запуска, программа будет запрашивать имя файла и выводить его содержимое на экран.