Работа с текстовыми файлами

[Vlad-Belarus]

Надо написать программу которая в начале выводит запрос на ввод адреса (например D:\people\...) а потом в логический тип boolean выводит True если таковой файл есть, иначе False.

[Serge_Bliznykov]

var fn : string;
  is_file_exist : boolean;
begin
  WriteLn('Укажите имя файла: ');
  ReadLn(fn);
  is_file_exist := FileExists(fn);
  WriteLn('файл ',fn,' логическая переменная = ',is_file_exist)
end.

[Vlad-Belarus]

Сообщение от Serge_Bliznykov

var fn : string;
  is_file_exist : boolean;
begin
  WriteLn('Укажите имя файла: ');
  ReadLn(fn);
  is_file_exist := FileExists(fn);
  WriteLn('файл ',fn,' логическая переменная = ',is_file_exist)
end.

а можно с коментариями

[Vlad-Belarus]

Спасибо

[Serge_Bliznykov]

Сообщение от Vlad-Belarus

а можно с коментариями

можно.
какая строчка в коде непонятна, спрашивайте.

Сообщение от Vlad-Belarus

Спасибо

пожалуйста.

[digitalis]

непонятны все, кроме begin end ?